(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[   2581112,      52912]
NotebookOptionsPosition[   2532045,      52180]
NotebookOutlinePosition[   2532417,      52196]
CellTagsIndexPosition[   2532374,      52193]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["\<\
TODO:
\t1 - Make several plots in the no stored growth case with different shocks. 
\t2 - Relate the change in A to L due to geometric coupling. 
\t3 - Make L(t) and W(t) plots instead of \[Delta]A and \[Delta]L
\t4 - What is the case of intermediate shock like?\
\>", "Chapter",
 CellChangeTimes->{{3.7907720914504437`*^9, 3.7907721946900187`*^9}, {
   3.7907722304342165`*^9, 3.7907722321862545`*^9}, {3.7909434562218876`*^9, 
   3.790943630276323*^9}, {3.790943694604513*^9, 3.790943696556291*^9}, {
   3.790954889199207*^9, 3.790954966998531*^9}, {3.791043876646871*^9, 
   3.791043882262848*^9}, {3.791044042078302*^9, 3.7910441253581057`*^9}, {
   3.7910996148913355`*^9, 3.791099627341031*^9}, {3.791099677771122*^9, 
   3.7910996862105284`*^9}, {3.7911072976256313`*^9, 3.791107326570741*^9}, {
   3.791139280312174*^9, 3.791139323469985*^9}, 3.7912863649380884`*^9, {
   3.7912864022164783`*^9, 3.7912864421445613`*^9}, {3.791287305528078*^9, 
   3.7912873094289646`*^9}, {3.7912927930823812`*^9, 3.791292811800851*^9}, {
   3.7913047317863274`*^9, 3.791304758788168*^9}, {3.791379686458661*^9, 
   3.791379730363306*^9}, {3.7915375971546173`*^9, 3.791537625643385*^9}, {
   3.7918809903405046`*^9, 3.791881025741724*^9}, {3.791882678445525*^9, 
   3.791882678820936*^9}, 3.8062284308809433`*^9, {3.8063959860313663`*^9, 
   3.8063960321689997`*^9}, {3.80639608378399*^9, 3.8063960930352573`*^9}, {
   3.8063963905601683`*^9, 3.8063964092342367`*^9}, {3.8064008908559785`*^9, 
   3.806400901291777*^9}, {3.806401073642915*^9, 3.8064010746641846`*^9}, 
   3.80656555885722*^9},
 FontSize->36,
 Background->RGBColor[
  1, 0.85, 0.85],ExpressionUUID->"e4dea3ec-a0e8-4e87-95fe-c08a746bdb7f"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"Plot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListPlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"PointSize", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListLinePlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ParametricPlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.7982681656204743`*^9, 3.7982683212060757`*^9}, {
   3.798268401623027*^9, 3.798268414807746*^9}, {3.798270003183006*^9, 
   3.798270005205597*^9}, {3.798274624931696*^9, 3.7982746250513687`*^9}, 
   3.7986167529374733`*^9, {3.7987002376395617`*^9, 3.798700280588745*^9}, {
   3.798794273353342*^9, 3.7987942778802576`*^9}, {3.80097124555169*^9, 
   3.800971253638053*^9}, {3.801128142441351*^9, 3.801128148456289*^9}, 
   3.801229750848446*^9},
 CellLabel->
  "In[326]:=",ExpressionUUID->"2d76db84-8a14-49dc-9c1e-b7796f79bf10"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Growth", " ", "law", " ", "expressed", " ", "for", " ", "cylinders"}], 
  "*)"}]], "Input",
 CellChangeTimes->{{3.800778248812855*^9, 
  3.800778276498743*^9}},ExpressionUUID->"799adc5f-740e-4658-9c15-\
0c790e68377c"],

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Equation1", " ", "=", " ", 
    RowBox[{
     FractionBox[
      RowBox[{"2", " ", 
       RowBox[{"a", "[", "t", "]"}], " ", 
       RowBox[{
        RowBox[{"a", "'"}], "[", "t", "]"}]}], 
      SuperscriptBox[
       RowBox[{"A", "[", "t", "]"}], "2"]], " ", "\[Equal]", " ", 
     RowBox[{"(", 
      RowBox[{"\[Alpha]1", " ", "-", " ", 
       RowBox[{"\[Alpha]2", " ", 
        FractionBox["A0", 
         RowBox[{"A", "[", "t", "]"}]]}], " ", "+", " ", 
       RowBox[{
        FractionBox["\[Beta]1", "2"], 
        RowBox[{"(", 
         RowBox[{"1", " ", "-", " ", 
          FractionBox["A0", 
           RowBox[{"A", "[", "t", "]"}]]}], ")"}]}], " ", "-", " ", 
       RowBox[{
        FractionBox["\[Beta]2", "2"], 
        RowBox[{"(", 
         RowBox[{"1", " ", "-", " ", 
          FractionBox["A0", 
           RowBox[{"A", "[", "t", "]"}]]}], ")"}], " ", 
        FractionBox["A0", 
         RowBox[{"A", "[", "t", "]"}]]}], " ", "+", " ", 
       RowBox[{
        FractionBox["\[Delta]1", "4"], 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", 
           FractionBox["A0", 
            RowBox[{"A", "[", "t", "]"}]]}], ")"}], "2"]}], " ", "+", " ", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"\[Sigma]1", " ", "+", " ", "\[Sigma]2"}], ")"}], 
        FractionBox[
         RowBox[{" ", 
          RowBox[{
           SuperscriptBox[
            RowBox[{"A", "[", "t", "]"}], "2"], " ", "-", " ", 
           SuperscriptBox[
            RowBox[{"a", "[", "t", "]"}], "2"]}]}], 
         RowBox[{"2", " ", 
          SuperscriptBox[
           RowBox[{"A", "[", "t", "]"}], "2"]}]]}], "+", " ", 
       RowBox[{
        RowBox[{"(", " ", "\[Sigma]2", ")"}], 
        FractionBox[
         RowBox[{" ", 
          RowBox[{
           SuperscriptBox[
            RowBox[{"L", "[", "t", "]"}], "2"], " ", "-", " ", 
           SuperscriptBox[
            RowBox[{"l", "[", "t", "]"}], "2"]}]}], 
         RowBox[{"2", " ", 
          SuperscriptBox[
           RowBox[{"L", "[", "t", "]"}], "2"]}]]}]}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Equation2", " ", "=", " ", 
    RowBox[{
     FractionBox[
      RowBox[{"2", " ", 
       RowBox[{"l", "[", "t", "]"}], " ", 
       RowBox[{
        RowBox[{"l", "'"}], "[", "t", "]"}]}], 
      SuperscriptBox[
       RowBox[{"L", "[", "t", "]"}], "2"]], " ", "\[Equal]", 
     RowBox[{"(", " ", 
      RowBox[{"\[Alpha]1", "  ", "+", " ", 
       RowBox[{
        FractionBox["\[Beta]1", "2"], 
        RowBox[{"(", 
         RowBox[{"1", " ", "-", " ", 
          FractionBox["A0", 
           RowBox[{"A", "[", "t", "]"}]]}], ")"}]}], " ", "+", " ", 
       RowBox[{
        FractionBox["\[Delta]1", "4"], 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", 
           FractionBox["A0", 
            RowBox[{"A", "[", "t", "]"}]]}], ")"}], "2"]}], " ", "+", " ", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"\[Sigma]1", " ", "+", " ", "\[Sigma]2"}], ")"}], 
        FractionBox[
         RowBox[{" ", 
          RowBox[{
           SuperscriptBox[
            RowBox[{"L", "[", "t", "]"}], "2"], " ", "-", 
           SuperscriptBox[
            RowBox[{"l", "[", "t", "]"}], "2"]}]}], 
         RowBox[{"2", " ", 
          SuperscriptBox[
           RowBox[{"L", "[", "t", "]"}], "2"]}]]}], "+", " ", 
       RowBox[{"\[Sigma]2", 
        FractionBox[
         RowBox[{" ", 
          RowBox[{
           SuperscriptBox[
            RowBox[{"A", "[", "t", "]"}], "2"], " ", "-", " ", 
           SuperscriptBox[
            RowBox[{"a", "[", "t", "]"}], "2"]}]}], 
         RowBox[{"2", " ", 
          SuperscriptBox[
           RowBox[{"A", "[", "t", "]"}], "2"]}]]}]}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "These", "  ", "relations", " ", "are", " ", "true", " ", "fro", " ", 
    "linearized", " ", "equations", " ", "in", " ", "\[Epsilon]z"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{" ", 
  RowBox[{
   RowBox[{
    RowBox[{"a", "[", "t_", "]"}], " ", "=", " ", 
    RowBox[{
     RowBox[{"A", "[", "t", "]"}], "  ", 
     RowBox[{"(", 
      RowBox[{"1", " ", "-", 
       RowBox[{"\[Epsilon]", " ", "\[Epsilon]t", " ", 
        FractionBox["p", 
         RowBox[{"y", "[", "t", "]"}]]}]}], ")"}]}]}], 
   ";"}]}], "\[IndentingNewLine]", 
 RowBox[{" ", 
  RowBox[{
   RowBox[{
    RowBox[{"l", "[", "t_", "]"}], " ", "=", " ", 
    RowBox[{
     RowBox[{"L", "[", "t", "]"}], "  ", 
     RowBox[{"(", 
      RowBox[{"1", " ", "-", 
       RowBox[{"\[Epsilon]", " ", "\[Epsilon]z", "  ", 
        FractionBox["p", 
         RowBox[{"y", "[", "t", "]"}]]}]}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"A", "[", "t_", "]"}], "  ", "=", " ", 
    RowBox[{"A0", "  ", 
     RowBox[{"(", 
      RowBox[{"1", " ", "+", " ", 
       RowBox[{"\[Epsilon]", " ", 
        RowBox[{"\[Delta]A", "[", "t", "]"}]}]}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"L", "[", "t_", "]"}], "  ", "=", " ", 
    RowBox[{
     RowBox[{"L0", "[", "t", "]"}], "  ", 
     RowBox[{"(", 
      RowBox[{"1", " ", "+", " ", 
       RowBox[{"\[Epsilon]", " ", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Stored", " ", "Growth", " ", "Condition"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"yStored", "[", "t_", "]"}], "=", 
    RowBox[{
     FractionBox[
      RowBox[{
       RowBox[{"L", "[", "t", "]"}], " ", "-", " ", 
       RowBox[{"pf", " ", 
        RowBox[{"L0", "[", "t", "]"}], " "}]}], 
      RowBox[{
       RowBox[{"L0", "[", "t", "]"}], " ", "-", " ", 
       RowBox[{"L", "[", "t", "]"}]}]], "  ", "\[Epsilon]", " ", 
     "\[Epsilon]z"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "the", " ", "modulus", " ", "in", " ", "normal", " ", "conditions"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"yUnPert", "[", "t_", "]"}], "=", " ", "1"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8007769977531033`*^9, 3.800777035366459*^9}, {
   3.80077707225276*^9, 3.800777073100492*^9}, {3.800777130028166*^9, 
   3.8007772591976137`*^9}, {3.800777294052352*^9, 3.8007774094695225`*^9}, {
   3.800778813539524*^9, 3.800778826169702*^9}, 3.8007790654138355`*^9, {
   3.8007997604910774`*^9, 3.800799780033786*^9}, {3.800867727478983*^9, 
   3.8008677279826603`*^9}, 3.8009459257549744`*^9, {3.800946329530687*^9, 
   3.800946329737135*^9}},
 CellLabel->
  "In[2324]:=",ExpressionUUID->"a2813d02-26c2-4186-9a88-46ddd755402e"],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"L0", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", " ", "+", " ", 
          RowBox[{
           FractionBox["\[Epsilon]z", 
            RowBox[{"y", "[", "t", "]"}]], "pf"}]}], ")"}]}], " ", "\[Equal]",
        " ", 
       RowBox[{
        RowBox[{"L", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", " ", "+", 
          FractionBox["\[Epsilon]z", 
           RowBox[{" ", 
            RowBox[{"y", "[", "t", "]"}]}]]}], ")"}]}]}], ",", " ", 
      RowBox[{"y", "[", "t", "]"}]}], "]"}], "//", "FullSimplify"}], 
   "*)"}]}]], "Input",
 CellChangeTimes->{{3.80094550432778*^9, 3.8009455510429683`*^9}, {
   3.8009458411716814`*^9, 3.8009458838750577`*^9}, 3.8009459467598295`*^9},
 CellLabel->
  "In[946]:=",ExpressionUUID->"cf09afe9-ada4-4a60-b685-358eb49441fd"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "The", " ", "equations", " ", "of", " ", "motion", " ", "in", " ", "the", 
     " ", "unperturbed", " ", "case", " ", "where", " ", "p"}], "  ", "=", 
    " ", 
    RowBox[{"y", " ", "=", " ", 
     RowBox[{
     "1.", " ", "We", " ", "focus", " ", "on", " ", "the", " ", "fixed", " ", 
      "point", " ", "condition"}]}]}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"y", "[", "t_", "]"}], "=", " ", 
     RowBox[{"yUnPert", "[", "t", "]"}]}], ";", "  ", 
    RowBox[{"p", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"UnPertEq1", " ", "=", " ", 
    RowBox[{"Normal", "[", 
     RowBox[{"Series", "[", 
      RowBox[{"Equation1", " ", ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"UnPertEq2", " ", "=", " ", 
    RowBox[{"Normal", "[", 
     RowBox[{"Series", "[", 
      RowBox[{"Equation2", " ", ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"y", ",", " ", "p", ",", "\[Epsilon]z", ",", " ", "\[Epsilon]t"}],
     "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8007789620192327`*^9, 3.800779091474086*^9}, {
  3.8007791258021393`*^9, 3.8007794893852654`*^9}, {3.8007795554116125`*^9, 
  3.8007796319927363`*^9}, {3.8007796990323577`*^9, 3.8007797394013166`*^9}, {
  3.801205938173613*^9, 3.801205987158811*^9}},
 CellLabel->
  "In[2333]:=",ExpressionUUID->"f8516072-ef6a-48e9-94c7-b67602b65007"],

Cell[BoxData[
 RowBox[{
  RowBox[{"2", " ", "\[Epsilon]", " ", 
   RowBox[{
    SuperscriptBox["\[Delta]A", "\[Prime]",
     MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", 
  RowBox[{"\[Alpha]1", "-", "\[Alpha]2", "+", 
   RowBox[{"\[Epsilon]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"\[Epsilon]z", " ", "\[Sigma]2"}], "+", 
      RowBox[{"\[Epsilon]t", " ", 
       RowBox[{"(", 
        RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}]}], "+", 
      RowBox[{"\[Alpha]2", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}], "+", 
      RowBox[{
       FractionBox["1", "2"], " ", "\[Beta]1", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}], "-", 
      RowBox[{
       FractionBox["1", "2"], " ", "\[Beta]2", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}]}], ")"}]}]}]}]], "Output",
 CellChangeTimes->{{3.8007793083289194`*^9, 3.8007793707977676`*^9}, {
   3.8007794349107676`*^9, 3.8007794484036894`*^9}, 3.800779494662175*^9, 
   3.800779578921688*^9, {3.800779732299347*^9, 3.800779742885023*^9}, 
   3.8007810587360506`*^9, 3.800799860423682*^9, 3.8008563933037157`*^9, 
   3.8008643289631596`*^9, 3.8008677342438817`*^9, 3.8008697113672466`*^9, 
   3.8009459499463034`*^9, 3.8009463367743*^9, 3.80094638240917*^9, 
   3.8009465004423637`*^9, 3.8009712576413407`*^9, 3.800971334258352*^9, 
   3.8010482878351126`*^9, {3.801205940942212*^9, 3.80120598825887*^9}, 
   3.8012265846786814`*^9, 3.806503747153737*^9, {3.806506958075483*^9, 
   3.806506961137296*^9}},
 CellLabel->
  "Out[2334]=",ExpressionUUID->"23d1cf1d-4715-4f24-ae3c-4a107d39d917"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   FractionBox[
    RowBox[{"2", " ", 
     RowBox[{
      SuperscriptBox["L0", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}]}], 
    RowBox[{"L0", "[", "t", "]"}]], "+", 
   FractionBox[
    RowBox[{"2", " ", "\[Epsilon]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "2"}], " ", "\[Epsilon]z", " ", 
        RowBox[{
         SuperscriptBox["L0", "\[Prime]",
          MultilineFunction->None], "[", "t", "]"}]}], "+", 
       RowBox[{
        RowBox[{"L0", "[", "t", "]"}], " ", 
        RowBox[{
         SuperscriptBox["\[Delta]L", "\[Prime]",
          MultilineFunction->None], "[", "t", "]"}]}]}], ")"}]}], 
    RowBox[{"L0", "[", "t", "]"}]]}], "\[Equal]", 
  RowBox[{"\[Alpha]1", "+", 
   RowBox[{"\[Epsilon]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"\[Epsilon]t", " ", "\[Sigma]2"}], "+", 
      RowBox[{"\[Epsilon]z", " ", 
       RowBox[{"(", 
        RowBox[{"\[Sigma]1", "+", "\[Sigma]2"}], ")"}]}], "+", 
      RowBox[{
       FractionBox["1", "2"], " ", "\[Beta]1", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}]}], ")"}]}]}]}]], "Output",
 CellChangeTimes->{{3.8007793083289194`*^9, 3.8007793707977676`*^9}, {
   3.8007794349107676`*^9, 3.8007794484036894`*^9}, 3.800779494662175*^9, 
   3.800779578921688*^9, {3.800779732299347*^9, 3.800779742885023*^9}, 
   3.8007810587360506`*^9, 3.800799860423682*^9, 3.8008563933037157`*^9, 
   3.8008643289631596`*^9, 3.8008677342438817`*^9, 3.8008697113672466`*^9, 
   3.8009459499463034`*^9, 3.8009463367743*^9, 3.80094638240917*^9, 
   3.8009465004423637`*^9, 3.8009712576413407`*^9, 3.800971334258352*^9, 
   3.8010482878351126`*^9, {3.801205940942212*^9, 3.80120598825887*^9}, 
   3.8012265846786814`*^9, 3.806503747153737*^9, {3.806506958075483*^9, 
   3.8065069611442995`*^9}},
 CellLabel->
  "Out[2335]=",ExpressionUUID->"d69b8bc7-9099-420f-bce9-98969fb91470"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Getting", " ", "the", " ", "fixed", " ", "point", " ", "conditions"}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"L0", "[", "t_", "]"}], " ", "=", " ", 
     RowBox[{"initL", " ", 
      RowBox[{"Exp", "[", 
       RowBox[{"(*", "R0", "*)"}], " ", "t", "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"fixedPointConds", " ", "=", " ", 
    RowBox[{
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{"{", 
            RowBox[{"UnPertEq1", ",", " ", "UnPertEq2"}], "}"}], "/.", 
           RowBox[{
            RowBox[{"\[Delta]A", "[", "t", "]"}], "\[Rule]", "0"}]}], "/.", 
          RowBox[{
           RowBox[{"\[Delta]L", "[", "t", "]"}], "\[Rule]", "0"}]}], "/.", 
         RowBox[{
          RowBox[{
           RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], "\[Rule]", "0"}]}], "/.", 
        RowBox[{
         RowBox[{
          RowBox[{"\[Delta]L", "'"}], "[", "t", "]"}], "\[Rule]", "0"}]}], 
       ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Alpha]1", ",", " ", "\[Alpha]2"}], "}"}]}], "]"}], "//", 
     "FullSimplify"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8007797513533983`*^9, 3.8007798636970696`*^9}, {
  3.8007799185452814`*^9, 3.8007799349613547`*^9}, {3.8007800271596823`*^9, 
  3.8007800361356373`*^9}, {3.800780174599479*^9, 3.800780218130005*^9}, {
  3.8009464848191724`*^9, 3.800946491352663*^9}},
 CellLabel->
  "In[2337]:=",ExpressionUUID->"669800b0-468a-4a4f-8bb9-6c474b108449"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"\[Alpha]1", "\[Rule]", 
     RowBox[{"2", "-", 
      RowBox[{"\[Epsilon]", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Epsilon]t", " ", "\[Sigma]2"}], "+", 
         RowBox[{"\[Epsilon]z", " ", 
          RowBox[{"(", 
           RowBox[{"4", "+", "\[Sigma]1", "+", "\[Sigma]2"}], ")"}]}]}], 
        ")"}]}]}]}], ",", 
    RowBox[{"\[Alpha]2", "\[Rule]", 
     RowBox[{"2", "+", 
      RowBox[{"\[Epsilon]", " ", "\[Epsilon]t", " ", "\[Sigma]1"}], "-", 
      RowBox[{"\[Epsilon]", " ", "\[Epsilon]z", " ", 
       RowBox[{"(", 
        RowBox[{"4", "+", "\[Sigma]1"}], ")"}]}]}]}]}], "}"}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.8007797461921463`*^9, 3.800779796669315*^9}, {
   3.8007798569461045`*^9, 3.8007798640022545`*^9}, {3.800779928632289*^9, 
   3.800779935473016*^9}, 3.8007802206163797`*^9, 3.800781060882286*^9, 
   3.8007998657943115`*^9, 3.800856396494179*^9, 3.8008643306376677`*^9, 
   3.8008677367980475`*^9, 3.80086971309161*^9, 3.800945953879778*^9, 
   3.800946340465414*^9, 3.800946384369951*^9, 3.8009465054160323`*^9, 
   3.800971336137307*^9, 3.8010482893091683`*^9, 3.801205993330821*^9, 
   3.801226585533409*^9, 3.8065037490167837`*^9, 3.8065069628278065`*^9},
 CellLabel->
  "Out[2338]=",ExpressionUUID->"c12471c8-fa30-4501-934e-96fe28e4be75"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "The", " ", "equations", " ", "of", " ", "motion", " ", "in", " ", "the", 
     " ", "absence", " ", "of", " ", "stored", " ", "growth", " ", "and", " ",
      "when", " ", "the", " ", "pressure", " ", "has", " ", "been", " ", 
     "reduced", " ", "to", "  ", "pf"}], " ", "<", " ", "1"}], "  ", "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"\[Alpha]1", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]2", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"y", "[", "t_", "]"}], "=", " ", 
     RowBox[{"yUnPert", "[", "t", "]"}]}], ";", "  ", 
    RowBox[{"p", "=", " ", "pf"}], ";", " ", 
    RowBox[{"\[Epsilon]t", " ", "=", " ", "\[Epsilon]z"}], ";", " ", 
    RowBox[{"pf", "=", 
     FractionBox[
      RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], "\[Epsilon]z"]}], ";", "  ", 
    RowBox[{"\[Sigma]1", " ", "=", " ", 
     RowBox[{
      RowBox[{"2", " ", "\[CapitalSigma]"}], " ", "-", " ", 
      RowBox[{"2", " ", "\[Sigma]2"}]}]}], ";", " ", 
    RowBox[{"\[Beta]2", " ", "=", " ", 
     RowBox[{
      RowBox[{"4", " ", "g1"}], " ", "+", " ", "4", " ", "+", " ", 
      RowBox[{"4", " ", "g2"}]}]}], ";", " ", 
    RowBox[{"\[Beta]1", " ", "=", " ", 
     RowBox[{"4", " ", "g2"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"noStoredEq1", " ", "=", " ", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]A", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"Normal", "[", 
        RowBox[{"Series", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"Solve", "[", 
            RowBox[{
             RowBox[{"Normal", "[", 
              RowBox[{"Series", "[", 
               RowBox[{"Equation1", " ", ",", " ", 
                RowBox[{"{", 
                 RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
              "]"}], ",", " ", 
             RowBox[{
              RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}]}], "]"}], "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}], 
       "//", "FullSimplify"}], ")"}]}]}], "\[IndentingNewLine]", 
   RowBox[{"noStoredEq2", " ", "=", " ", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]L", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"Normal", "[", 
        RowBox[{"Series", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"Solve", "[", 
            RowBox[{
             RowBox[{"Normal", "[", 
              RowBox[{"Series", "[", 
               RowBox[{"Equation2", " ", ",", " ", 
                RowBox[{"{", 
                 RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
              "]"}], ",", " ", 
             RowBox[{
              RowBox[{"\[Delta]L", "'"}], "[", "t", "]"}]}], "]"}], "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}], 
       "//", "FullSimplify"}], ")"}]}]}], "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{
    "y", ",", " ", "p", ",", " ", "pf", ",", " ", "\[Sigma]1", ",", " ", 
     "\[Beta]1", ",", " ", "\[Beta]2", ",", " ", "R0"}], "]"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8007800384006042`*^9, 3.8007802046460543`*^9}, {
   3.8007802787129297`*^9, 3.80078028418429*^9}, {3.8007806501121554`*^9, 
   3.800780709614935*^9}, {3.8007808387144995`*^9, 3.800780866557997*^9}, {
   3.8007809331108894`*^9, 3.8007809332774444`*^9}, {3.8007988357890167`*^9, 
   3.800798838604457*^9}, 3.800856382108664*^9, {3.800867632487178*^9, 
   3.8008676808378115`*^9}, {3.8008678207673893`*^9, 3.800867872525873*^9}, {
   3.8008679579094343`*^9, 3.8008680729915004`*^9}, 3.8008829481709843`*^9, {
   3.8009461056437225`*^9, 3.800946116034919*^9}, {3.8009461686900268`*^9, 
   3.8009461742262163`*^9}, {3.801206008055458*^9, 3.8012060300337057`*^9}, {
   3.801206304360445*^9, 3.8012063339603176`*^9}, {3.8012265684031897`*^9, 
   3.8012265711149693`*^9}},
 CellLabel->
  "In[2339]:=",ExpressionUUID->"06aa422f-4de6-4740-b259-59fa55acc395"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]A", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{
   RowBox[{"\[Delta]L0", " ", "\[CapitalSigma]"}], "-", 
   RowBox[{"g1", " ", 
    RowBox[{"\[Delta]A", "[", "t", "]"}]}]}]}]], "Output",
 CellChangeTimes->{
  3.800780252620717*^9, 3.8007802852424283`*^9, {3.800780679041718*^9, 
   3.800780710199375*^9}, {3.800780840769972*^9, 3.800780867438613*^9}, 
   3.800781062339409*^9, 3.80079884896576*^9, 3.8007998676393747`*^9, 
   3.8008563996088448`*^9, 3.800864332646281*^9, 3.800867750742735*^9, 
   3.800867992524813*^9, {3.800868022945387*^9, 3.800868073501112*^9}, 
   3.80086971676877*^9, 3.8009459607464046`*^9, 3.8009461808115635`*^9, 
   3.8009463429377937`*^9, 3.80094639145597*^9, 3.800946524092061*^9, 
   3.800971337700137*^9, 3.801048291336744*^9, 3.8012060110803723`*^9, 
   3.8012060422930098`*^9, {3.8012063092114773`*^9, 3.801206334569689*^9}, 
   3.8012265865616484`*^9, 3.806503750663353*^9, 3.806506964438469*^9},
 CellLabel->
  "Out[2342]=",ExpressionUUID->"e3fe19e7-1837-4eb4-b2e6-0b24f324b6ba"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]L", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{
   RowBox[{"\[Delta]L0", " ", 
    RowBox[{"(", 
     RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}]}], "+", 
   RowBox[{"g2", " ", 
    RowBox[{"\[Delta]A", "[", "t", "]"}]}]}]}]], "Output",
 CellChangeTimes->{
  3.800780252620717*^9, 3.8007802852424283`*^9, {3.800780679041718*^9, 
   3.800780710199375*^9}, {3.800780840769972*^9, 3.800780867438613*^9}, 
   3.800781062339409*^9, 3.80079884896576*^9, 3.8007998676393747`*^9, 
   3.8008563996088448`*^9, 3.800864332646281*^9, 3.800867750742735*^9, 
   3.800867992524813*^9, {3.800868022945387*^9, 3.800868073501112*^9}, 
   3.80086971676877*^9, 3.8009459607464046`*^9, 3.8009461808115635`*^9, 
   3.8009463429377937`*^9, 3.80094639145597*^9, 3.800946524092061*^9, 
   3.800971337700137*^9, 3.801048291336744*^9, 3.8012060110803723`*^9, 
   3.8012060422930098`*^9, {3.8012063092114773`*^9, 3.801206334569689*^9}, 
   3.8012265865616484`*^9, 3.806503750663353*^9, 3.8065069644634027`*^9},
 CellLabel->
  "Out[2343]=",ExpressionUUID->"4ce29b55-9721-4ad6-8aef-6fd1387b0181"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{
     "The", " ", "structure", " ", "of", " ", "the", " ", "equations", " ", 
      "without", " ", "stored", " ", "growth", " ", "is", " ", 
      RowBox[{
       SuperscriptBox["\[Delta]A", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", " ", 
     RowBox[{
      RowBox[{"-", "c1"}], " ", "-", " ", 
      RowBox[{"g1", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}], " ", "and", " ", 
       RowBox[{
        SuperscriptBox["\[Delta]L", "\[Prime]",
         MultilineFunction->None], "[", "t", "]"}]}]}], "\[Equal]", " ", 
     RowBox[{
      RowBox[{"-", "c2"}], " ", "+", " ", 
      RowBox[{"g2", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}]}]}], ",", " ", 
    RowBox[{
     RowBox[{"where", " ", "c1"}], " ", "=", " ", 
     RowBox[{
      FractionBox["1", "2"], " ", 
      RowBox[{"(", 
       RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Epsilon]z", " ", 
      RowBox[{"(", 
       RowBox[{"\[Sigma]1", "+", 
        RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}]}]}], ",", " ", 
    RowBox[{"c2", " ", "=", " ", 
     RowBox[{"c1", " ", "+", " ", 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{"1", " ", "-", " ", "pf"}], ")"}], " ", "R0", " ", 
       "\[Epsilon]z"}]}]}], ",", " ", 
    RowBox[{"g1", " ", "=", " ", 
     RowBox[{
      FractionBox["1", "4"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"4", " ", "R0"}], "+", "\[Beta]1", "-", "\[Beta]2"}], 
       ")"}]}]}], ",", " ", 
    RowBox[{"g2", " ", "=", " ", 
     FractionBox["\[Beta]1", "4"]}]}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"\[Delta]L0", " ", "=", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1", " ", "-", " ", "pf"}], ")"}], " ", "\[Epsilon]z"}]}], 
   "*)"}], " ", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"R0", "=", "1"}], ";"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"notStoredSol", " ", "=", " ", 
     RowBox[{"DSolve", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"noStoredEq1", ",", " ", "noStoredEq2", ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]L", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]L0"}], ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]A", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]A0"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", "t"}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{"\[Delta]A", "[", "t", "]"}], "/.", 
     RowBox[{"notStoredSol", "[", 
      RowBox[{"[", "1", "]"}], "]"}]}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{"\[Delta]L", "[", "t", "]"}], "/.", 
     RowBox[{"notStoredSol", "[", 
      RowBox[{"[", "1", "]"}], "]"}]}], "]"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8007991388111763`*^9, 3.800799153062045*^9}, {
   3.800799184066085*^9, 3.8007993164731874`*^9}, {3.800799367033923*^9, 
   3.8007993714979544`*^9}, {3.800799407298162*^9, 3.8007994880672355`*^9}, {
   3.800799641066841*^9, 3.8007996597857556`*^9}, {3.800799827112844*^9, 
   3.8007998522655115`*^9}, {3.8007999071785774`*^9, 3.800799932051101*^9}, {
   3.8008001333614445`*^9, 3.800800198128249*^9}, {3.800868591637667*^9, 
   3.8008685979338245`*^9}, {3.8009460324366035`*^9, 3.8009460595699964`*^9}, 
   3.8009460922525263`*^9, {3.800946122257269*^9, 3.800946130369561*^9}, {
   3.8009464427616806`*^9, 3.8009464446725955`*^9}, 3.8009465294327707`*^9},
 CellLabel->
  "In[2345]:=",ExpressionUUID->"cf05fbdf-0e43-4c87-a48f-60a31d4a275e"],

Cell[BoxData[
 FractionBox[
  RowBox[{
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{
     RowBox[{"-", "g1"}], " ", "t"}]], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"g1", " ", "\[Delta]A0"}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{"g1", " ", "t"}]]}], ")"}], " ", "\[Delta]L0", " ", 
      "\[CapitalSigma]"}]}], ")"}]}], "g1"]], "Output",
 CellChangeTimes->{3.8009462549551744`*^9, 3.8009463542555017`*^9, 
  3.8009463972594337`*^9, 3.800946532600295*^9, 3.8009713428194256`*^9, 
  3.801048294473353*^9, 3.8012265880466785`*^9, 3.8065037537630653`*^9, 
  3.8065069708343954`*^9},
 CellLabel->
  "Out[2346]=",ExpressionUUID->"80c25c73-1027-4ded-869a-fc8ee02d9c66"],

Cell[BoxData[
 RowBox[{"\[Delta]L0", "+", 
  FractionBox[
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[ExponentialE]", 
       RowBox[{
        RowBox[{"-", "g1"}], " ", "t"}]]}], ")"}], " ", "g2", " ", 
    "\[Delta]L0", " ", "\[CapitalSigma]"}], 
   SuperscriptBox["g1", "2"]], "+", 
  RowBox[{"t", " ", "\[Delta]L0", " ", 
   RowBox[{"(", 
    RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}]}], "+", 
  FractionBox[
   RowBox[{"g2", " ", 
    RowBox[{"(", 
     RowBox[{"\[Delta]A0", "-", 
      RowBox[{
       SuperscriptBox["\[ExponentialE]", 
        RowBox[{
         RowBox[{"-", "g1"}], " ", "t"}]], " ", "\[Delta]A0"}], "+", 
      RowBox[{"t", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], ")"}]}], 
   "g1"]}]], "Output",
 CellChangeTimes->{3.8009462549551744`*^9, 3.8009463542555017`*^9, 
  3.8009463972594337`*^9, 3.800946532600295*^9, 3.8009713428194256`*^9, 
  3.801048294473353*^9, 3.8012265880466785`*^9, 3.8065037537630653`*^9, 
  3.806506971240282*^9},
 CellLabel->
  "Out[2347]=",ExpressionUUID->"761eae84-5388-4fbb-b7a7-cc950048760e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "The", " ", "equations", " ", "of", " ", "motion", " ", "when", " ", 
     "there", " ", "is", " ", "stored", " ", "growth", " ", "and", " ", "p"}],
     " ", "=", " ", 
    RowBox[{"pf", " ", "<", " ", "1."}]}], "  ", "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Clear", "[", "pf", "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]1", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]2", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"y", "[", "t_", "]"}], "=", " ", 
     RowBox[{"yStored", "[", "t", "]"}]}], ";", "  ", 
    RowBox[{"p", "=", " ", "pf"}], ";", "    ", 
    RowBox[{"pf", "=", 
     FractionBox[
      RowBox[{" ", 
       RowBox[{"\[Delta]L0", "+", " ", "\[Epsilon]z"}]}], 
      RowBox[{" ", "\[Epsilon]z"}]]}], ";", "  ", 
    RowBox[{"\[Sigma]1", " ", "=", " ", 
     RowBox[{
      RowBox[{"2", " ", "\[CapitalSigma]"}], " ", "-", " ", 
      RowBox[{"2", " ", "\[Sigma]2"}]}]}], ";", "  ", 
    RowBox[{"\[Beta]2", " ", "=", " ", 
     RowBox[{
      RowBox[{"4", " ", "g1"}], " ", "+", " ", "4", " ", "+", " ", 
      "\[Beta]1"}]}], ";", " ", 
    RowBox[{"\[Beta]1", " ", "=", " ", 
     RowBox[{"4", " ", "g2"}]}], ";", " ", 
    RowBox[{"R0", "  ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"Series", "[", 
    RowBox[{
     RowBox[{"yStored", "[", "t", "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"StoredEq1", " ", "=", " ", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]A", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"Solve", "[", 
         RowBox[{
          RowBox[{"Normal", "[", 
           RowBox[{"Series", "[", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"Equation1", " ", ",", " ", "Equation2"}], "}"}], ",", 
             " ", 
             RowBox[{"{", 
              RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
           "]"}], ",", 
          RowBox[{"{", " ", 
           RowBox[{
            RowBox[{
             RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], ",", " ", 
            RowBox[{
             SuperscriptBox["\[Delta]L", "\[Prime]",
              MultilineFunction->None], "[", "t", "]"}]}], "}"}]}], "]"}], 
        "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
       "FullSimplify"}], ")"}]}]}], "\[IndentingNewLine]", 
   RowBox[{"StoredEq2", " ", "=", " ", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]L", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"Solve", "[", 
         RowBox[{
          RowBox[{"Normal", "[", 
           RowBox[{"Series", "[", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"Equation1", " ", ",", " ", "Equation2"}], "}"}], ",", 
             " ", 
             RowBox[{"{", 
              RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
           "]"}], ",", 
          RowBox[{"{", " ", 
           RowBox[{
            RowBox[{
             RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], ",", " ", 
            RowBox[{
             SuperscriptBox["\[Delta]L", "\[Prime]",
              MultilineFunction->None], "[", "t", "]"}]}], "}"}]}], "]"}], 
        "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], " ", "//", 
       "FullSimplify"}], ")"}]}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"y", ",", " ", "p"}], "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.800780957685136*^9, 3.800780987990326*^9}, {
   3.8008565846051545`*^9, 3.8008565939242454`*^9}, {3.800856670211094*^9, 
   3.8008566919332786`*^9}, {3.800856771173272*^9, 3.800856772786934*^9}, {
   3.8008677143511305`*^9, 3.800867714582514*^9}, {3.8008680663263106`*^9, 
   3.8008680706557255`*^9}, {3.801226578284803*^9, 3.801226579579342*^9}, 
   3.801226674085678*^9, {3.801226830780795*^9, 3.801226833443705*^9}, {
   3.801226873219348*^9, 3.801226886474913*^9}, {3.8012272038684483`*^9, 
   3.8012272262676477`*^9}, {3.801227317317272*^9, 3.801227319228143*^9}, 
   3.801227515506612*^9, 3.8012276328139944`*^9, 3.8012277024529133`*^9},
 CellLabel->
  "In[166]:=",ExpressionUUID->"bb589017-69f8-4420-8085-7789f2d46517"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   FractionBox["\[Delta]L0", 
    RowBox[{"\[Delta]L", "[", "t", "]"}]], "-", 
   RowBox[{"\[Epsilon]z", " ", "\[Epsilon]"}], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]", "]"}], "2"],
    SeriesData[$CellContext`\[Epsilon], 0, {}, 0, 2, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon], 
   0, {$CellContext`\[Delta]L0/$CellContext`\[Delta]L[$CellContext`t], \
-$CellContext`\[Epsilon]z}, 0, 2, 1],
  Editable->False]], "Output",
 CellChangeTimes->{
  3.800780990480663*^9, 3.8007810872826443`*^9, 3.8007998693956757`*^9, 
   3.8008564023425303`*^9, 3.8008566969398823`*^9, 3.8008567735070353`*^9, 
   3.800864340301797*^9, {3.8008680681215067`*^9, 3.800868076381406*^9}, 
   3.8008697334940176`*^9, 3.800946406155658*^9, 3.800971348026575*^9, 
   3.8010482965338383`*^9, 3.80122659517964*^9, {3.801226880271496*^9, 
   3.8012268880058203`*^9}, 3.8012272310239325`*^9, 3.8012273209894347`*^9, 
   3.8012275164929466`*^9, 3.8012275805247765`*^9, 3.8012276333186455`*^9, 
   3.801227702976514*^9},
 CellLabel->
  "Out[170]=",ExpressionUUID->"73a5c8c8-e393-4943-9add-302571e4a333"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]A", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  FractionBox[
   RowBox[{
    RowBox[{
     RowBox[{"-", "\[Delta]L0"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"g1", " ", "\[Epsilon]z"}], "+", 
       RowBox[{"g2", " ", 
        RowBox[{"(", 
         RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}]}], ")"}], " ", 
     RowBox[{"\[Delta]A", "[", "t", "]"}]}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"2", " ", "\[Epsilon]z"}], "+", 
       RowBox[{"\[Delta]L0", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}]}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}], " ", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
   RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}]]}]], "Output",
 CellChangeTimes->{
  3.800780990480663*^9, 3.8007810872826443`*^9, 3.8007998693956757`*^9, 
   3.8008564023425303`*^9, 3.8008566969398823`*^9, 3.8008567735070353`*^9, 
   3.800864340301797*^9, {3.8008680681215067`*^9, 3.800868076381406*^9}, 
   3.8008697334940176`*^9, 3.800946406155658*^9, 3.800971348026575*^9, 
   3.8010482965338383`*^9, 3.80122659517964*^9, {3.801226880271496*^9, 
   3.8012268880058203`*^9}, 3.8012272310239325`*^9, 3.8012273209894347`*^9, 
   3.8012275164929466`*^9, 3.8012275805247765`*^9, 3.8012276333186455`*^9, 
   3.801227703003443*^9},
 CellLabel->
  "Out[171]=",ExpressionUUID->"5ea40056-f9e9-4ae2-aca5-9d4de8b25faa"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]L", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  FractionBox[
   RowBox[{
    RowBox[{
     RowBox[{"-", "g2"}], " ", "\[Delta]L0", " ", 
     RowBox[{"\[Delta]A", "[", "t", "]"}]}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}], " ", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
   "\[Epsilon]z"]}]], "Output",
 CellChangeTimes->{
  3.800780990480663*^9, 3.8007810872826443`*^9, 3.8007998693956757`*^9, 
   3.8008564023425303`*^9, 3.8008566969398823`*^9, 3.8008567735070353`*^9, 
   3.800864340301797*^9, {3.8008680681215067`*^9, 3.800868076381406*^9}, 
   3.8008697334940176`*^9, 3.800946406155658*^9, 3.800971348026575*^9, 
   3.8010482965338383`*^9, 3.80122659517964*^9, {3.801226880271496*^9, 
   3.8012268880058203`*^9}, 3.8012272310239325`*^9, 3.8012273209894347`*^9, 
   3.8012275164929466`*^9, 3.8012275805247765`*^9, 3.8012276333186455`*^9, 
   3.801227703029374*^9},
 CellLabel->
  "Out[172]=",ExpressionUUID->"bdfd1cad-6e94-4f73-ab7c-1d31fd965c73"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "equations", " ", "of", " ", "motion", " ", "when", " ", 
    "there", " ", "is", " ", "only", " ", "partial", " ", "stored", " ", 
    "growth", " ", "with", " ", "restoration", " ", "fraction", " ", 
    "\[Alpha]S", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"0", " ", "to", " ", "1"}], ")"}], "."}]}], "  ", "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Clear", "[", 
    RowBox[{"pf", ",", " ", "\[Alpha]S"}], "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]1", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]2", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\[Alpha]S", " ", "=", " ", 
      RowBox[{"1", "/", "2"}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"y", "[", "t_", "]"}], "=", " ", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"1", " ", "-", " ", "\[Alpha]S"}], ")"}], " ", "+", " ", 
      RowBox[{"\[Alpha]S", " ", 
       RowBox[{"yStored", "[", "t", "]"}]}]}]}], ";", "  ", 
    RowBox[{"p", "=", " ", "pf"}], ";", "    ", 
    RowBox[{"pf", "=", 
     FractionBox[
      RowBox[{" ", 
       RowBox[{"\[Delta]L0", "+", " ", "\[Epsilon]z"}]}], 
      RowBox[{" ", "\[Epsilon]z"}]]}], ";", "  ", 
    RowBox[{"\[Sigma]1", " ", "=", " ", 
     RowBox[{
      RowBox[{"2", " ", "\[CapitalSigma]"}], " ", "-", " ", 
      RowBox[{"2", " ", "\[Sigma]2"}]}]}], ";", "  ", 
    RowBox[{"\[Beta]2", " ", "=", " ", 
     RowBox[{
      RowBox[{"4", " ", "g1"}], " ", "+", " ", "4", " ", "+", " ", 
      "\[Beta]1"}]}], ";", " ", 
    RowBox[{"\[Beta]1", " ", "=", " ", 
     RowBox[{"4", " ", "g2"}]}], ";", " ", 
    RowBox[{"R0", "  ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Series", "[", 
     RowBox[{
      RowBox[{"yStored", "[", "t", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"StoredEq1", " ", "=", " ", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]A", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"Solve", "[", 
         RowBox[{
          RowBox[{"Normal", "[", 
           RowBox[{"Series", "[", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"Equation1", " ", ",", " ", "Equation2"}], "}"}], ",", 
             " ", 
             RowBox[{"{", 
              RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
           "]"}], ",", 
          RowBox[{"{", " ", 
           RowBox[{
            RowBox[{
             RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], ",", " ", 
            RowBox[{
             SuperscriptBox["\[Delta]L", "\[Prime]",
              MultilineFunction->None], "[", "t", "]"}]}], "}"}]}], "]"}], 
        "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
       "FullSimplify"}], ")"}]}]}], "\[IndentingNewLine]", 
   RowBox[{"StoredEq2", " ", "=", " ", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]L", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"Solve", "[", 
         RowBox[{
          RowBox[{"Normal", "[", 
           RowBox[{"Series", "[", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"Equation1", " ", ",", " ", "Equation2"}], "}"}], ",", 
             " ", 
             RowBox[{"{", 
              RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
           "]"}], ",", 
          RowBox[{"{", " ", 
           RowBox[{
            RowBox[{
             RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], ",", " ", 
            RowBox[{
             SuperscriptBox["\[Delta]L", "\[Prime]",
              MultilineFunction->None], "[", "t", "]"}]}], "}"}]}], "]"}], 
        "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], " ", "//", 
       "FullSimplify"}], ")"}]}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"y", ",", " ", "p"}], "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8065037330764217`*^9, 3.8065038374034643`*^9}, {
   3.8065039156691775`*^9, 3.8065039167442803`*^9}, {3.806504006441469*^9, 
   3.8065040114141817`*^9}, 3.8065069983418174`*^9},
 CellLabel->
  "In[2356]:=",ExpressionUUID->"c520c9a6-053f-4227-8c83-76f30ffffad5"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]A", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{"-", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"g1", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              "\[Delta]L0"}], "-", 
             RowBox[{"g1", " ", "\[Epsilon]z"}], "-", 
             RowBox[{"g2", " ", 
              RowBox[{"(", 
               RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}]}], ")"}]}],
           "+", 
          RowBox[{"g1", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
       "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"\[Delta]L0", "+", 
             RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}], "+", 
             RowBox[{
             "\[Alpha]S", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], 
            ")"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           "\[CapitalSigma]", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}]}], 
      ")"}], "/", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
         RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
         RowBox[{"\[Alpha]S", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
             "\[Delta]L0"}], "-", "\[Epsilon]z"}], ")"}]}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
             RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
      ")"}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{3.806503837941984*^9, 3.8065039169696774`*^9, 
  3.806504012156164*^9, 3.80650700687899*^9},
 CellLabel->
  "Out[2360]=",ExpressionUUID->"7ddecddd-935e-4bd0-9fb7-a908d63a74f7"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]L", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{"-", 
   FractionBox[
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
       RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
       RowBox[{"\[Alpha]S", " ", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "g2"}], " ", 
        RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"\[Delta]L0", "+", 
             RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
    RowBox[{
     RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", "\[Delta]L0"}],
         "-", "\[Epsilon]z"}], ")"}]}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
      RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
         RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}]]}]}]], "Output",
 CellChangeTimes->{3.806503837941984*^9, 3.8065039169696774`*^9, 
  3.806504012156164*^9, 3.8065070069966755`*^9},
 CellLabel->
  "Out[2361]=",ExpressionUUID->"c50c7dcc-1f0c-4308-b892-c85728837b31"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Delta]L0", " ", "=", " ", 
   RowBox[{
    RowBox[{"-", "\[Epsilon]z"}], 
    RowBox[{"(", 
     RowBox[{"1", " ", "-", " ", "pf"}], ")"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]A", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{"-", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"g1", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              "\[Delta]L0"}], "-", 
             RowBox[{"g1", " ", "\[Epsilon]z"}], "-", 
             RowBox[{"g2", " ", 
              RowBox[{"(", 
               RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}]}], ")"}]}],
           "+", 
          RowBox[{"g1", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
       "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"\[Delta]L0", "+", 
             RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}], "+", 
             RowBox[{
             "\[Alpha]S", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], 
            ")"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           "\[CapitalSigma]", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}]}], 
      ")"}], "/", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
         RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
         RowBox[{"\[Alpha]S", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
             "\[Delta]L0"}], "-", "\[Epsilon]z"}], ")"}]}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
             RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
      ")"}]}], ")"}]}]}], "\n", 
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]L", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{"-", 
   FractionBox[
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
       RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
       RowBox[{"\[Alpha]S", " ", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "g2"}], " ", 
        RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"\[Delta]L0", "+", 
             RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
    RowBox[{
     RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", "\[Delta]L0"}],
         "-", "\[Epsilon]z"}], ")"}]}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
      RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
         RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}]]}]}]}], "Input",
 CellChangeTimes->{{3.821434609879809*^9, 3.8214346131570454`*^9}, {
  3.8214352308492727`*^9, 3.8214352763934827`*^9}, {3.823414633100545*^9, 
  3.823414635066921*^9}},
 CellLabel->"In[87]:=",ExpressionUUID->"9d28e6bc-7038-45b7-b65f-bf883fa79f6b"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]A", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{"-", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
           "\[Epsilon]z"}], "+", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
           "\[Epsilon]z", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "g1"}], " ", "\[Epsilon]z"}], "-", 
             RowBox[{"g1", " ", 
              RowBox[{"(", 
               RowBox[{"1", "-", "pf"}], ")"}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              "\[Epsilon]z"}], "-", 
             RowBox[{"g2", " ", 
              RowBox[{"(", 
               RowBox[{"\[Epsilon]z", "-", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Epsilon]z"}]}], 
               ")"}]}]}], ")"}]}], "+", 
          RowBox[{"g1", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
              "\[Epsilon]z"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
       "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
           SuperscriptBox["\[Epsilon]z", "2"]}], "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", 
               RowBox[{"(", 
                RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Epsilon]z"}], "+", 
             RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
           "\[Epsilon]z", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{"\[Epsilon]z", "-", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Epsilon]z"}]}], 
               ")"}]}], "-", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
              "\[Epsilon]z", " ", "\[CapitalSigma]"}]}], ")"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           "\[CapitalSigma]", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
              "\[Epsilon]z"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}]}], 
      ")"}], "/", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          RowBox[{"-", 
           RowBox[{"(", 
            RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
          "\[Epsilon]z"}], "+", 
         RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
         RowBox[{"\[Alpha]S", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          RowBox[{"-", 
           RowBox[{"(", 
            RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
          "\[Epsilon]z", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "\[Epsilon]z"}], "-", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"1", "-", "pf"}], ")"}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
             "\[Epsilon]z"}]}], ")"}]}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
             "\[Epsilon]z"}], "+", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
             RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
      ")"}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{
  3.82143461581793*^9, {3.8214352733885446`*^9, 3.8214352765470705`*^9}, 
   3.8234146704789343`*^9},
 CellLabel->"Out[88]=",ExpressionUUID->"de238f4a-b016-45d3-8240-95045dc1147d"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   SuperscriptBox["\[Delta]L", "\[Prime]",
    MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
  RowBox[{"-", 
   FractionBox[
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"-", 
         RowBox[{"(", 
          RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
        "\[Epsilon]z"}], "+", 
       RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
       RowBox[{"\[Alpha]S", " ", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"-", "g2"}], " ", 
        RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
           "\[Epsilon]z"}], "+", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
           SuperscriptBox["\[Epsilon]z", "2"]}], "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", 
               RowBox[{"(", 
                RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Epsilon]z"}], "+", 
             RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
    RowBox[{
     RowBox[{
      RowBox[{"-", 
       RowBox[{"(", 
        RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
      "\[Epsilon]z", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "\[Epsilon]z"}], "-", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"1", "-", "pf"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
         "\[Epsilon]z"}]}], ")"}]}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
      RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"2", " ", 
         RowBox[{"(", 
          RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
         "\[Epsilon]z"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
         RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}]]}]}]], "Output",
 CellChangeTimes->{
  3.82143461581793*^9, {3.8214352733885446`*^9, 3.8214352765470705`*^9}, 
   3.8234146705151577`*^9},
 CellLabel->"Out[89]=",ExpressionUUID->"5efb61a5-5e05-4e96-835e-1e1a8e98d3f0"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Series", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"-", 
      FractionBox[
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
           "\[Epsilon]z"}], "+", 
          RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "g2"}], " ", 
           RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", 
               RowBox[{"(", 
                RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
              "\[Epsilon]z"}], "+", 
             RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
             RowBox[{"\[Alpha]S", " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", 
               RowBox[{"(", 
                RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
              SuperscriptBox["\[Epsilon]z", "2"]}], "-", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{
                 RowBox[{"-", 
                  RowBox[{"(", 
                   RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Epsilon]z"}], 
                "+", 
                RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
       RowBox[{
        RowBox[{
         RowBox[{"-", 
          RowBox[{"(", 
           RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
         "\[Epsilon]z", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "\[Epsilon]z"}], "-", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
            "\[Epsilon]z"}]}], ")"}]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
         RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"2", " ", 
            RowBox[{"(", 
             RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
            "\[Epsilon]z"}], "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
            RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}]]}], "/.", 
     RowBox[{
      RowBox[{"\[Delta]L", "[", "t", "]"}], "\[Rule]", 
      RowBox[{"\[Epsilon]z", " ", 
       RowBox[{"\[Delta]L", "[", "t", "]"}]}]}]}], "/.", 
    RowBox[{
     RowBox[{"\[Delta]A", "[", "t", "]"}], "\[Rule]", " ", 
     RowBox[{
      RowBox[{"\[Delta]A", "[", "t", "]"}], " ", "\[Epsilon]z"}]}]}], ",", 
   RowBox[{"{", 
    RowBox[{"\[Epsilon]z", ",", "0", ",", "1"}], "}"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Series", "[", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"-", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"-", 
                RowBox[{"(", 
                 RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
               "\[Epsilon]z"}], "+", 
              RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
              RowBox[{"\[Alpha]S", " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"-", 
                RowBox[{"(", 
                 RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
               "\[Epsilon]z", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{
                  RowBox[{"-", "g1"}], " ", "\[Epsilon]z"}], "-", 
                 RowBox[{"g1", " ", 
                  RowBox[{"(", 
                   RowBox[{"1", "-", "pf"}], ")"}], " ", 
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                  "\[Epsilon]z"}], "-", 
                 RowBox[{"g2", " ", 
                  RowBox[{"(", 
                   RowBox[{"\[Epsilon]z", "-", 
                    RowBox[{
                    RowBox[{"(", 
                    RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Epsilon]z"}]}], 
                   ")"}]}]}], ")"}]}], "+", 
              RowBox[{"g1", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"2", " ", 
                  RowBox[{"(", 
                   RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
                  "\[Epsilon]z"}], "+", 
                 RowBox[{
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                  RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
             ")"}]}], "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"-", 
                RowBox[{"(", 
                 RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
               SuperscriptBox["\[Epsilon]z", "2"]}], "-", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{
                  RowBox[{"-", 
                   RowBox[{"(", 
                    RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Epsilon]z"}], 
                 "+", 
                 RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"-", 
                RowBox[{"(", 
                 RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
               "\[Epsilon]z", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"2", " ", 
                  RowBox[{"(", 
                   RowBox[{"\[Epsilon]z", "-", 
                    RowBox[{
                    RowBox[{"(", 
                    RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Epsilon]z"}]}], 
                   ")"}]}], "-", 
                 RowBox[{
                  RowBox[{"(", 
                   RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
                  "\[Epsilon]z", " ", "\[CapitalSigma]"}]}], ")"}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
               "\[CapitalSigma]", " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"2", " ", 
                  RowBox[{"(", 
                   RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
                  "\[Epsilon]z"}], "+", 
                 RowBox[{
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                  RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
             ")"}]}]}], ")"}], "/", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", 
               RowBox[{"(", 
                RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
              "\[Epsilon]z"}], "+", 
             RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
             RowBox[{"\[Alpha]S", " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", 
               RowBox[{"(", 
                RowBox[{"1", "-", "pf"}], ")"}]}], " ", "\[Alpha]S", " ", 
              "\[Epsilon]z", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "\[Epsilon]z"}], "-", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{"1", "-", "pf"}], ")"}], " ", 
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                 "\[Epsilon]z"}]}], ")"}]}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  RowBox[{"1", "-", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
                 "\[Epsilon]z"}], "+", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                 RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}],
           ")"}]}], ")"}]}], "/.", 
      RowBox[{
       RowBox[{"\[Delta]L", "[", "t", "]"}], "\[Rule]", 
       RowBox[{"\[Epsilon]z", " ", "\[Delta]L"}]}]}], "/.", 
     RowBox[{
      RowBox[{"\[Delta]A", "[", "t", "]"}], "\[Rule]", " ", 
      RowBox[{
       RowBox[{"\[Delta]A", "[", "t", "]"}], " ", "\[Epsilon]z"}]}]}], ",", 
    RowBox[{"{", 
     RowBox[{"\[Epsilon]z", ",", "0", ",", "1"}], "}"}]}], "]"}], "//", 
  "FullSimplify"}]}], "Input",
 CellChangeTimes->{{3.821435298192217*^9, 3.8214353046579*^9}, {
  3.8214355693302917`*^9, 3.821435585107111*^9}, {3.823414656898573*^9, 
  3.8234146799866734`*^9}, {3.8234147499354143`*^9, 3.823414753006447*^9}, {
  3.82341478964075*^9, 3.8234148523247957`*^9}},
 CellLabel->"In[98]:=",ExpressionUUID->"51a1284d-46bc-495d-81bc-5a2c8d7a26d1"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   RowBox[{"-", 
    FractionBox[
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "\[Alpha]S"}], "+", 
        RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
        RowBox[{"\[Alpha]S", " ", 
         RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"g2", " ", 
         RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"-", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "pf"}], ")"}]}], " ", "\[Alpha]S"}], 
           "-", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], "+", 
           RowBox[{"\[Alpha]S", " ", 
            RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "\[Alpha]S"}], "-", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "pf", "+", "\[Alpha]S"}], ")"}], " ", 
            RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}], " ", 
      "\[Epsilon]z"}], 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}]}]}], ")"}], " ", 
       "\[Alpha]S"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
       RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{
          RowBox[{"-", "2"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "\[Alpha]S"}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}]]}], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]z", "]"}], "2"],
    SeriesData[$CellContext`\[Epsilon]z, 0, {}, 1, 2, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon]z, 
   0, {-((-1 + $CellContext`pf) $CellContext`\[Alpha]S + \
$CellContext`\[Delta]L[$CellContext`t] - $CellContext`\[Alpha]S $CellContext`\
\[Delta]L[$CellContext`t]) ((-1 + $CellContext`pf) (-1 + (-1 + \
$CellContext`pf) (-1 + $CellContext`\[Alpha]S)) $CellContext`\[Alpha]S + (-1 + \
$CellContext`\[Alpha]S) $CellContext`\[Delta]L[$CellContext`t] ((-2) (-1 + \
$CellContext`pf) $CellContext`\[Alpha]S + (-1 + $CellContext`\[Alpha]S) \
$CellContext`\[Delta]L[$CellContext`t]))^(-1) ($CellContext`g2 $CellContext`\
\[Delta]A[$CellContext`t] (-(-1 + $CellContext`pf) $CellContext`\[Alpha]S - \
$CellContext`\[Delta]L[$CellContext`t] + $CellContext`\[Alpha]S $CellContext`\
\[Delta]L[$CellContext`t]) + (
       2 + $CellContext`\[CapitalSigma]) ((-1 + $CellContext`pf) \
$CellContext`\[Alpha]S - (-1 + $CellContext`pf + $CellContext`\[Alpha]S) \
$CellContext`\[Delta]L[$CellContext`t]))}, 1, 2, 1],
  Editable->False]], "Output",
 CellChangeTimes->{
  3.8214353051565657`*^9, {3.8214355779133425`*^9, 3.8214355854950733`*^9}, 
   3.8234147231572337`*^9, 3.823414753304054*^9, {3.82341484298273*^9, 
   3.8234148529474077`*^9}},
 CellLabel->"Out[98]=",ExpressionUUID->"58670d15-58c9-4343-9b2c-6a3fbaae7e6c"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   RowBox[{"-", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "\[Alpha]S"}], 
             "+", "\[Delta]L", "-", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"pf", "+", "\[Alpha]S"}], ")"}], " ", "\[Delta]L"}]}], 
            ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "pf", " ", 
              "\[Alpha]S"}], "+", 
             RowBox[{
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"\[Alpha]S", " ", 
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "pf", "-", "\[Delta]L"}], 
                   ")"}]}], "+", "\[Delta]L"}], ")"}], "2"], " ", 
              "\[CapitalSigma]"}]}], ")"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "pf", "-", "\[Delta]L"}], ")"}]}], 
             "+", "\[Delta]L"}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "\[Alpha]S", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{
                 RowBox[{"-", 
                  RowBox[{"(", 
                   RowBox[{"g1", "+", "g2"}], ")"}]}], " ", "pf"}], "+", 
                RowBox[{"g1", " ", 
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", 
                 "\[Alpha]S"}]}], ")"}]}], "+", 
             RowBox[{"g1", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              "\[Delta]L", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "\[Delta]L"}], "+", 
                RowBox[{"\[Alpha]S", " ", 
                 RowBox[{"(", 
                  RowBox[{"2", "-", 
                   RowBox[{"2", " ", "pf"}], "+", "\[Delta]L"}], ")"}]}]}], 
               ")"}]}]}], ")"}], " ", 
           RowBox[{"\[Delta]A", "[", "t", "]"}]}]}], ")"}], " ", 
        "\[Epsilon]z"}], ")"}], "/", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "pf", "-", "\[Delta]L"}], ")"}]}], "+", 
          "\[Delta]L"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SuperscriptBox["pf", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           "\[Alpha]S"}], "+", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"\[Alpha]S", "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              "\[Delta]L"}]}], ")"}], "2"], "+", 
          RowBox[{"pf", " ", "\[Alpha]S", " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"2", " ", "\[Delta]L"}], "-", 
             RowBox[{"2", " ", "\[Alpha]S", " ", 
              RowBox[{"(", 
               RowBox[{"1", "+", "\[Delta]L"}], ")"}]}]}], ")"}]}]}], ")"}]}],
        ")"}]}], ")"}]}], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]z", "]"}], "2"],
    SeriesData[$CellContext`\[Epsilon]z, 0, {}, 1, 2, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon]z, 
   0, {-($CellContext`\[Alpha]S (-1 + $CellContext`pf - \
$CellContext`\[Delta]L) + $CellContext`\[Delta]L)^(-1) ($CellContext`pf^2 (-1 + \
$CellContext`\[Alpha]S) $CellContext`\[Alpha]S + ($CellContext`\[Alpha]S + \
(-1 + $CellContext`\[Alpha]S) $CellContext`\[Delta]L)^2 + $CellContext`pf \
$CellContext`\[Alpha]S (1 + 2 $CellContext`\[Delta]L - 
        2 $CellContext`\[Alpha]S (
         1 + $CellContext`\[Delta]L)))^(-1) (((-1 + $CellContext`pf) \
$CellContext`\[Alpha]S + $CellContext`\[Delta]L - ($CellContext`pf + \
$CellContext`\[Alpha]S) $CellContext`\[Delta]L) (
       2 (-1 + $CellContext`pf) $CellContext`pf $CellContext`\[Alpha]S + \
($CellContext`\[Alpha]S (-1 + $CellContext`pf - $CellContext`\[Delta]L) + \
$CellContext`\[Delta]L)^2 $CellContext`\[CapitalSigma]) + ($CellContext`\
\[Alpha]S (-1 + $CellContext`pf - $CellContext`\[Delta]L) + $CellContext`\
\[Delta]L) ((-1 + $CellContext`pf) $CellContext`\[Alpha]S (-($CellContext`g1 + \
$CellContext`g2) $CellContext`pf + $CellContext`g1 (-1 + $CellContext`pf) \
$CellContext`\[Alpha]S) + $CellContext`g1 (-1 + $CellContext`\[Alpha]S) \
$CellContext`\[Delta]L (-$CellContext`\[Delta]L + $CellContext`\[Alpha]S (2 - 
           2 $CellContext`pf + $CellContext`\[Delta]L))) \
$CellContext`\[Delta]A[$CellContext`t])}, 1, 2, 1],
  Editable->False]], "Output",
 CellChangeTimes->{
  3.8214353051565657`*^9, {3.8214355779133425`*^9, 3.8214355854950733`*^9}, 
   3.8234147231572337`*^9, 3.823414753304054*^9, {3.82341484298273*^9, 
   3.8234148529747243`*^9}},
 CellLabel->"Out[99]=",ExpressionUUID->"4b6f66a0-b168-4e7e-966a-ecc51cecc324"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"storedSol", " ", "=", " ", 
   RowBox[{"DSolve", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"StoredEq1", ",", "StoredEq2"}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", "t"}], 
    "]"}]}], "*)"}]], "Input",
 CellChangeTimes->{3.8009713744140224`*^9, 
  3.8012266313868203`*^9},ExpressionUUID->"edc4ef73-d8be-42dc-aa87-\
29d53f5c5786"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"g1", "=", "  ", "1"}], ";", 
   RowBox[{"g2", " ", "=", "2"}], ";", 
   RowBox[{"\[CapitalSigma]", " ", "=", " ", "1"}], ";", " ", 
   RowBox[{"\[Delta]A0", " ", "=", " ", 
    RowBox[{"\[Delta]L0", " ", "=", " ", "0.1"}]}], ";", " ", 
   RowBox[{"\[Epsilon]z", " ", "=", " ", "0.04"}], ";", 
   RowBox[{"\[Epsilon]", " ", "=", " ", "1"}], ";", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"storedSol", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2", ",", "2"}], "]"}], "]"}], "//", 
     RowBox[{"FullSimplify", "\[IndentingNewLine]", 
      RowBox[{"storedSol", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2", ",", "2", ",", "2"}], "]"}], "]"}]}]}], "//", 
    "FullSimplify"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.800971405358223*^9, 3.8009714325155563`*^9}, {
   3.800971475573372*^9, 3.800971624836974*^9}, {3.8009716944357214`*^9, 
   3.80097169589185*^9}, 
   3.8012266361730256`*^9},ExpressionUUID->"31534546-ff87-43c8-992f-\
c3e9731c58e0"],

Cell[BoxData[
 RowBox[{
  RowBox[{"-", "1.7665697493760072`*^-18"}], "+", 
  RowBox[{"1.7665697493760072`*^-18", " ", 
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{
     RowBox[{"-", "16.500000000000007`"}], " ", "t"}]]}], "+", 
  RowBox[{"1.7665697493760072`*^-18", " ", 
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{"16.5`", " ", "t"}]]}], "+", 
  RowBox[{
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{
     RowBox[{"-", "1.`"}], " ", "t"}]], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"0.5757575757575758`", " ", 
      TemplateBox[{"1"},
       "C"]}], "-", 
     RowBox[{"0.8060606060606059`", " ", 
      TemplateBox[{"2"},
       "C"]}]}], ")"}]}], "+", 
  RowBox[{
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{
     RowBox[{"-", "17.500000000000007`"}], " ", "t"}]], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"0.42424242424242425`", " ", 
      TemplateBox[{"1"},
       "C"]}], "+", 
     RowBox[{"0.8060606060606059`", " ", 
      TemplateBox[{"2"},
       "C"]}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{{3.800971410985194*^9, 3.8009714195143666`*^9}, 
   3.8009714713955226`*^9, 3.8009715161936817`*^9, {3.8009715524815855`*^9, 
   3.800971625308688*^9}, 3.8009716965061817`*^9},
 CellLabel->
  "Out[144]=",ExpressionUUID->"303ed56f-37d9-452f-8910-5ac3fa763135"],

Cell[BoxData[
 RowBox[{"0.028571428571428577`", "\[VeryThinSpace]", "+", 
  RowBox[{"3.719094209212647`*^-18", " ", 
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{
     RowBox[{"-", "16.500000000000007`"}], " ", "t"}]]}], "+", 
  RowBox[{
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{
     RowBox[{"-", "1.`"}], " ", "t"}]], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{
      RowBox[{"-", "0.303030303030303`"}], " ", 
      TemplateBox[{"1"},
       "C"]}], "+", 
     RowBox[{"0.42424242424242425`", " ", 
      TemplateBox[{"2"},
       "C"]}]}], ")"}]}], "+", 
  RowBox[{
   SuperscriptBox["\[ExponentialE]", 
    RowBox[{
     RowBox[{"-", "17.500000000000007`"}], " ", "t"}]], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"0.303030303030303`", " ", 
      TemplateBox[{"1"},
       "C"]}], "+", 
     RowBox[{"0.5757575757575758`", " ", 
      TemplateBox[{"2"},
       "C"]}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{{3.800971410985194*^9, 3.8009714195143666`*^9}, 
   3.8009714713955226`*^9, 3.8009715161936817`*^9, {3.8009715524815855`*^9, 
   3.800971625308688*^9}, 3.8009716966368318`*^9},
 CellLabel->
  "Out[145]=",ExpressionUUID->"9173053f-fb7a-4966-9673-89d80482881c"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{
     "The", " ", "structure", " ", "of", " ", "the", " ", "equations", " ", 
      "with", " ", "stored", " ", "growth", " ", "is", " ", 
      RowBox[{
       SuperscriptBox["\[Delta]A", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}]}], "\[Equal]", " ", 
     RowBox[{
      RowBox[{"-", "C1"}], " ", "-", " ", 
      RowBox[{"G1", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}], " ", "-", " ", 
      RowBox[{"K1", " ", 
       RowBox[{"\[Delta]L", "[", "t", "]"}], "  ", "and", " ", 
       RowBox[{
        SuperscriptBox["\[Delta]L", "\[Prime]",
         MultilineFunction->None], "[", "t", "]"}]}]}], "\[Equal]", " ", 
     RowBox[{
      RowBox[{"-", "C2"}], " ", "+", " ", 
      RowBox[{"G2", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}], " ", "-", " ", 
      RowBox[{"K2", " ", 
       RowBox[{"\[Delta]L", "[", "t", "]"}]}]}]}], ",", " ", 
    RowBox[{
     RowBox[{"where", " ", "C1"}], " ", "=", " ", 
     RowBox[{
      FractionBox["1", "2"], " ", "\[Epsilon]z", " ", 
      RowBox[{"(", 
       RowBox[{"\[Sigma]1", "+", 
        RowBox[{"2", " ", "\[Sigma]2"}], "-", 
        RowBox[{"pf", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"4", " ", "R0"}], "+", "\[Sigma]1", "+", 
           RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}]}]}], ")"}]}]}], ",", " ", 
    RowBox[{"C2", " ", "=", " ", 
     RowBox[{
      RowBox[{"-", 
       FractionBox["1", "2"]}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "\[Epsilon]z", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"4", " ", "R0"}], "+", "\[Sigma]1", "+", 
        RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}]}]}], ",", " ", 
    RowBox[{"G1", " ", "=", 
     RowBox[{
      FractionBox["1", "4"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "4"}], " ", "R0"}], "-", "\[Beta]1", "+", 
        RowBox[{"pf", " ", "\[Beta]1"}], "+", "\[Beta]2"}], ")"}]}]}], ",", 
    " ", 
    RowBox[{"G2", " ", "=", " ", 
     RowBox[{
      RowBox[{"-", 
       FractionBox["1", "4"]}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "pf"}], ")"}], " ", "\[Beta]1"}]}], ",", " ", 
    RowBox[{"K1", " ", "=", 
     FractionBox[
      RowBox[{"pf", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "\[Sigma]1"}], "-", 
         RowBox[{"2", " ", "\[Sigma]2"}], "+", 
         RowBox[{"pf", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"4", " ", "R0"}], "+", "\[Sigma]1", "+", 
            RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}]}]}], ")"}]}], 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "pf"}], ")"}]}]]}], ",", " ", 
    RowBox[{"K2", " ", "=", " ", 
     RowBox[{
      FractionBox["1", "2"], " ", "pf", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"4", " ", "R0"}], "+", "\[Sigma]1", "+", 
        RowBox[{"2", " ", "\[Sigma]2"}]}], ")"}]}]}]}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"\[Delta]L0", " ", "=", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1", " ", "-", " ", "pf"}], ")"}], " ", "\[Epsilon]z"}]}], 
   "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"storedSol", " ", "=", " ", 
     RowBox[{"DSolve", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"StoredEq1", ",", "StoredEq2", ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]L", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]L0"}], ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]A", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]A0"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", "t"}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"storedWidthFunction", "[", 
       RowBox[{
       "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
        "\[Epsilon]z_"}], "]"}], "[", "t_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"\[Delta]A", "[", "t", "]"}], "/.", 
      RowBox[{"storedSol", "[", 
       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"storedLengthFunction", "[", 
       RowBox[{
       "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
        "\[Epsilon]z_"}], "]"}], "[", "t_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"\[Delta]L", "[", "t", "]"}], "/.", 
      RowBox[{"storedSol", "[", 
       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8007991388111763`*^9, 3.800799153062045*^9}, {
   3.800799184066085*^9, 3.8007993164731874`*^9}, {3.800799367033923*^9, 
   3.8007993714979544`*^9}, {3.800799407298162*^9, 3.8007994880672355`*^9}, {
   3.800799641066841*^9, 3.8007996597857556`*^9}, {3.800799827112844*^9, 
   3.8007998522655115`*^9}, {3.8007999071785774`*^9, 3.800799932051101*^9}, {
   3.8008001333614445`*^9, 3.800800198128249*^9}, 3.8008564372581043`*^9, {
   3.800856911497927*^9, 3.8008569713139515`*^9}, 3.8008570863313704`*^9, {
   3.8008571946989117`*^9, 3.800857219834004*^9}, {3.800857284186795*^9, 
   3.800857435490101*^9}, 3.8008580829297333`*^9, {3.800864378582368*^9, 
   3.800864404925879*^9}, {3.800864491997285*^9, 3.8008645180535884`*^9}, {
   3.80086457323693*^9, 3.800864578804039*^9}, 3.800864613757512*^9, {
   3.800869687107157*^9, 3.80086970029884*^9}, {3.8008702154574013`*^9, 
   3.8008703030164137`*^9}, {3.8008703792656035`*^9, 
   3.8008703993688307`*^9}},ExpressionUUID->"c5bbbead-f7ee-4834-90f6-\
83aefb80d9ee"],

Cell[CellGroupData[{

Cell[BoxData[
 FractionBox[
  RowBox[{"Log", "[", "2", "]"}], 
  RowBox[{"0.0005", " ", "60"}]]], "Input",
 CellChangeTimes->{{3.818755148292534*^9, 3.8187551641096487`*^9}},
 CellLabel->"In[5]:=",ExpressionUUID->"b97ea138-4e20-4432-8b6b-1c97cf272624"],

Cell[BoxData["23.104906018664845`"], "Output",
 CellChangeTimes->{{3.8187551578243074`*^9, 3.818755166201734*^9}},
 CellLabel->"Out[5]=",ExpressionUUID->"81b8e3c6-5727-4a0f-8308-53e32aeaa2b8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  FractionBox[
   RowBox[{"2", " ", "700"}], 
   RowBox[{"60", " ", "60"}]], " ", 
  FractionBox["1.5", "4"]}]], "Input",
 CellChangeTimes->{
  3.818755093502026*^9, {3.8215603303339586`*^9, 3.8215603955146537`*^9}},
 CellLabel->
  "In[203]:=",ExpressionUUID->"4752d191-64d1-43cd-b1af-5d8fd6613318"],

Cell[BoxData["0.14583333333333334`"], "Output",
 CellChangeTimes->{3.821560396649069*^9},
 CellLabel->
  "Out[203]=",ExpressionUUID->"8f046538-266c-4a73-9290-362324cad048"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Processing", " ", "and", " ", "fitting", " ", "the", " ", "Length", " ", 
   "and", " ", "width", " ", "Data"}], "*)"}]], "Input",
 CellChangeTimes->{{3.8008580691905007`*^9, 3.8008580804154387`*^9}, {
  3.8008736881849346`*^9, 3.800873700457097*^9}},
 FontSize->72,
 CellLabel->
  "In[1147]:=",ExpressionUUID->"2b519a13-4c37-4275-be5c-acd0a7070dd5"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"Plot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", 
       RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
    RowBox[{"PlotTheme", "\[Rule]", " ", "\"\<Scientific\>\""}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListPlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"PointSize", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListLinePlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"SetOptions", "[", 
    RowBox[{"ParametricPlot", ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"Directive", "[", 
       RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
     " ", 
     RowBox[{"PlotStyle", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"Blue", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{
     RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", 
     "\"\<Data 2018\>\""}], "]"}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"importing", " ", "the", " ", "time"}], ",", " ", 
    RowBox[{
    "lengthm", " ", "width", " ", "and", " ", "thier", " ", "standard", " ", 
     "deviation"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"experiments", " ", "=", "  ", 
     RowBox[{"1", ":", "to400"}]}], ",", " ", 
    RowBox[{"2", ":", "to200"}], " ", ",", 
    RowBox[{"3", ":", "to800"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "experimentIndex", " ", "=", "\[IndentingNewLine]", "\[IndentingNewLine]", 
    RowBox[{"Piecewise", "[", 
     RowBox[{"{", 
      RowBox[{"{", 
       RowBox[{"400", ",", " ", "0.01"}], "}"}], "}"}], "]"}]}], 
   "\[IndentingNewLine]", "*)"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"experimentIndex", " ", "=", "2"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"dir", " ", "=", " ", "\"\<Data 2018\>\""}], ";"}], " ", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"indexOfShock", " ", "=", " ", "32"}], ";"}], " ", 
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "index", " ", "where", " ", "the", " ", "shock", " ", "is", 
    " ", "applied"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Switch", "[", 
    RowBox[{"experimentIndex", ",", "1", ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "400"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "1"}]}], " ", "}"}], ",", " ", "2", 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "800"}], ";", " ", 
       RowBox[{"endTime", " ", "=", "1.07"}]}], "}"}], ",", "3", ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "200"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "1"}]}], " ", "}"}], ",", "4", ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "1000"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "1"}], " ", ";", 
       RowBox[{"dir", " ", "=", " ", "\"\<Data 8-3-2021\>\""}], ";"}], "}"}], 
     ",", "5", ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "1200"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "0.75"}], " ", ";", "  ", 
       RowBox[{"dir", " ", "=", " ", "\"\<Data 8-3-2021\>\""}], ";", "  ", 
       RowBox[{"indexOfShock", " ", "=", " ", "21"}], ";"}], " ", "}"}], ",", 
     " ", "6", ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "3000"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "1"}]}], " ", "}"}]}], "]"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{
     RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", "dir"}], "]"}], 
   ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"time", " ", "=", " ", 
   RowBox[{
    RowBox[{"Import", "[", 
     RowBox[{"\"\<time_LBto\>\"", " ", "<>", " ", 
      RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
      "\"\<.csv\>\""}], "]"}], "//", "Flatten"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"avgLength", " ", "=", 
   RowBox[{"(", " ", 
    RowBox[{
     RowBox[{"Import", "[", 
      RowBox[{"\"\<avgLength_LBto\>\"", " ", "<>", " ", 
       RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
       "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"stdLength", " ", "=", " ", 
   RowBox[{"(", " ", 
    RowBox[{
     RowBox[{"Import", "[", 
      RowBox[{"\"\<stdLength_LBto\>\"", " ", "<>", " ", 
       RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
       "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"avgWidth", "=", 
   RowBox[{"(", " ", 
    RowBox[{
     RowBox[{"Import", "[", 
      RowBox[{"\"\<avgWidth_LBto\>\"", " ", "<>", " ", 
       RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
       "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"stdWidth", "=", " ", 
    RowBox[{"(", " ", 
     RowBox[{
      RowBox[{"Import", "[", 
       RowBox[{"\"\<stdWidth_LBto\>\"", " ", "<>", " ", 
        RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
        "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "parameter", " ", "for", " ", "the", " ", "low", " ", "pass", " ", 
     "filter"}], ",", " ", 
    RowBox[{"level", " ", "of", " ", "smoothing"}]}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filterSize", " ", "=", "2"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredLength", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{"avgLength", ",", " ", "filterSize"}], "]"}]}], "}"}], " ", "//",
     "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredLSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"avgLength", " ", "+", " ", "stdLength"}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"time", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"avgLength", " ", "-", " ", "stdLength"}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredWidth", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{"avgWidth", ",", " ", "filterSize"}], "]"}]}], "}"}], " ", "//",
     "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredWSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"avgWidth", " ", "+", " ", "stdWidth"}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredWSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"time", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"avgWidth", " ", "-", " ", "stdWidth"}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "plotting", " ", "the", " ", "filtered", " ", "data", " ", "with", " ", 
    "condience", " ", "intervals", " ", "for", " ", "width", " ", "and", " ", 
    "length"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ffpLen", " ", "=", " ", 
   RowBox[{"ListLinePlot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"filteredLength", ",", "filteredLSTD1", ",", "filteredLSTD2"}], 
      "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
        " ", "None"}], "}"}]}], ",", " ", 
     RowBox[{"Filling", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"3", "\[Rule]", 
        RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
     RowBox[{"FillingStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}], ",", 
     "  ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"ffpWid", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"filteredWidth", ",", "filteredWSTD1", ",", "filteredWSTD2"}], 
       "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}], ",", 
      " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "Solving", " ", "for", " ", "the", " ", "initial", " ", "growth", " ", 
    "rate"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"lengthvsTime", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", "avgLength"}], "}"}], "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"p1", " ", "=", " ", 
   RowBox[{"ListLinePlot", "[", 
    RowBox[{
     RowBox[{"lengthvsTime", "[", 
      RowBox[{"[", 
       RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"form", " ", "=", "  ", 
   RowBox[{"LL0", " ", 
    RowBox[{"Exp", "[", 
     RowBox[{"RR0", " ", 
      FractionBox[
       RowBox[{"t", " ", "-", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], 
       RowBox[{
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "1", "]"}], "]"}]}]]}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"fit", " ", "=", " ", 
   RowBox[{"FindFit", "[", 
    RowBox[{
     RowBox[{"lengthvsTime", "[", 
      RowBox[{"[", 
       RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", "form", ",", " ", 
     RowBox[{"{", 
      RowBox[{"LL0", ",", " ", "RR0"}], "}"}], ",", " ", "t", ",", " ", 
     RowBox[{"PrecisionGoal", "\[Rule]", "Infinity"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"R0", " ", "=", " ", 
   FractionBox[
    RowBox[{"fit", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "2"}], "]"}], "]"}], 
    RowBox[{
     RowBox[{"time", "[", 
      RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
     RowBox[{"time", "[", 
      RowBox[{"[", "1", "]"}], "]"}]}]]}], " ", ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"p2", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"form", " ", "/.", "fit"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"time", "[", 
         RowBox[{"[", "1", "]"}], "]"}], ",", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "}"}]}], "]"}]}], ";"}],
   "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"p2", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"Fit", "[", 
         RowBox[{
          RowBox[{"lengthvsTime", "[", 
           RowBox[{"[", 
            RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"1", ",", "y"}], "}"}], ",", "y"}], "]"}], "/.", 
        RowBox[{"y", "\[Rule]", "x"}]}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", 
         RowBox[{"time", "[", 
          RowBox[{"[", "1", "]"}], "]"}], ",", 
         RowBox[{"time", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "}"}]}], "]"}]}], 
    ";"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Show", "[", 
    RowBox[{"p1", ",", " ", "p2", ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"R0", "  ", "=", " ", "0.000535326853079305`"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Nondimensionalzing", " ", "the", " ", "width"}], ",", " ", 
    RowBox[{"length", " ", "and", " ", 
     RowBox[{"time", ".", " ", "The"}], " ", "normalized", " ", "quantities", 
     " ", "correspond", " ", "to", " ", "\[Delta]L", 
     RowBox[{"(", "t", ")"}], " ", "and", " ", "\[Delta]A", 
     RowBox[{"(", "t", ")"}]}]}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"normalizedTime", " ", "=", " ", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"time", " ", "-", " ", 
      RowBox[{"time", "[", 
       RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"normalizedLength", " ", "=", " ", 
   FractionBox[
    RowBox[{"avgLength", " ", "-", " ", 
     RowBox[{"Exp", "[", "normalizedTime", "]"}]}], 
    RowBox[{"Exp", "[", "normalizedTime", "]"}]]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"normalizedWidth", " ", "=", " ", 
    RowBox[{"avgWidth", " ", "-", " ", "1"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"normalizedLenData", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", "normalizedLength"}], "}"}], "//", 
    "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLenData", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", "  ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{"normalizedLength", ",", "filterSize"}], "]"}]}], "}"}], "//",
      "Transpose"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nFilteredLSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"normalizedLength", " ", "+", " ", 
         FractionBox["stdLength", 
          RowBox[{"Exp", "[", "normalizedTime", "]"}]]}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"nFilteredLSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", "  ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"normalizedLength", " ", "-", " ", 
          FractionBox["stdLength", 
           RowBox[{"Exp", "[", "normalizedTime", "]"}]]}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"normalizedWidData", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", "normalizedWidth"}], "}"}], "//", 
    "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredWidData", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{"normalizedWidth", ",", "filterSize"}], "]"}]}], "}"}], "//", 
     "Transpose"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nFilteredWSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"normalizedWidth", " ", "+", " ", "stdWidth"}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"nFilteredWSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"normalizedWidth", " ", "-", " ", "stdWidth"}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"shift", " ", "=", "2"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"indexOfShock", " ", "=", " ", 
    RowBox[{"indexOfShock", " ", "+", "shift"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"GraphicsRow", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ListLinePlot", "[", 
       RowBox[{"filteredLenData", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{"indexOfShock", "-", "5"}], ";;"}], "]"}], "]"}], "]"}], 
      ",", 
      RowBox[{"ListLinePlot", "[", 
       RowBox[{"filteredWidData", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{"indexOfShock", "-", "5"}], ";;"}], "]"}], "]"}], "]"}]}], 
     "}"}], "]"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"For", " ", "comparison", " ", "with", " ", "the", " ", "data"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"endIndex", " ", "=", " ", 
    RowBox[{
     RowBox[{"Ordering", "[", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"normalizedTime", " ", "-", "endTime"}], ")"}], "2"], "]"}], 
     " ", "[", 
     RowBox[{"[", "1", "]"}], "]"}]}], ";", "  ", 
   RowBox[{"pf", "=", 
    FractionBox[
     RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], "\[Epsilon]z"]}], ";"}], " ",
   "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]A0", "=", 
    RowBox[{"filteredWidData", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";", "  ", 
   RowBox[{"\[Delta]L0", " ", "=", 
    RowBox[{"filteredLenData", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"widthFunction", "[", 
      RowBox[{"g1_", ",", " ", "\[CapitalSigma]_", ",", " ", 
       RowBox[{"s_:", "1"}], ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], 
     "[", "t_", "]"}], " ", ":=", 
    FractionBox[
     RowBox[{
      SuperscriptBox["\[ExponentialE]", 
       RowBox[{
        RowBox[{"-", "g1"}], " ", "t"}]], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"g1", " ", "\[Delta]A0"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{"g1", " ", "t"}]]}], ")"}], " ", "\[Delta]L0", " ", 
         "\[CapitalSigma]"}]}], ")"}]}], "g1"]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"lengthFunction", "[", 
     RowBox[{"g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", ",", " ", 
      RowBox[{"s_:", "1"}], ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], 
    "[", "t_", "]"}], " ", ":=", " ", 
   RowBox[{"\[Delta]L0", "+", 
    FractionBox[
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "g1"}], " ", "t"}]]}], ")"}], " ", "g2", " ", 
      "\[Delta]L0", " ", "\[CapitalSigma]"}], 
     SuperscriptBox["g1", "2"]], "+", 
    RowBox[{"t", " ", "\[Delta]L0", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"2", " ", "s"}], "+", "\[CapitalSigma]"}], ")"}]}], "+", 
    FractionBox[
     RowBox[{"g2", " ", 
      RowBox[{"(", 
       RowBox[{"\[Delta]A0", "-", 
        RowBox[{
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{
           RowBox[{"-", "g1"}], " ", "t"}]], " ", "\[Delta]A0"}], "+", 
        RowBox[{"t", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], ")"}]}], 
     "g1"]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"widthFunction", "[", 
      RowBox[{"g1_", ",", " ", "\[CapitalSigma]_", ",", " ", 
       RowBox[{"s_:", "1"}]}], "]"}], "[", "t_", "]"}], " ", "=", 
    FractionBox[
     RowBox[{
      SuperscriptBox["\[ExponentialE]", 
       RowBox[{
        RowBox[{"-", "g1"}], " ", "t"}]], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"g1", " ", "\[Delta]A0"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{"g1", " ", "t"}]]}], ")"}], " ", "\[Delta]L0", " ", 
         "\[CapitalSigma]"}]}], ")"}]}], "g1"]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"lengthFunction", "[", 
      RowBox[{"g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", ",", " ", 
       RowBox[{"s_:", "1"}]}], "]"}], "[", "t_", "]"}], " ", "=", " ", 
    RowBox[{"\[Delta]L0", "+", 
     FractionBox[
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{
           RowBox[{"-", "g1"}], " ", "t"}]]}], ")"}], " ", "g2", " ", 
       "\[Delta]L0", " ", "\[CapitalSigma]"}], 
      SuperscriptBox["g1", "2"]], "+", 
     RowBox[{"t", " ", "\[Delta]L0", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"2", " ", "s"}], "+", "\[CapitalSigma]"}], ")"}]}], "+", 
     FractionBox[
      RowBox[{"g2", " ", 
       RowBox[{"(", 
        RowBox[{"\[Delta]A0", "-", 
         RowBox[{
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "g1"}], " ", "t"}]], " ", "\[Delta]A0"}], "+", 
         RowBox[{"t", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], ")"}]}], 
      "g1"]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"negShift", " ", "=", " ", "0.0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot\[Delta]Wid", "[", 
    RowBox[{"g1_", ",", " ", "\[CapitalSigma]_", ",", " ", 
     RowBox[{"s_:", " ", "1"}]}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"widthFunction", "[", 
       RowBox[{"g1", ",", " ", "\[CapitalSigma]", ",", "s"}], "]"}], "[", 
      RowBox[{"t", " ", "-", " ", 
       RowBox[{"normalizedTime", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
        "negShift"}], ",", " ", "endTime"}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Darker", "[", "Black", "]"}], ",", " ", "Dashed", ",", " ", 
        RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot\[Delta]Len", "[", 
    RowBox[{"g1_", ",", " ", "g2_", ",", " ", "\[CapitalSigma]_", ",", " ", 
     RowBox[{"s_:", " ", "1"}]}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"lengthFunction", "[", 
       RowBox[{"g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "s"}], 
       "]"}], "[", 
      RowBox[{"t", " ", "-", " ", 
       RowBox[{"normalizedTime", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
        "negShift"}], ",", "endTime"}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Darker", "[", "Black", "]"}], ",", "Dashed", ",", " ", 
        RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot\[Delta]Wid", "[", 
    RowBox[{
    "g1_", ",", " ", "\[CapitalSigma]_", ",", "\[Delta]L0_", ",", " ", 
     "\[Delta]A0_", ",", " ", "color_"}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"widthFunction", "[", 
       RowBox[{
       "g1", ",", " ", "\[CapitalSigma]", ",", "\[Delta]L0", ",", 
        "\[Delta]A0"}], "]"}], "[", 
      RowBox[{"t", " ", "-", " ", 
       RowBox[{"normalizedTime", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
        "negShift"}], ",", " ", "endTime"}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Darker", "[", "color", "]"}], ",", " ", "Dashed", ",", " ", 
        RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}]}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plot\[Delta]Len", "[", 
    RowBox[{"g1_", ",", " ", "g2_", ",", " ", "\[CapitalSigma]_", ",", " ", 
     RowBox[{"s_:", " ", "1"}], ",", "\[Delta]L0_", ",", "\[Delta]A0_", ",", 
     "color_"}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", " ", 
    RowBox[{
     RowBox[{
      RowBox[{"lengthFunction", "[", 
       RowBox[{
       "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", "s", ",", 
        "\[Delta]L0", ",", "\[Delta]A0"}], "]"}], "[", 
      RowBox[{"t", " ", "-", " ", 
       RowBox[{"normalizedTime", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], "-", "negShift"}], ",", 
       "endTime"}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Darker", "[", "color", "]"}], ",", "Dashed", ",", " ", 
        RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"startIndex", " ", "=", " ", 
   RowBox[{"(*", "indexOfShock", "*)"}], "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]widthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"filteredWidData", "[", 
         RowBox[{"[", " ", 
          RowBox[{"startIndex", " ", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredWSTD1", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredWSTD2", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], 
      ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}], ",", 
      " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]lengthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{"filteredLenData", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredLSTD1", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredLSTD2", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], 
      ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}], ",", 
      " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plotWid", "[", 
    RowBox[{
    "g1_", ",", " ", "\[CapitalSigma]_", ",", "\[Delta]L0_", ",", " ", 
     "\[Delta]A0_", ",", " ", "color_"}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"1", " ", "+", " ", 
        RowBox[{
         RowBox[{"widthFunction", "[", 
          RowBox[{
          "g1", ",", " ", "\[CapitalSigma]", ",", "\[Delta]L0", ",", 
           "\[Delta]A0"}], "]"}], "[", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"t", " ", "-", " ", 
            RowBox[{"time", "[", 
             RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}], 
         "  ", "]"}]}], ",", " ", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{"time", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", ",", " ", 
       FractionBox["endTime", "R0"]}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Darker", "[", "color", "]"}], ",", " ", "Dashed", ",", " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"Gray", ",", " ", 
          RowBox[{"Thickness", "[", "0.003", "]"}]}], "}"}]}], "}"}]}], ",", 
     " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plotLen", "[", 
    RowBox[{
    "g1_", ",", " ", "g2_", ",", " ", "\[CapitalSigma]_", ",", "\[Delta]L0_", 
     ",", "\[Delta]A0_", ",", "color_"}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"1", " ", "+", " ", 
        RowBox[{
         RowBox[{"lengthFunction", "[", 
          RowBox[{
          "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", "\[Delta]L0", 
           ",", "\[Delta]A0"}], "]"}], "[", 
         RowBox[{"(", 
          RowBox[{"t", " ", "-", 
           RowBox[{"0", " ", 
            RowBox[{"time", "[", 
             RowBox[{"[", "indexOfShock", "]"}], "]"}]}]}], ")"}], " ", 
         RowBox[{"(*", "R0", "*)"}], " ", "]"}]}], "  ", ")"}], " ", 
      RowBox[{"Exp", "[", 
       RowBox[{"(", 
        RowBox[{"t", " ", "-", 
         RowBox[{"0", " ", 
          RowBox[{"time", "[", 
           RowBox[{"[", "indexOfShock", "]"}], "]"}]}]}], ")"}], " ", 
       RowBox[{"(*", "R0", " ", "*)"}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", "  ", 
       RowBox[{"0", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], " ", ",", " ", 
       RowBox[{
        RowBox[{"0", " ", 
         RowBox[{"time", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "+", 
        FractionBox["endTime", 
         RowBox[{"1", 
          RowBox[{"(*", "R0", "*)"}]}]]}]}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Darker", "[", "color", "]"}], ",", "Dashed", ",", " ", 
        RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}]}], 
  RowBox[{"(*", 
   RowBox[{"Show", "[", 
    RowBox[{"(*", 
     RowBox[{",", 
      RowBox[{"Plot", "[", " ", 
       RowBox[{
        RowBox[{"Exp", "[", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"t", " ", "-", " ", 
            RowBox[{"0", " ", 
             RowBox[{"time", "[", 
              RowBox[{"[", 
               RowBox[{"indexOfShock", "-", "shift"}], "]"}], "]"}]}]}], 
           ")"}], " ", "R0"}], " ", "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"t", ",", " ", 
          RowBox[{"0", 
           RowBox[{"time", "[", 
            RowBox[{"[", 
             RowBox[{"indexOfShock", "-", "shift"}], "]"}], "]"}]}], " ", ",",
           " ", 
          RowBox[{
           RowBox[{"0", 
            RowBox[{"time", "[", 
             RowBox[{"[", 
              RowBox[{"indexOfShock", "-", "shift"}], "]"}], "]"}]}], "+", 
           FractionBox["endTime", "R0"]}]}], "}"}], ",", " ", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Darker", "[", "Red", "]"}], ",", "Dashed", ",", " ", 
           RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}]}], "]"}]}], 
     "*)"}], " ", "]"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"shift", " ", "time", " ", "to", " ", "zero"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLength", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"startIndex", ";;", "endIndex"}], ",", "1"}], " ", "]"}], "]"}],
    " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLength", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndex", ";;", "endIndex"}], ",", "1"}], " ", "]"}], 
     "]"}], " ", "-", "  ", 
    RowBox[{"filteredLength", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "1"}], " ", "]"}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLSTD1", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"startIndex", ";;", "endIndex"}], ",", "1"}], " ", "]"}], "]"}],
    " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLSTD1", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndex", ";;", "endIndex"}], ",", "1"}], " ", "]"}], 
     "]"}], " ", "-", "  ", 
    RowBox[{"filteredLSTD1", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "1"}], " ", "]"}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"filteredLSTD2", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndex", ";;", "endIndex"}], ",", "1"}], " ", "]"}], 
     "]"}], " ", "=", " ", 
    RowBox[{
     RowBox[{"filteredLSTD2", "[", 
      RowBox[{"[", 
       RowBox[{
        RowBox[{"startIndex", ";;", "endIndex"}], ",", "1"}], " ", "]"}], 
      "]"}], " ", "-", "  ", 
     RowBox[{"filteredLSTD2", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ",", "1"}], " ", "]"}], "]"}]}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Scale", " ", "time"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{"scaleTime", " ", "=", " ", 
  RowBox[{"DiagonalMatrix", "[", 
   RowBox[{"{", 
    RowBox[{"R0", ",", " ", "1"}], "}"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"F0", " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLength", "[", 
     RowBox[{"[", 
      RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ".", 
    "scaleTime"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"F1", " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLSTD1", "[", 
     RowBox[{"[", 
      RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ".", 
    "scaleTime"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"F2", " ", "=", " ", 
    RowBox[{
     RowBox[{"filteredLSTD2", "[", 
      RowBox[{"[", 
       RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ".", 
     "scaleTime"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"lengthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"F0", " ", ",", "F1", " ", ",", "F2"}], " ", "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}], ",", 
      " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", " ", "1.8"}], "}"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"widthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"filteredWidth", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"filteredWSTD1", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"filteredWSTD2", "[", 
         RowBox[{"[", 
          RowBox[{"startIndex", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], 
      ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}], ",", 
      " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"GraphicsRow", "[", 
  RowBox[{"{", 
   RowBox[{"lengthConfidence", ",", "widthConfidence"}], "}"}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.800801514797951*^9, 3.8008015520210733`*^9}, {
   3.8008023889325933`*^9, 3.8008024129714265`*^9}, {3.8008024649324017`*^9, 
   3.800802510997134*^9}, 3.800802592901041*^9, {3.800802650460576*^9, 
   3.8008026597636595`*^9}, {3.8008026938768077`*^9, 3.800802697602808*^9}, {
   3.800802743100297*^9, 3.800802779293481*^9}, {3.8008042219531345`*^9, 
   3.8008042273835807`*^9}, {3.8008042618655777`*^9, 3.800804269504449*^9}, {
   3.800808164466332*^9, 3.800808177720869*^9}, {3.8008580592101793`*^9, 
   3.800858180087551*^9}, {3.8008590019840713`*^9, 3.8008590067672796`*^9}, {
   3.8008590612564807`*^9, 3.800859065638748*^9}, {3.8008606220527287`*^9, 
   3.8008606590756645`*^9}, {3.800862043331088*^9, 3.800862047793149*^9}, {
   3.800863139759828*^9, 3.800863144127164*^9}, {3.800866917754052*^9, 
   3.80086698783954*^9}, {3.800868893363325*^9, 3.8008689271319456`*^9}, {
   3.8008695287316594`*^9, 3.800869529852652*^9}, 3.8008737077017117`*^9, 
   3.8008743114123225`*^9, 3.8008744432927303`*^9, 3.8008795024182715`*^9, {
   3.8008810550488105`*^9, 3.800881136245576*^9}, {3.8008812020534625`*^9, 
   3.800881270667889*^9}, {3.800881306284412*^9, 3.8008813498677983`*^9}, {
   3.800881574998382*^9, 3.8008816064931307`*^9}, 3.8008831131949835`*^9, 
   3.8008831576270733`*^9, {3.800888370721471*^9, 3.800888381382937*^9}, {
   3.800888620857978*^9, 3.8008886219749985`*^9}, {3.8008888698457513`*^9, 
   3.800888879477951*^9}, {3.8008895544608755`*^9, 3.800889555301602*^9}, {
   3.8008937007747617`*^9, 3.8008937011567373`*^9}, {3.800894414397944*^9, 
   3.8008944311311445`*^9}, {3.8008970968862696`*^9, 3.800897101595668*^9}, {
   3.800897224946614*^9, 3.8008972263049536`*^9}, {3.800897358133239*^9, 
   3.8008973597160044`*^9}, {3.80089759600483*^9, 3.800897627930581*^9}, {
   3.8008977444747396`*^9, 3.800897844491175*^9}, 3.800897894091609*^9, 
   3.8008981476123314`*^9, {3.800943129261873*^9, 3.8009431316095924`*^9}, 
   3.800943344315442*^9, {3.800943414451747*^9, 3.800943414673182*^9}, 
   3.800943461283464*^9, 3.8009435590598383`*^9, {3.8009439979625344`*^9, 
   3.8009439980483065`*^9}, {3.8009447288169527`*^9, 3.800944728918681*^9}, 
   3.8009450104812136`*^9, 3.800945064192502*^9, 3.8009466723334303`*^9, 
   3.800947900777912*^9, 3.800948372263229*^9, 3.800948741730119*^9, 
   3.8009488793209624`*^9, {3.800948951232521*^9, 3.800948975208392*^9}, 
   3.8009490143366947`*^9, 3.8009490490797267`*^9, 3.800949304864318*^9, 
   3.800949467440298*^9, 3.800949527047803*^9, 3.8009499465906177`*^9, {
   3.8009499776135993`*^9, 3.800949980852912*^9}, 3.8009500898233814`*^9, {
   3.8009503557747607`*^9, 3.8009503559163814`*^9}, {3.800950692221511*^9, 
   3.800950699058218*^9}, 3.80095259991339*^9, 3.80095287838526*^9, {
   3.8009542619028482`*^9, 3.8009542787018995`*^9}, 3.800957826007865*^9, {
   3.8009723110528097`*^9, 3.800972325863159*^9}, 3.8010344799256887`*^9, {
   3.801034561061596*^9, 3.8010346101176834`*^9}, 3.801034674470518*^9, {
   3.801039606508789*^9, 3.8010396066663685`*^9}, 3.801039713997176*^9, {
   3.8011396120511017`*^9, 3.8011396187770967`*^9}, {3.8011397107941933`*^9, 
   3.8011397308086643`*^9}, 3.8063877478750906`*^9, 3.8063879708259563`*^9, 
   3.806388025928646*^9, 3.806388064072653*^9, 3.8063884095650287`*^9, 
   3.806389283434273*^9, 3.8063896863697133`*^9, {3.8063916420446324`*^9, 
   3.806391646033942*^9}, 3.8063929533719196`*^9, 3.806393130988369*^9, 
   3.806394604329237*^9, 3.8063946420041075`*^9, {3.806394674041467*^9, 
   3.8063946906689854`*^9}, 3.8064771095995455`*^9, {3.8064772499392996`*^9, 
   3.806477369945459*^9}, 3.806477409972457*^9, {3.806477824748354*^9, 
   3.806477849132185*^9}, {3.8064779321731367`*^9, 3.8064779512840433`*^9}, 
   3.806496556295988*^9, 3.806500672037761*^9, 3.8065010384954615`*^9, 
   3.8065626449172*^9, {3.8065630632374086`*^9, 3.8065630844417114`*^9}, {
   3.806563121050826*^9, 3.806563134005732*^9}, {3.806563188998689*^9, 
   3.8065631905076547`*^9}, {3.806563275827525*^9, 3.8065632783878956`*^9}, {
   3.8065635565850425`*^9, 3.8065636090919046`*^9}, {3.8065636418363533`*^9, 
   3.8065636422023726`*^9}, {3.8065637114631824`*^9, 
   3.8065637252902093`*^9}, {3.8065638673044863`*^9, 3.806563872955377*^9}, {
   3.806563931394121*^9, 3.8065639641395674`*^9}, {3.8065640305290504`*^9, 
   3.8065640467008095`*^9}, {3.806564083612115*^9, 3.8065640843222165`*^9}, {
   3.8065641194022446`*^9, 3.8065641321172485`*^9}, {3.806564204759016*^9, 
   3.8065642971022973`*^9}, {3.8065643510281067`*^9, 3.806564406957793*^9}, {
   3.806564504336418*^9, 3.8065645175151806`*^9}, 3.8065646499112005`*^9, {
   3.8065647075803933`*^9, 3.806564755371585*^9}, {3.8065648766303587`*^9, 
   3.806564953546697*^9}, {3.806565081095652*^9, 3.8065651049398966`*^9}, {
   3.806565319572116*^9, 3.8065653197945213`*^9}, {3.8065654175790606`*^9, 
   3.806565419372266*^9}, {3.806565608376831*^9, 3.8065656348530207`*^9}, {
   3.806565666899334*^9, 3.8065657088611345`*^9}, {3.8065657526814885`*^9, 
   3.806565804198717*^9}, 3.8065658459341235`*^9, {3.8065659274691367`*^9, 
   3.8065659306994743`*^9}, 3.8065659688394947`*^9, 3.8065661549429064`*^9, {
   3.8065670728009925`*^9, 3.806567081517686*^9}, {3.806649456178996*^9, 
   3.8066494874214373`*^9}, {3.806649562362468*^9, 3.806649565838689*^9}, {
   3.8066496051156416`*^9, 3.8066496062117105`*^9}, 3.8069152864306936`*^9, {
   3.8069153351843395`*^9, 3.806915380233857*^9}, {3.8073636027333374`*^9, 
   3.807363616843092*^9}, 3.8184310786199503`*^9, {3.818431966606423*^9, 
   3.8184319873191223`*^9}, {3.818432035468726*^9, 3.818432044363852*^9}, {
   3.818432326139269*^9, 3.8184323426616774`*^9}, {3.818432413918152*^9, 
   3.8184325147961063`*^9}, {3.818432553157563*^9, 3.818432555283224*^9}, {
   3.8184326583603954`*^9, 3.818432661972937*^9}, {3.8184327457908306`*^9, 
   3.8184327589238715`*^9}, 3.8184328041277213`*^9, {3.8184329586318035`*^9, 
   3.81843296174921*^9}, 3.8184908932631927`*^9, {3.818674269725027*^9, 
   3.818674425861205*^9}, {3.818674475640049*^9, 3.818674483044281*^9}, {
   3.8186749710939837`*^9, 3.818674971227623*^9}, 3.818759468990801*^9, {
   3.818759530400503*^9, 3.8187595653010454`*^9}, {3.819793644146863*^9, 
   3.819793734834729*^9}, {3.819793775002597*^9, 3.8197938031447225`*^9}, {
   3.8197938573482003`*^9, 3.8197938660961437`*^9}, {3.8197938990670834`*^9, 
   3.819793899914565*^9}, 3.819793935249952*^9, 3.821438605323803*^9, 
   3.8214386565897126`*^9, {3.821441047434859*^9, 3.821441126428051*^9}, 
   3.8215143721165333`*^9, 3.8215417855008106`*^9, 3.821542111162733*^9, {
   3.8215555390699024`*^9, 3.8215555391880374`*^9}, {3.8215555939059677`*^9, 
   3.821555593963889*^9}, {3.8222950657295895`*^9, 3.822295078919392*^9}, 
   3.8222953401197824`*^9, {3.8222955426474514`*^9, 3.822295543525104*^9}, 
   3.8224650360533857`*^9, {3.822465067894229*^9, 3.8224650680507917`*^9}, 
   3.8224662455458355`*^9, {3.822466892428357*^9, 3.822466892641763*^9}, 
   3.8224669614589443`*^9, {3.8224680656909704`*^9, 3.822468066018097*^9}, {
   3.822478668566308*^9, 3.8224786916034956`*^9}, 3.8224795244366565`*^9, {
   3.822550617081077*^9, 3.822550689127383*^9}, {3.8225507515953226`*^9, 
   3.8225507941760063`*^9}, 3.822550845859414*^9, 3.8225510538038216`*^9, 
   3.8225526582844105`*^9, {3.822564517570298*^9, 3.822564535081612*^9}, {
   3.822656173149116*^9, 3.8226562017735653`*^9}, 3.822659198715333*^9, {
   3.823081526296893*^9, 3.8230815399668274`*^9}, {3.823082465402213*^9, 
   3.8230824828495293`*^9}, 3.8230825471298933`*^9, {3.823090928842907*^9, 
   3.8230910610705442`*^9}, 3.830501260545348*^9, 3.830502314891952*^9, {
   3.8305233876679907`*^9, 3.830523423001027*^9}, {3.8305234752904487`*^9, 
   3.830523537225113*^9}, 3.8305235933912354`*^9, {3.8305236391092343`*^9, 
   3.8305237694850173`*^9}, {3.8305245520774775`*^9, 3.830524560599329*^9}, {
   3.8305246018280177`*^9, 3.830524631160784*^9}, 3.830524770024647*^9, {
   3.830525209167104*^9, 3.830525234515256*^9}, {3.830760448009787*^9, 
   3.830760459904359*^9}, 3.830760589945851*^9, {3.8307606720053177`*^9, 
   3.830760672244525*^9}, 3.8307609081173134`*^9, {3.831904987235964*^9, 
   3.8319049948166833`*^9}, 3.8319051117354956`*^9, 3.831905144585279*^9, {
   3.832310686133906*^9, 3.8323106939930153`*^9}, 3.8323200223368907`*^9, 
   3.8323241266079082`*^9, 3.832337463426551*^9, 3.8347346719170585`*^9, 
   3.8362872133812113`*^9, 3.836287459906076*^9, {3.8370640626690116`*^9, 
   3.8370641543093605`*^9}, 3.8370642532138777`*^9, {3.837064403181141*^9, 
   3.837064404922982*^9}, {3.83708423446533*^9, 3.837084279743673*^9}, {
   3.8370844488622627`*^9, 3.8370844858152113`*^9}, {3.837084830883091*^9, 
   3.8370848478963385`*^9}, 3.83708490324415*^9, {3.837084949000656*^9, 
   3.837084949584388*^9}, 3.837085134796636*^9, {3.8371451183349605`*^9, 
   3.8371451553763685`*^9}, {3.8371484355569468`*^9, 3.837148462138125*^9}, 
   3.837327774043885*^9, 3.8373278173335505`*^9, 3.837327955963637*^9, 
   3.837328085292635*^9, 3.8377548272693834`*^9, 3.8377549406831293`*^9, {
   3.8377549791781797`*^9, 3.837755014801099*^9}, 3.837755055869211*^9, 
   3.837755103221614*^9, {3.8377551537936287`*^9, 3.837755159577916*^9}, {
   3.837755350454614*^9, 3.8377553650534124`*^9}, {3.8377556633577538`*^9, 
   3.837755695141231*^9}, {3.8377557695395255`*^9, 3.837755769683823*^9}, 
   3.8377558345317297`*^9, {3.837755902245078*^9, 3.8377559188006134`*^9}, {
   3.837755953333625*^9, 3.837755978795576*^9}, {3.837756011911005*^9, 
   3.8377560447274165`*^9}, {3.837756141475232*^9, 3.8377562011521807`*^9}, {
   3.83775625007572*^9, 3.8377562605478573`*^9}, {3.837756317349308*^9, 
   3.8377563273909683`*^9}, {3.837756534788406*^9, 3.837756549672639*^9}, 
   3.837756587318591*^9, {3.837761138988269*^9, 3.837761263548341*^9}, 
   3.8377614125982943`*^9, {3.839753367949122*^9, 3.8397533933409877`*^9}, 
   3.8478714524762573`*^9, 3.848412284273141*^9, 3.850032858533964*^9, 
   3.850038615866226*^9, 3.8510550542319813`*^9, {3.8510554998997297`*^9, 
   3.85105551140716*^9}, {3.8510555691118546`*^9, 3.851055571293085*^9}, 
   3.851319922475998*^9, {3.852457577727803*^9, 3.8524575869121933`*^9}, 
   3.85245762342692*^9, {3.852457678001028*^9, 3.852457705400319*^9}, {
   3.8524588451846247`*^9, 3.852458888476972*^9}, {3.8524589763404846`*^9, 
   3.852458976972585*^9}, 3.8524590177113404`*^9, 3.852459052339594*^9, {
   3.8524591216547146`*^9, 3.852459223853286*^9}, {3.852459267956645*^9, 
   3.8524592731724014`*^9}, 3.852459549609192*^9, 3.8524595978724427`*^9, {
   3.8524596337841597`*^9, 3.852459656653551*^9}, {3.8527018158803363`*^9, 
   3.85270184509033*^9}, {3.8527020326746044`*^9, 3.852702068978935*^9}, {
   3.852914096182513*^9, 3.8529141127692175`*^9}, 3.8529141433588943`*^9, {
   3.8529631378205743`*^9, 3.8529631438119326`*^9}, {3.8529631850764604`*^9, 
   3.8529631921654873`*^9}, {3.852963240556717*^9, 3.8529632915114255`*^9}, {
   3.852963524979792*^9, 3.8529635444955106`*^9}, {3.852964504324357*^9, 
   3.8529645162135816`*^9}, {3.852964797627969*^9, 3.8529648036340714`*^9}, {
   3.8529648902240763`*^9, 3.8529649590997486`*^9}, {3.8529650026562185`*^9, 
   3.8529650092009816`*^9}, {3.8529650428143015`*^9, 3.852965058010373*^9}, {
   3.8529657988939753`*^9, 3.852965800905965*^9}, {3.85296584404657*^9, 
   3.8529659303611436`*^9}, 3.85297127477112*^9},
 CellLabel->
  "In[1534]:=",ExpressionUUID->"1d4e648c-ec89-4973-bd48-400588ed9ecb"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"0.0004470486117636125`", ",", "0.`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "1.`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.8529632680352325`*^9, 3.852963292407445*^9}, 
   3.8529635476042256`*^9, 3.8529645190551944`*^9, {3.8529649034288397`*^9, 
   3.852964947070861*^9}, 3.8529650066668835`*^9, {3.8529650546406784`*^9, 
   3.8529650588474665`*^9}, {3.852965897995962*^9, 3.8529659315069685`*^9}},
 CellLabel->
  "Out[1597]=",ExpressionUUID->"02ed3eb5-05a7-4013-bff7-984f45abc5d4"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJzt2/k/VP/3AHAkRKsWoRRJRFqkTZwWFMpSaVcoJWlBq6VFES1atJC10mIr
kn2ZkFRUIkuJ7Mx+78zYU9/5PN53jj/g++v0S4953HHv6977Oufc13PuUXc+
tslFSkJCYouMhMT//j/vH6ah0VJEO3B1+ZtQNhNkjxUNxNkU0a5scf70qpcJ
N3exKufkF9KWfHE91qbNAqX1UxIT5hbSkq+oj39rxoLoxasuzQt7Sxu4se21
7VYWaKm77UoZ+Zb25J99YJIfC3arah880FFAq1vDnFWcwAJ3gY+Se2E+7cO6
/CmLslng8/lrqUdkHs1o4GhR/HsWXHs268zp07m0EkJl5GAfCx6eP63ttymH
ds+w9cU/DTYkbC+r85+XTZu+KSmGZsGG7IUzgoPksmgP2fd+lTuz4aO81/KQ
1gxawKMenWRfNtS1vqeHFqTTOjSznBrusaErT+VhePgbWvB4MC75yIa+e0ct
Y06k0YwlWM/Wy3Go839NC/l59bvEEg51vqk0xXubHF3XcKjzS6HNsh7JfmXK
oc4nmXZwdogk/QKHGn8izWCk+8S0bA413njaRvd9lb9KONT4ntGWEV5qkQSH
Gk8crSOUXnJzLJc6/mPanBMSUoozudTxYmlG9rUOTcCl9h9B6yn2/unnwqX2
d5927hNt9L0o0d/fobXXWrp8zhd9/xqt0fyf5hieaLs/LfSg0e/4E6LPnjR3
6SZa32M2SFD/UqMlC1xrWaLtUKq54l3aO9Fnf9DlBa7ziBXdr2ugo+7hy40X
bb8Dl2NGOzils0TjA99xxGq9TNH3I0BvaPX7uW6i+RILUz+s6gxbJvr7xzC2
6ZeN4j6W6PrAlROlfxbuEu3vGdxP+md38DJLdH1B37Alm1Yk2n8i6FWtkNlS
JZpvyTDO/NUL/QLR8VLA9bvvyl09ovmcCpeZcZdqckTHfw1XmHnt/MMs0fyA
cUFSUoftReN5AwGHDH0yhZ+p+QVZvADp9AOi8WVAsXvq5kclLNH8hFMuqid2
dorGmw0La7Z1Vybj/IYPSxdMnT08/+FaQLxUegfGB6y5djqMycf4gUPrl67w
+YrxBQtuShvcfIPxB/V9GeTuFIxPaJSsbuKNYoviF5LOJA7+Ps8WxTdsOJqS
9FkYH1T8A8s5NtTwAhuo/AAms2502KwVxUsx3Nx2oX2aFhuOx5t6TpN9B1OG
Yh55hori6x1kKQloSR1scKwgCqfolcAAfbrCtTJRPJaAwrgmMBIez643csIE
u/cg5261n3ZcFL/vwdFh/jfTcDasVrNwUjhVCtHr3uqcqBbF+wfokviacqWf
DYvMulNGRnyAmIdumZfGi+LtI/zyczO+PI4DGu6PJCTefoSt1Q/cakdxqOv9
CT65DchP1uWAYuhG24G2T/DdsHr1IWNR/JbB4U+Kj4/qcGBETn+MYFQ5mI+3
ZdWrcKj7UQ5jS+mzzqlygN/0lMvR/wx7v+vqy+0X5YPPMKC75enurRxok90E
9M1fgFlYd+7cPzZ1v74Aq9HtCZNkw3f9vyGtZ75CupF3gOIUUX6pgP6UVd1R
5znQMteey7GuAP0zhzcNlHOo+1kBc/j3A+4K88kuE10l9+YKgIyFvMRKUb76
Btuu8waCwzhQZScJdK9v4Dbv8cGaUA51v7/Bkf3vg/yjOWDlUnvggEwlxF31
9q+9Lcp/lVDc42Lw4TcHis8kh7SGVcIBDs2pYB6Xmg+VcKhRTu2NAxeMrl/K
cNStgncK6+UveHOp+VEFOoE7Nfx3cuFNzI7GhvwqSFv32vrGOi41X76D7rEx
10+u5oJe2nyZXbbfQfZwkLmTBZeaP9/hvPcyBWsrLsS9H6lf1/IddoTFqw1c
4lLzqRrSl5gUKb3hwrSf9fb2J6vh1UNjj+d5XGp+VUOWlkqrXi4X7rFT/Spl
a2ADc4Z+WRGXmm81sN7xy+/Pn7kwRjLoqc3DGnB99ZPeUSfKpzWw/ULShSUl
XAiYtOdzuV4t/Lwu2enVzKXmYy3IB3PUYRQBQ3MWd1vQauGKy5fNxFyCmp91
8JNHfv5rQMBJI/nppXZ18OZn15302QQ1X+tgb8Psuy/HEcCxbjI1bauDiYzp
6y8Kv//f/P0BeV45MUtuEnDAOcO98NQPmElrZ3eeJKj5/APmz3g3WU+4v8aT
1++ajPoJVQpTpTxXEtT8/gk6377tHOFKwNZg57zcCOH2/lPreH4ENd9/gm3p
AqXUwwR8jVzWtky/Hm4c5YTtCyCo+V8P6zz/ZJmkEbAuZezojLf1IJfe3nvo
MUHFwy+oDbOs6BTuj1bcZmCw+RdUsVTNAoTH+y8+fkGG7/hn/UEELK3N2ZXS
/guYpTvnL6giqHhpgC0qfd59/wh4xbh1ad6ZBvhwXjFnxwiSip8GcNw4e3OY
JAnafw8kJsg3wiSDG7erfhNUPDVCgtnMMoUEAmInGFfNiWqE0av6JGMDCSq+
GuFn/Hv6n48ETJ09cTBu/m/w0hzUV5hKUvH2GwQzH55N0SDh1jK6hkbRbzDZ
L9t6dyRJxV8TaF23PHuGQYD0s71PbeY2gfnr54us/hJUPDbBTp+ZTnb2JLx9
Zbk8xKsJ+GRlc+5RkorPJnBeWZuYv4YEv2zDz+V5TeCku9dXeQ9JxWsTFI7u
dlMVbl9ePNNJQaYZMm16lkaPIan4bYYtikun7VtGQne5QreFTTM8bYyT9jhJ
UvHcDAYjzkVE3yMhtaYnKCisGS5YZBieO0dS8d0M6ybdip9+i4QjTc3TSpub
4WBQuZzBK5KK9xYoSshM8k8kQYdRnjJStwVaw6L5I2JIKv5bYFvO9I1zc0ho
52eamp5oAadJ54xTi0gqH7RAyv5/D73ukPBo6HGdf34LjJXUj3r9nKTyQwuc
UNp3bb4GDxxkQ9wLZVqhqZQIzZvMo/JFK1Tp7mytHyRBZcJZCQnbVkhWb5H1
UeFR+aMV9noyFifN5kGNyv67JuGtEF1kHuzURlL5pBWsv2ycPH0GD+5o2mj7
tbTCHZsPz7bY86j80gbfT4QEtpnwwFp/RV6ubhto5jndbM7jUfmmDVyNrG/q
Mnkgv2y27cCJNtih9aw2+iOPyj9toBbnouXiz4P3q8e3LStog5a8tumC7Twq
H7XBQxufqpjrPPC3Gjx9WrYd3Bo6La7H8Kj81A7BXnVvpznzwMS+QyHDth0K
Z2poyt7hUfmqHXZOPSj1sI4HA3u+xQjC2yHPQV9uhSyfyl/tYKukuTKliweZ
rnkGBq3tELbLxdZIOL7/8lkHzFsmyb3dxwMvz+elHnodcHzdEtft/3hUfusA
+rNt85aO4MN83zu7Uk52wFt7gdvORXwq33VAnrmXo4fweMwAPy6noAMOWXz6
ET3Ao/JfB0jfNwgfJc2H5zddL82T64ShnPaYDnk+lQ874WCc/zfCng/7wjcr
udt1wpkQhup1fz6VHzthR1J01Fw/Psx4YpKY8FD490tmLzZJ5lP5shMKd1w+
FlnEh/okHaC3dkJv2bRH8u58Kn92gX/Zl6Ldp/jwIGNS1Zx5XWB/5r3p9T98
Kp92gdTKiUky7/iw5e2/AwdOdYH7mPV264Xj/S+/doGZIxh+ecSH8Z8YA3G0
LmCYbJIfpSqg8m0X7IueohT1lw/lVdUhrXJ0mOU9+dHbLj6Vf+lw65/v1q/T
BRDU8FZDYxMdYmW+NsqNE1D5mA4397zvs+/gg2lnYoZjBB0OdXKXq68WUPmZ
DufhTM4cPQFIkPctY9rocMNqwvviRQIqXzNgoYXXsiZfAeQNXGxsmMeAJNmZ
JffXCKj8zQDawUyd9VcEcEb6iOe00ww4OGVDwNSvAiqfM2Bo2yNJd+HnxWO3
y+x6ywCnz5JW0dsEVH5nwMSj2SETZARAKq19GD6KCWstdp7yE27/L98zIctD
I8jxrEAYd/r6dZuYMGH1soNVhwVU/mfCyPND3V9fCeCQrnLRlEgmKL2qCdIX
fv+/esCE38VdV7SPCWC2ofRW+3YmLI8WTPn1RkDVBxbk9bosj84WQLMJlx6q
zwLXxEj7K/8EVL1gQXPntmWcTgFErf/pV3maBY5VV2j14QKqfrBgaFa/z65o
AezYVDJhQiELvD+mOSRrdFP1hAXtTF+pzgYBTN6d8tRGng2Nnw1N0kIEVH1h
g1Xstc7jNwTwzSViechmNky/qJW9dIeAqjdsuBzQ5R5C50PIscDP5ZFsaHtQ
+tbGUUDVHzawMs5Ga/8SgOVZDycF4XPsu6BZcT17BVQ94gjzcaZOnfD+y1za
3W0xX/gcpd8meUk4v/6rTxxw3OB4M3aeAIqurwsOOsOB0vyHBx2CBFS94sAh
BQ/7yzsFcO7+oumlhcLtmtryj4Xx9F/94sBQVeU4O5IHK2Knp45U4EJYLPEk
YjSfqmdcWGtmPGZNHB964uXMTLdwIXdASybAhU/VNy7kbDGIi/Hlwes0fp2/
cF3YnzqiISCTR9U7LnDUs3MnrhDA0fxG98IOLggGD98dEyCg6h8BeQt3fVA5
IYB7rfslJKYSYLWtyVr6qICqhwTkG21kvNHuBi/XnZYxwucO2r9jH6ysu6n6
KKy7U/RXBtYLwI5tc9fEiYCRrPWvuHkCql4S8CRltv69fQKY72nW2CB87pBq
3GGcUCag6icB9b3P5b16u2FM7wptP2GdPzzx3dgDF7qpeir8nFtpFGguAJbP
As9pXwnYrtmxP6qNT9VXAuaV6gZ/shWI1i80r419E73LWegbVgnK55urWegb
Tfu+7xkhi+sjWtHLNzPpimz0jQm8kjEOUmz0jeNrZ3luXsJG39jPm1JGCNcv
It9Y8jTWaY0zG30jUq47+bwrG33D7rhfs9YTNvrGzD3z1nWUDfvG2A2prgHd
w74xXnrizJ4xHPSNsLlvpJbqc9A36H5zU4M3c9A3/CrMx4QK1w8i31jSMLa4
qGjYN27FvwILKS76xp+H64oD/wz7Bo0WvmkTc9g3xjVC8Ax3LvqGhu1Fn1tf
uegbMvu25cVc4KJvnGzNHRVyj4u+4eJ6lrchZ9g3pm1k2hanDvvGQJjAty9v
2De8k49e92we9o3QlHWPfKYT6BsKSy03r51PoG9k35I41TWbQN8omPUq9czH
Yd9odf98NFa4HhL5xm43Qc+LYjb6hsFub5UdpWz0jYSWpGcHbTjoG1HnbfNW
5XPQNzSeZ7WOX4HjgxubRx2foIjjh1COp+WrLA76Ri+3tkBvAZ4/nJXz4D/z
x+sDKuXLkz+Y4vWDs3brnxV+QT+CljT1SY1GeP3hw7fFSTzh+kPkG/xYyTvW
egT6hqTMUDvnKYG+cXi77lKbNi76xgPVc6Eyf3B+QFq3umLmZi76hvGjuSti
jnPRN7it/REHV3PRNy521FiOnMFF33jROZ5zbjEXfWNg9m+9BG0u+kamenrf
WVUu+kbm38wnznZc9A09f9/v7Q+56BuBusyTdd+56BuqEz2mef3kom9Ena6X
OCC8vyLfuHZDiuGawkXfcBoXnSQo56JvXK86KN9QzUXfMLzl9uf5Vy76xoun
k9bGyRLoG6bqIy01JxHoGwu+faNdHEOgb1yWnhBwWXi9Rb7hUVy7o0WFQN/4
Jtt3ljWeQN9ID3GHA9MI9I05qq38WuH8FfmG4vM1A5ETCfSNH50lywWjCPSN
Xc/XmV1UJ9A3Rub+OCetR6Bv3D0tUSGP679PUMJ3NGdbEegbf+I9AxO2Eegb
hZziqHFmBPpGfmXy8aGdBPrGeyi4tSqMQN/gWb+b8cCDQN9w3x7mHuxAoG9c
M3A7vfECgb6RIVMt5RxKoG+E59n2OoYT6Bt/9if6870J9A2p+7s7v54g0DcM
0x0sPu0n0Deq1rRqp5kR6BvTZyc/vCysCyLfiLhqG9rZRKBvLNk0ZE8K64LI
Nz49bK/wryTQN1q17OebpRPoG1a7X89Rfk2gb6j9VFkv30CgbyxYybD5MoFE
3/j3YFZ5dwuBvnHcfFGMfyOBvlFGK1DQ0yPRNwoeW6e0CNd/It/4xHrn5buB
RN+oaIyLy1Yk0TeMGvnz340j0Td2bhloVdEm0TeM02fo71xIom+0H/O0OqlP
om/8Kfokf3Y5ib5RsjfoIwkk+gZEjlCe6Uyib1TyBkLCDpPoG5XnBtOfBZHo
G6qCb2s8L5HoG88T5l10PE6ib1w+Zzu5x4dE37jq13vhcQOJvjFiinzXDS6J
vuGzwCfLKYJE30jXzGKWEST6xrdFnmSVEQ99I9/ByLB0Lg99gz6HcWfzFB76
RsaIKSG+/ST6Bq+kNMOHT6JveAYFTbfrI9E3Fhx7/JZtxkPf0HDIqXjpyUPf
uPDd/bbXbh76hv6ThL5SFx76xrKM8akjT/PQN2iye/bYHeGhb7j80u9OiOeh
b7ws6V5aUMJD3zALqHYJes5D39hr3sI+7cFD3zCsLvKx/cxD31Bieyrcn8JH
3zD/tW3k6BYe+kaEDKPwunA9KfKN6iWh23+089A3jqhD1kw2b9g3spQd83p4
6Bs0weyy8YM89I0TayozPnzloW/oXP/ZcuMFD33D+gZXb8YQD33j3AmXAwpO
fPQNqYqdx5kX+Ogbi/2aG3fd5qNvFATu+5wcz0ffsMqdo9mTzUffaOi0alz7
ko++odg4Zw4p/HuRb0T41OlcCuSjbxwOKd33NpqPvhGmmK8bGMtH35jzXS5t
wk8++sbG0IW13gN89I0UixDpOAkB+oagKqqix06AvkHeKD05c78AfaP/7XOp
RbIC9I2LX6d3vNAWoG+sZNcLTB0E6BtWvhX1YQcE6BvlN/Yz954SoG+sSLm1
yTpFgL7x+tOgQrWfAH0jV+JlsJtw/SHyjdJAUqtfuF4S+cYe2Zqq0c4C9I0z
Fz0CnW8L0DfMn/2TeFwnQN+IMAiXqxSub0S+Mbu6cuOeLwL0jfOfX09w/iBA
31A7o3k6W7kbfUNi4f6C9ae70Tee9y42ct3Rjb6RbusfEr2lG32jn813cHHp
Rt9wfzWU7SF8nhf5hu7UrYw9Kd3oG38V9x7LSe1G39ilvHHvkdvd6BsfBnRW
RN/pRt+IvtSXebWjG33jisLXFDXdHvSNFVG3rmoS3egblmbFZ7cOdaNv6AxO
7qjQ7kHfmPmsiHV5Ug/6hvoi5aT2nm70jTAYtV5hcg/6BqnZVc5c1oO+ofZK
OnifUw/6Rs6iGQF7bHvQNxLHs60nWfWgb6h7Xzpm7NGDvlGkGrM2vaIHfePp
y/X3nuj2om8Qy99PTBvdi76x/d2cnHCiB31j5hvLkmO5Pegb60ryP6yN7kHf
CB+KuJTe0YO+obpXxui+Ui/6xqELzumblvSibyj+W1JVb96LvmH/zstKZWUv
+kZBAlNAW9uLvqFdoXMjJbIXfUNTY/fSa8W96BsPXqzZfpjoRd/IpTVOJl/3
oW9cNh17VyqsD33jzrTkA7sGetE3YqeOr9Qge9E3VGUWf9Jf3oe+8cFu/Jkr
vn3oGw+t3Wv3vulD38i9XPVuZ0If+saGf6E7Xur3oW/Ula3JcjfsQ98YEfx1
oolwfCLfyIkuSw3a3I++QZzPenkktR99Y2LIy6kPlvajb7SGFh472tOHvpEf
3GlyWqIffeOx2t73c1f2o288Dd1dtt+xH33j7eQN3m/W9aNvlH7g+jYt70ff
2P1s49hwlX70jcT47CDbGf3oG8smvFGVqOhH35Bb5Lbj/ugB9I3zo+yV1tD7
0TfalnDMv1kOoG+Qtvu3rloxgL6h3M+IA0Y/+oZ6q8e+OJUB9I33XnaP764f
QN+oOa+4rKSzH31jxO8lSVc39aNvjDYbn3uxoQ99I2315nJ15370jS+syAKW
8LPINyS2PN5QxO9D3xh1pCfgy8x+9I3Ysw5HH60aQN+YGsX6eCJzAH1DyT+X
JTAaQN/ItZl8aovhAPrGo+96Lb0Kg+gbr9WG2POMB9E3+u4kpQX9HUDf6Iwz
enxyziD6huI6yeelRoPoGylaDcG3Jg2ib/w8tufputOD6Bvr6NZZgu2D6Bvz
VRrTjhQOoG8M5Z0yn282gL5h5OY8Z4vVAPrGzlLvLcljh9/feP83YfI55eH3
N0KWDZ0vsWSibzxwDPl3/wwTfaNJh77VNIGJvlGdG/RwZAkTfWNDKM33XhsT
fWMX40eZ+vjh9zcamF01VZrD728s88jS/mo9/P7G6DHh8sre+Ps3TXf785r+
KPx9nKZVOzX8SSb+fk47NXW53awy/H2d1lpmpriwDn9/p921XXqkd+Lw+xtr
Zn28+mUjG30jWOHAoaxDbPQNrZsOQxZBbPSNq7+OXxkTzUbfKHT/dfb1PTb6
xtqcrYnVT9joG7dPHutSVhh+f+PfH12DBKvh9zdcaDvCK5056BuLIyanOYbg
+p92dkKOyYciDvqGx89A7WA6B32j2oCoWSQx/P5G2mpJzUnTh9/fsHIfcrAI
G35/wzWxdHT9jGHf4EXwxtsls9A3ZKvGBmgzmegbu9n9R8YWMdE3UiSdurxJ
BvpGetHtldH3Gegb7Q8ca1IXMNA3jpbVTFy3m4G+8U5hwppnqgz0DaPY+HEj
V9PRN55krk/yW0tH3+BPs98Q4UFH30iTzRwavYKBvuGT8XjvIwsG+kaJ1Og3
RXfo6BvLLHfNezuLjr5REfkvqS62C30j8pxahcNtOvrG2dzBpc31dPQNV5VW
Um0bHX2jfOGqvK8r6Ogb/pKKR6Su09E3ZPnXdhu7M9A3VrfOHjB8yEDfOBhY
kT+4iIG+8XNj4tKK4wz0DYfREU6yvgz0jW13PXeTGxjoG7Yul/5O/0RH3zBX
CLNIDKGjbyh732nZ/ICOvrHw1PNa330M9A1Bc5Zl2SKMbxg9qt+6wB7jH+IM
a+YWL2Cib8wdJMy3CeusyDceuvcsIWcx0Dc+b4ssblZgom+4ab0/aXuCib4x
YeN1ZzsnJvrG8bEV16LkmOgbz3PyLV6/YKBvnLgclvOjkoG+MXn14J6Xl5jo
G9MWKXK0fjPRN4I7zNqkG5noG8kB6n7/3jPRNwJy9Q3DI5joG6M5i4JtCpjo
G6lKJaf8ypjoG1syo+QKPjDRNyb6mPbmnWeib9wZu03LR4aJvlEv/3VaC+a3
z6D2/LTHM5KJvlE0rWGs818G+oZ7iu7qifkM9I3lfzdN29fPGPaNB3Pbtwif
E0S+sf3d9Jot+D5OBXT4eJ65K6z7It/42RF5h1Rmo294frn6Vv4XE30jxuzJ
iwYXJvrGcc07LhpRTPSN17919sWfY6Jv5MSoy8nYs9A3FmmqnrDsZaFvPJD7
lbhZko2+oR2Te2LfNxb6xqZfR5KmclnoGwFSEnsnV7LQNwr2REmEzmWhb9y+
5aU39J2JvuGq2qn/ZIiJvjHJa5TgQgsLfaM/5a7m8/Vs9I2k64Eqyjps9I2e
FsGhp8L8LvKN8p6dJYnabPSNqBWyCfHCzyLfMI+JW8VYyEbfMPhg91XvPQt9
Y8LiMSkZTBb6RoBWseor4f5FvtGZfO/jrzg2+obqKXfDFVw2+sbnI1LqjGg2
+oar9wvrk5dY6Bumvvts6RwW+sbgEf4YJRku+saUNK0m2R42+oaakt4Jueks
9I1KL3rU8kgW+sY3gafZAS82+kbz71eSFdIc9A2H2wbc8lI2+oZN/AttliYH
fSOHkeQ8YzUHfaNeWcPEUnh+It/YkWOrlmXCRt8g3FVmBdSw0DcOBc5cUm/I
Rt9YMP6VhJonB30jOMVf8noSB32jxGvPGcZFDvpG91zGBdtMDvrGHTjutieS
g75h6j64OGQMG31jhNYgsZnNRN/4wXGLrN/HRt+4d3nqsomvOOgbs6esMRxH
46BvqFnHqCqu5KBvbHzbo3koj42+Efl702KFERz0jfOuDVPepHPRN/K2lTXR
FxPoG2SNn33WeC76xpV3qZo2GRz0jb931Mruy3DQN06bTtEonMhG36g1mlyz
IISNvvFvhOmnWicO+sY4Y8dUXj8HfaPmUHDQlBoO+kbbjpubjhtw0TfeST/Z
ZXWei75RG7B/1193LvqGca6rK6uUg75RXDQxMI3PQd+YXVDP8h3FRd/4wSj8
1PSUjb6xo0s7OLiGjb5BHlGbNM+YQN9Y9bZ4dYUUMfz+xveUJ+2LuegbaiGd
B3Miuegb7clNf4h4LvqGdEL/efoCDvrGjydg/OkCF33DNbql2MSKQN8oLNla
HlPKRd9gHGdbZiiR6Bs7uueGCUxJ9I0jzza8jMgh0DeeTFpk2jeHQN9YZcGu
n1jKRd/I/Lb2XoMtgb6RtSZx2t7ZBPqGunt4YHM4B30jL1RNZcM9LvqGRJPV
qXu7CfSNC59dX4+NJ9A3DM9bFnCE+xf5hpwJ3X3+Oy76xi6HJ0cPAYG+ceXk
DI+1Rwj0DfnNATMrhOsIkW/8nkNMn3uOQN9oGzF/ZpDwfES+Ed49Qkd5JIG+
UdDxJCtPnkDfeNTtltb3g4u+8erxmozdDwj0jW+M3GuLxpLoG6rKi/kW7QT6
hoKFc8QtdRJ9w0Vaemv1LBJ9w8BFJT/jCoG+sTMwZcnTRwT6xrVTo1Tqr5Do
G6a7r0zankmgbxysC1H5mc1G34gIzNpKX0Kgb5zN9t15xoxE34gPanH9tJpE
3xjSP3LW2IBE3wiS3KND30Kib2i9fODvI0Oib6SvnLtyx30CfaPo64vYA0Yk
+kZ8jq+O4TQSfWMPa8mDUuH5i3xjeVFe6zgHEn1jMbt10+NCAn2jXUtvUFON
RN+YfCRbAEwCfePk4cXHqoXjEfnGgnNb5ze/IdA3goqdrSRUCfQN9+sXNMpP
EugbibcXhy0/RaBvXDGQ7jWfRaBvbDo7Z87/ft8Q+UbzHuWsl8UE+kZHbsi2
thcE+sbxNGUV70wCfSPfVqIwbQaBvvGr5sKf2I0E+sbL1ZLbzYTrWJFv/Fa0
HmdhTKBvGBXIZ4Nw3SzyDdsTct3zR5HoG7NNo5Yf2kWgb/QqgPT+RC76RjTX
Ok5KuI4X+UZ+5t/SpPlc9I3sIv3HYQfZ6BuaxhllJs1s9I3o04qlJ7dx0Tcm
jW9z2prMRt/4MnqEcsFIJvqGudKHndf6megbGyCRLyV8XhH5Rs2CK7V6LDb6
xlRz9QldwvWoyDc8Q32yhgLp6Buc2w0d+jPp6Bvr+x4pHxbOA5FvxN62jnxX
zkTfsJngHLGigoG+QU8I6u2X70LfqGKru3pHdqFvnLmrozj6IAt9Iza9Jn/D
Uxb6RmFR97qL29noG2/yt9q4bmSjb6SZ1be1XuWgb4QVlphVFXDQNzwW7Q2W
9WCjb5geSDpTFcdC33BZfNetZAoTfSNubnLzlZFs9I2G8+Sx6NME+sYsH89P
L2246BsbskOuGD9gom8cUEqUURKuJ0S+sWo9o/piEgvE/Sni/hRxf4q4P0Xc
nyLuTxH3p4j7U8T9KeL+FHF/irg/RdyfIu5PEfeniPtTxP0p4v4UcX+KuD9F
3J8i7k8R96eI+1PE/Sni/hRxf4q4P0XcnyLuTxH3p4j7U8T9KeL+FHF/irg/
RdyfIu5PEfeniPtTxP0p4v4UcX+KuD9F3J8i7k8R96eI+1PE/Sni/pT/T3/K
/wEoWODD
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"], LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
            "]]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0.5},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{37., 1.5000000000000568`}, {28.000000000000114`, 
       12.000000000000071`}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 20],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.14752604188199211`, 1.0550347237621256`}, {0.5, 1.8}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {0, 0}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJztm/lfjev3/zOlTEUlEZIMhyiKQnhRKJQ4lSikgaQ0SJKieR52tatde1d7
oo7p5AiVqciQUAih6GQqhSIq4/d8Huda5/1HfHe/9Hg+rvu617WudQ1r3Xut
Cc7e69z6ysnJ2cjLyf3ff/o7tG242U2nD4v/JR2UzBoTfHwgsSFS7uWd8lQg
XoQh/k8XuZgQm+H2e0OnRkNiC8y0EfetXUFshXP1YWV8P8aha7HmZ5HnTAtq
t4HjgOlzX82ndjtc394xQfA7tW9A6pOoVXUrqd0B5dccjptso/bNEBdsy5rr
zRhO6M3sbCx1pee3wvbW6Ns6vozLnVE/WDnPLpD6u0Iz2lt0P5H6u+H6hkJ5
pRTqvw3WHUWmK0Kp/3b00130IuQI9d+Boe0nj6jVUn8PGMWt6Zx+i/rvxFZx
Fg5UUX9PvJk/x/7jC+q/C43DXf0/1VB/b3xQVv5WfJ3YBwk6KwfUNjNu8kEF
J9kioZ3e74vaFZlVZwd0/Mtaflh4wrV1YS/J88NmRKveGcTanXbjxZTMk8f3
knx/SDcVL21b8+5fFvqj3HiWv49xO5O/B4oH9tpPX8u4aQ8+t2i+HmDHODQA
TRdGv1kSxFhrL15//PnwRADj8r3w7/s1kkfsFIi0P05FNAgZy+3Dsmeai9uy
GQv3wVizIKRyAckPQuOuQpdVS0h+EGpf6/cvSyD5+6FVZXvDr5TkB0MPXtLb
1F4ejP0PtuoYuJD8EJS0a40ODiX5B9B7259/uoLkH0BVSN2UmVUk/yB6V54L
0Cgh+QdRsy/mdUoStYdigFFqcA7pwwmFo1ut6vkX9HwodIbyvXPbGOuHoTza
eN2lpzT+MESlO2/61J/Nf20YWo0G+sz4SfqEIz1cRzn4FWOfcNTc2ye+Mow9
Xx4O2+8dH31WMFaOgPJPed5TdcZOEbBZFa/xsB/jogioNyZ0tFkzlovEgxQz
ryN7GVtHYl/B5B+BjrQeIrGQY1BcbMG4IxJNk+aFCpYxRhSenTgbfNyPMScK
s8zTtb12MG6KwoulpeNub2OsH40y1ZJ41VTGodHg2XeUKbmS/tFY5x5cHxXM
WCsGr3Ijqq78xdgnBtWzf1t215/0j8EHA0GcEclTjsW+M7ycESLSPxaRz1+c
O5pC+sfCcEOkS1IW6R8HrVgLqeQc6R8Ho+pLvmtqSP848I0FRablpH8c5Hs/
ma0uJP3jMWX5zMJP1J8Tj8ahgxdPf0P6x4Nz4laGazXpn4AYh4hWpQrSPwG6
H/w+HK4j/RPg/T7VZM5V0j8RCg4zb2rKvWf6JyL22JXFJmMYlyfC6/xktZVf
SP8kaB8a9/3RW9I/CX+1GryV02DPFyXh6ciUub7DGMsl43PbjXqvNtI/GQVR
Ss9zFVm7MBkzjcZCfh7jjmT0XDpYO3AzY6Tgk4qT97RdjDkpWJecW2u7nnFT
CrZPilk3wILxKA5G1404aLGc+nPw57GPS523MXbnIE5vsWm8Lb2Pg74Vr/UU
vBiXcFA9veZxbDC9n4O7OSWblu5krJCKQNMFPNUwxvqpmB80osKC+tunQmV7
qfNQZ8ahqdhx2dl6KJ9xYSp8r6W5jSxmXJsKo07L2m23GPekYtSXGaseNjDW
SoP9+CtPF91nbJ4GpVNDXkXXkb3ScPDklJUaVxjz0rD15NHwcx1kvzTojTXr
MR7DzuOWNPwyd846p85YOR0ji8Tl640YG6fjwh+/ktNHMnZKx8LFU67YKTGO
TYeFVYfVCbp/i9Kh6W30qmQd4/p0nI77fNdyJp3/XKyyPqYbQPf9VC54NoVt
HdqMrbko2SJ17Z7HOJCL7kUKU/zoPhZycb40WqXTk/ENLoKyDnSkiBl3cHHf
xHZH6p+MR2WgcFxaSDe1IwOx7xbveJfJ2D0D54onzg48xZiTgc5llrX3ixmX
ZGCXhqW8cRHdhxmY0fEqPTuDsUImNmxIKrxRyFg/E/FndAZNfszYPhMeGuN3
FXfR/ZmJ74f6bbC8w7gwE+qX6venBzOuzUT+0d19tKMZ92TCTWvUVM+TjLWy
ENg0MdSK/AfzLHxtEAyZRv6OTxaKSr2aep8y5mXhsMfxyPoeup+zsGn9uj+e
fCL7Z2GQc0Jj92B2XyvzsKVDdevYIYyNeXiddWFIBN3/TjwUu8xZH1JN9ufh
nUY7R4H8jyIeql9vLZ1C/kQ9DyUebS6z/iL7Z0NQeDOm9SrZPxt1gW9UbBrJ
/tmoaCy7mdpA9s/G4dMfdJ5Xkv2zsXvgae83X8j+2chuDRjWPpGNtyMbbRF7
LBIHMh6Vgx1LPlxo7ccYOVA8v3LbdtLPPQcToprGHVZgzMmBg3v7n587yf45
UKuK17hH8ptywJ/k2M47R/bnw+bGxFJDatfno3le8+j4M2R/PkoXKI4X9Gfv
D+Xj/WOhwEeTcSEf8Qp6tnfekf35GB17QXcUrZ8ePgZv7pw/k1hLAHO/a8bT
ic0FiPZVd0gi+/gIUHHPV9JE8ngCJCX5KfVTZ1wuwMguu23dKoxbBHh58bJl
51Cyfy7i8j6XXRhG9s+FVVRQ6HGaH6dcfOSKawbJM47NRfOwOcN/fCP752KH
ikVwNc1ffS7eCZzfLqb5kctD9/agljO0nqfm4ZtUbszv4WT/PNyIc32jResp
MA9XT3INJqgxecI8rPmqEn6rL+MbeSjmK7WvpvXckYeWXz+e9NJ6HpUPu3W+
deOUyf75uNsp99y+g/Z/Pi6bHVr+iNYLJx97Ss0DnEn/knzoLh/UL4PkNeXD
NKDl+B7yp/sL8Umi8uf3PiRPCMvAX0P0aL3pCrHinsm7KJovCKGlWzKRN5yx
jRD+c7O/OZH/7P7P88HLux/R+4KFyJ2bl9dB9uIIUVXbXTCXxicV4pWpnuUX
Ok9KhFDRle/lkD1uCVEdVHekdR6NX4jPrQ7Wb39j3CWEkUllyqLJjBVEKBrg
XWyrzVhThNFjsmadJtYXoWxSybV+tB7MRLh1bGVy1zNa7yIMM9W0DKTxeorQ
EOEQkDmH1r8IfmcFRtqKjLkijM+Mbuql9Vkows4Tz79YrmV8XoQYldlGIkvG
tSKMKazsDDBh/FKExU55q3NUGfeIMHZzXHb+RzaeIWKMjFyI+SMoXhHjiPzw
J+tpfg3FaB55tyaO4h1zMRSXXXqvpsTaHcVwsGrkc0iejxhRA1a56NN8Rorh
P/kpP62FzlsxvOv3L/lB59MxMTaHp+51I/nlYng5b17TQ/NXJ0aQgZrTVD3a
j2I8ffDrXvB0xt/FWFVZp6FB61NZgr47pt42MWWsI8GNquLZk4iNJdBSLCuJ
o/GtluDqw8TzrTSfThKkRazrfDuTsb8EXGWv+KU0nlgJpjebLZITsPELJKh3
XWqulkr7W4I+il3308h/qJTgL89tZ1cNpf0uQf/6Z+EmHMbtEviE6g/r0Wfv
l5PiVnW6WelcxqpSXB/p92PHFMZTpfAZtdh2vAtjEym2vdn06FAeY2spPlZb
tUovMXaVotWmwE0RjAOl0BvcfqSd7rtEKUo9Ck+Hk/2EUkRdOMRPX8O4WIou
jdFxMzbQeSLFwXwdtQU03gYpfnzc7ysYT/eLFH03dU2Sp/b+h7A9NiXcn+b3
n7/SrIOGHduIdRB2pkk6g9a/nCF+vjseUmpIvAhfJiRdfbqM2AxXY+6/ek/z
I2cBV9vA9RuNia2wVmf986MbaT+txcSsP5xX0/6Qs4GcblVMlhG122FWj472
hAXUvgGz2zSu8C2o3QGuE8cFVHpT+2acGDNuy4koOq+ccKC+aZ3Cdnp+Kwx2
/IjYto7WszO+dDXXbLej/q542GtnuJHmE25wuddsGk3vD92GCO/qutubqP92
LDPYJCp0pP47oONk/4f7QervgZnRQyKfH6D+O6EmUdt1dh/198TVi84CnVTq
vwv3F744puJJ/b3hotQQst6J2AdHxsyPE4fReeiDrve5L+yD6f2+GBzbePkE
93/fN47k16v8SiZ5fnh0euOPHnq/0244zxN//aP1f983dlyLDWyOpHjGH+Ps
JFcu3KT4bQ9alc4eXnyY4rU9GLGhYFcVxX+hAdj5bOgyvYPk7+8F9j388vd+
8t/3ItNnaLufGmOnQEzq13P0xUSKr/bhaJzBeS9Lkr8PVoLhT+d8JflBiBsz
ffTNHpIfhJPeQzj6v0j+fszOC66pmUzyg+Hs8HLspv/iv2CUNS3y+NhO8V4I
fNqO5a7eR/IPwMKw3wguxSfCA5j5Rty+i0vx10H4rJ0c/JDir6aD6Ny75ral
MrWHosdQz/0qyeeEojDleWYY6d8UCpUv9+7U21G8FYZ+0/hX7JdSfBWGzIrL
oVbeFE+FYfeTyce+u5M+4fh90cHBOn4UL4VDZ4ar2+ijpF84DhcdFGiWM1aO
QOrWosTeTTTfEVi1M2DRswUU30bg95f2Vc8qSf9IhE90DLEbQf5MJEw32dlM
vEnzEYniTwmTcihe7IiEcfCmcf6FpH8UdiXHPJ+rRvFIFPx2556+Q/FSUxQU
81qvaHaS/tFw80ydVUbnb2g0TOd5/0wqJf2jsfGPQYcrn5H+MThdJ6fZRvGc
Twy+qKoHabaR/jGwKUgpvdWf4sFYVMwJ3S8YRv5/LLYWvHUw7yb9Y2GwQlfU
8JX0j8OjHKE7fxbpH4fWvuUJt9aQ/x4HFeVfiiFm5K/FoWqT1plXcyg+i8f4
O4ZrUin+5MTj7ds6ecPNpH88mkqO7fQn1k9A5rlF008Thybgz2wP1yZ38qcT
YBrWsD/AkfznRITPiRBIyR/1SUT0yY1DHt6l+CgRV5Zpb73rQfonYcGkiu9l
FO85JSHQYOD0+W/oPkxC0pnrum6ltP+TEWWZeuG2OemfjMWGkdmxO0n/ZCxw
HCcuqCD9k/Fg9vab45pI/xT4Dg92XUPxGycFK1Y55S/PIv1TELB03bRaIcW3
HDROMTkvvU39OUiaqmp0oZv8SQ5ctISPJdfofRwE/Qry0L1J/iIHT337VObS
+dXEgaNv/3O95L8rpGLo6YkJy+l7r34qmsbJZe2geNY+FVoDtZ650/fe0FQc
6VO5JIT8ncJUzJw54LMH+S+1qZDTvuhxV4P8tVQsKNiDyml03qbh+ILMsEFT
GZunYVPGuG/7dcj/SsPe5PQDveTf8dJgUn7UTpHux/I0nGn2L3T7g/ypNLyY
mTGU60D+Uzr0PyrE+ZO/YJyOteu+GqzaTOd5Og53Hh87je632HTMPdupVOPF
uCgdF5YrtI3byrg+HedvjHjZSf6FHBcuPMfBZ+eTP8NF0tukhBn0fmsuON1b
fn2l/oFcrPOqdrxqS/4JFyOumvpY0H17gwul7i8TxhaQ/8FFRWy3xuTTFG9k
4Fpi182aQ3S/ZaAhNsYs9QTFtxlI2/3wp0klxQ8ZWHUxdJ5WMcU3Gehz/omG
+jW6DzMQO2JZvFwbxQOZmDfIdtJE6q+fiZMvap0XnGJsn4ny5QY5tU/I/pl4
LLq99Md1sn8meop3uA+j+7k2Ew9UWn83TCD7/9Pu5J6UcIbsn4XrI25i3m2y
fxYmjTndNFpE9s+CRtu5h6vuMuZlwfYHf7r9V7J/FizSLTkTvpH9swBBqSRQ
uZPZn4eaSSoLjNUYG/OgkWLVOqaZ7M/DOMNJ257ReGJ5WFjtWXJSSPbnITfD
58Xn42R/Huo1OtZ5nCP7Z2N+deDz6TfJ/tno/NI843It2T8bBekd6WPryP7Z
eLFhgqSnm+yfjS12nmfiZrDx3ciGwwTtk6enMe7IxvHq2vfr2sn+ORjyZGOD
Jc0/cuAZ9XTF+g6yfw5UPmyM/NFF9s9B1JhrL7X+JvvnoEFrRsuZB2T/HDT2
HTW4i9oV+Ng7i5u/8xHZn//Peu1cxKf1Ys+HsteaDXE0nlD+P+tpTqBSC9mf
j5X6AV+uXST783FKet31Fa2PHj5Mpmwve1RP9hegKrR46gQaj7kAmqe+2u2n
9egjwEJt08aEj2R/AXgF8aV/DWfzUy5Asr6K6puBjFsEuDewaHgbza9yLhLP
Lgv5oEj2z0Vk4+njejR+p1zcazbP9KL1EJuLD9ondf5+Q/bPxSlPk+3vSX59
Ll602Jc9KCP75+GB8lCr0Bqyfx5GZ8de5JD9rPPQsS93rMYYxoF54AQs3jm5
l+yfh8q/l1Vpkr1u5OGj+zTHbBpfRx763+pM1CR9RuUjTHFxTPMQ9j7k490y
+8axpL97Pu49mzz73HjGnHzYnOVe9aT2knzE6mU+rH5M9s9HxZakoWG3KL4R
InL2OVMLsucoIfIfKL4rf8pYV4iMKR7fPjbQ+hNi/JmPlbG/GNsIsU5slKBB
43cXIuZ+83VXag8WYoVE+3T8MBqfEDU1IxPk6H1SIerdLJ4doP1UIoSeXutn
9RXs+VtCVHkkj5nEYdwkhPFQ3eb/9kuXEIOucNdy+zBWECHjtyKr32i9aIpQ
t8PepUqHsb4I7+/ZLEjtZPLMRNjIGeAjpvPIXoSnK5YdH0DrwVOEIXGJ3ZK+
rH+oCOd2N5jofmDtXBFW2isoy9N5UyjCVajLH9NlfF6EERt99HPJHrUiDJev
8UhVZfxShGuls24nGDHuESEqYeqhC8RDxFi8xCD5rR5jLTH6f/3Q5xWtJ0Mx
vH40GX3tz9rNxRhww/GS+hTGjmJcUt24acvvjH3EWBXc0+i2g3GkGI+mreiO
/2+/ifGjdVzxzUbGx8QYNtazW5/2Z7kYkkGJr81fMK4TwzD68mxTGl+LGBc/
L/fMIv4uxqj1y7ojVOh8lmDwlkUeFQGMdSRQemfE8fWg/SqByiWLD+r7Ga+W
QD9tS7lWNmMnCbbNW/n4WzRjfwmC+d0t68cxjpXgQ7La8qt0fgkk8LjVPV9I
67tIgi/Trino0nlUKYHfrVUhDrQe6iVwjpf0fUjnU7sEZUvebwyaw94vJ0VO
V+f0OVGMVaXQ27upXHcp46lSqDzvPZe7hrGJFCM11Z0GCul8kELsNVX71SPG
rlJcvKfqdXounRdS8I3+7g2h+UqUIjk287CVL2OhFN3DzgZNEzMuluLUoubp
/jSeG1IotjSpLzBl3CBFi6/8pI12dL9IET73itq1BYz7H8LHDf1fryd7/PP3
KHfi+OJP9HumDvy++J/4JSU2hHbV3zu3FRAvwkyp4OOwd8RmUL5zuavhG7EF
uD9+t2sbR/GDFe662555rkfx3FqsvzNMtbKbnrdB6V9XHPny1G6H6c8zf33W
p/4bcOHZI2XfvtTugJLl+3d1ULwqtxmv1FN9lO9TPOyEnuAJI11oPKFbYXpt
flrwQoqHnHFtxkZBoym93xXxo2Y9+UjxK9xwbVhC1PDFJG8beH2qGz+aUf/t
CO2siDhCv/fJ7UCd+qm+G0XU3wMj5KOf8HKo/05k/ex3KCmf+nvCrEe6l3+I
+u/C8MI+KZeuU39vqPdz/1p2h9gHl4Zr9Wy8TPGyD3imf1e7NtH7fTFFKU8Y
9o7iQT/8NnbU0RD6/bDcD7cyXNYvX0vxzm64j4x3Pzngf983XnY9H9I1mvIX
/OE85pLOxMNvmfw9mN5uNEj9O+OmPagLTNu0tIFxaABsc6fE2exhrLUXyZ5T
zu73ZVy+F1bc12MvPmLsFIifa7wdHoxtY/L3oXG2/GX316xduA/aAhOt30NI
fhD0L086fiuO5AfhwybbQNNRrH/ofih3zaxQW81YKxhfdb5MW0TjLQ/GwpuR
z3Y/Jvkh6POem3k0hrHcAfyx/bXOoz9J/gG4qcq7vPtB8g8iwsza11GRvb/p
IE7sv/Tr7iDGCIXyvE8c79GMOaFQWVCR9mUVPR8KAx0XZedQxvphOPjiQdOk
PTT+MAS49Z3Py2FcG4bNGW8MNqeTPuG4e61Ktc6esU849gWmPPf0Y1wejn7m
zhZX7zBWjgAnZ5Pkwl3GThFwmp7XdbuacVEEnj64qN7bQPMfienfdTf9JLaO
xPHOL4fuvGcsjESV7tOlNcPZ+uiIRHyNanNlM+kfBcuaNxo6taR/FDo041IG
k7ymKFS8id0XQu/Xj8aQC89e7FKl/JVovN/ruzd1GOPaaFhOeT9oBa1HrRiM
2i6/V2BF+SsxyLNeoBz9k/SPQXx54QbxbdI/FrOMTpbGGlC+TiwK1BvHKE1l
/H/5GzsbJi0ypPydOHjs+fj86DLG1nGITr+0/h7JE8ZBe+u89YNMSP84LOFe
v/8XjQ/x0L84pY8dKH8nHnf1l+zV9qH8nXgskbZfsqF8KP0E7Pt2vcBjIumf
gEKz/UFe1L82AbkOK358mkH6JyIl9HE3l/KZfBIRX6C7W+xK+UmJGGkwvepy
GGPlJChMCv7WtZj0T0J7vtMf11eS/kmYutcOIZTPJJcMt3i5rqHJpH8yhj3K
0TlVQPonY8IIzWeuRaR/MkZb8h52UP4RUhAw0ixoQB/KX0nBlrtP+rhR/lBT
CuwUzgfN72TPj+LANrR1yfuL1J+DO/p3rQY+YOzOwYlFz475vKT55CA2fN3n
F0rsfSUcXHgl+LCbuImDFZWecgn0vEIqHmrqjRZ003yngvtAp+2314ztU/Hm
0mxFiz9p/lMRErZwrNZw9r7CVMTqj/nbbgPl06TCO2989TQ3xj2pKMn1UdOh
fCOtNNhe31DsbsfYPA0uCxruqzlRvlEaYurOqc1LZ8xLw6rmX+tdfSn/KA2f
/PPyD1O+V0saFhrmqKwJpHycdNzeb+B9je5b43Q8PDHoDMeHvtemQ4//ceWG
IMax6Zg080fIxVOUr5SO89abuwxeMK5Px6ewq0/PNtP9ycV97/ylB7IZT+VC
o86wPDqO8nm4sKqNvdnzJ+NALswk+7gbWim/iQvb1qjlawaz++YGFw+hlPuK
8ok6uJjsfi7vYRfjURm4OnGB25r/vl9nYGOVj0VJLWP3DNiG52wLeEbrKQOW
Stkztveh/J0MNJS9rF9C+U5NGVhxbonKbFvGCplYnOcjv6qK8qUyUXyowOrB
KsrfyYTNoUcF1w3o/syEmYKnrnAI5e9kYoHqs8mDHpH9M5Gmp+bw9DPZPxMP
DmyZU0GslQVX/qkD0w6Q/bNwOKJm/Tgx2T8LurkuKo70fZ+Xhbwn2n/J/SD7
Z2FKrOJsv07GLVkoWFM28z3lVynz0LBnxrAB5B8Z8yAY/mz5HVX6fs3DzC1a
zQt/YxzLg1Puz6Lj9D29iIfN4uajLrMZ1/NwUfRlQvJ//ls2Kssk1vvJH5ua
jap+ircmUr6XdTaMuFyvFvqeH5iNiLOCfrdpvQiz8Ztzqt+5NMY3snHCJeuR
2Xz6Hp4N60BD84RllL+Vg+S1AxcPdiD/JgeWr3YrfrCm/K0cbJl7yy/XmH4v
yMGx7NWZf0wg++dgt/U557m0PppysG9Z7GULWu8KfJyeMd4g7THZnw/t7L/P
Nj5nbM/HDdXoqk2UjxbKx5kP6uES8t8K+Qgp8r0wjPLTavmovdaW4qZN+Vt8
CLxU+xynfDotAX42T9RSVaD8LQEeBc9T0CF/1UeABPkl9z1mkv0F+PW6+OZh
0q9cgPnec3yVwLhFgPdtR1Q+rCD752L44FWd6lPI/rkw3HjgsN1Ksn8uJif3
DLf+neyfi9ZHAx8bTSX758LLUmNaGa23+lwou6s41Y0g/zMPy088MfSqJPvn
4Zp6R0kknY/WeTgxPjldyZn2fx56Ht/vNqL8N2EeTk2q3NND83MjD+FuN8dv
H0r2z0POdtV1J5aQ/fNhM3eF6Rn6PQj5qF6/tl/APdr/+XC2XXHmNdmLk48Z
e3sti6aR/fMhKv2++Tyt76Z8DJpxBq0zGPcX4sq0ekMnI5InxOc5bzfMp3xA
XSHe9467OMuJ5Aux3Oxb/zU03zZCLJt6pSl5NK1HIZRW2lhmkn2DhWhJN1A+
TvuJI0SU5GTc41DGUiFGnq9ufE/Pl/wznt558h/dmT63hBCqzfF3vE7rVwi3
JPWQhevY811C3PR4w7+bQfmIIvCuOBj2385YU4SLvKO/ltB86oswrHOutN2E
sZkIr4zjTaRkD3sRwoNfP35Avz96irDxh83b4Xdp/Ytg9aXUVZ/yKbkivC5Q
dH46h/aDCDrG1jXP6fek8yJ8yn6zf+UU+j1GBAuuf2fJDdb+UgSfoSN5a+m+
6RFhzqGKlit7GA8Roz4p5aUK3R9aYuRPdnXNGM76G4rxdnaT3njKhzUXQzPS
1GTqe8aOYrQrVRRH0HnuI0bI2AV3P1P/SDHmdU+xUKL4kCfGm4bS0W5kr2Ni
bKjx+mCwm/afGN7+W33W0O+BdWLEVtSMHkP7v+UfeTt9d1daMf4uxjfnG4GO
dP4rS9D5SsfJZzxr15Hg52qXIydp/RlLsPGwTf/uD+z51RKcnuvv6/bf770S
HOSfHlF8nLX7S+A4+Or6jS/pPpcg8PDmjj1HGP9f/oZ+xui3lH9dJIHqeYfM
29Fsv1b+8z7M8W8yYlwvwXJ+gNxtyndul8DywKvwNnva/1L0LttZFkT3r6oU
FzyH7rGi83+qFFkShcYlFF+aSOHrZpEbS/UW1lLE2rx1qrJi7CrF9BO7z5el
0X0hxYwCNedG+r08UYob2f5xXkp0fkgxrX7qvt5e1l4shedbya3bG+g8kaL9
eK1OAN0nDVJMbGnef+Eu+RdS9B+4yjPRnPb/IZR4zVmkTf3lZPUpsvoUWX2K
rD5FVp/yr/6y+hRZfYqsPkVWn0L+u6w+RVafIqtPkdWn/C9/Q1afIqtPkdWn
UH6frD5FVp8iq0+R1adQvCWrT5HVp8jqU2T1KXQ+y+pTZPUpsvoUWX2KrD7l
X/vL6lNk9Smy+hRZfYqsPuXfdll9iqw+RVafIqtPkdWn/Ku/rD5FVp8iq0+R
1afQ91xZfYqsPkVWnyKrT2Esq0+R1af8f1Kf8v8A8Ck6tg==
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"], LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
            "]]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           CapForm["Butt"]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0.8103053921223266},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{37., 1.5000000000000568`}, {28.000000000000114`, 
       12.000000000000071`}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 20],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{0, 2690.}, {0.8103053921223266, 1.1152087530416357`}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.8529632680352325`*^9, 3.852963292407445*^9}, 
   3.8529635476042256`*^9, 3.8529645190551944`*^9, {3.8529649034288397`*^9, 
   3.852964947070861*^9}, 3.8529650066668835`*^9, {3.8529650546406784`*^9, 
   3.8529650588474665`*^9}, {3.852965897995962*^9, 3.8529659317534513`*^9}},
 CellLabel->
  "Out[1603]=",ExpressionUUID->"8af4a428-5b06-4d09-a6ae-7d344e3dc700"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8529655220622363`*^9, 
  3.8529655922042036`*^9}},ExpressionUUID->"d71728b0-bb6d-4bc2-be67-\
513f59f1b88e"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<Supplimentary Figs\>\""}], "}"}], 
     "]"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"Export", "[", 
    RowBox[{"\"\<length-vs-time-400mM.pdf\>\"", ",", "ffp1"}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Export", "[", 
    RowBox[{"\"\<width-vs-time-400mM.pdf\>\"", ",", "ffp2"}], "]"}]}], 
  "*)"}]], "Input",
 CellChangeTimes->{{3.823081613554905*^9, 3.823081618316155*^9}, {
   3.823081656843399*^9, 3.8230817003154783`*^9}, {3.8230824692129126`*^9, 
   3.823082470371182*^9}, {3.8230825310533876`*^9, 3.8230825363316956`*^9}, 
   3.832320042543483*^9},
 CellLabel->
  "In[1457]:=",ExpressionUUID->"3f2b79dd-3de0-4045-97ee-3c86bbb8eb40"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "compare", " ", "fit", " ", "with", " ", "data", " ", "given", " ", "a", 
    " ", "set", " ", "of", " ", "parameters", " ", "obtained", " ", "from", 
    " ", "minimization", " ", "or", " ", "otherwise"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
       RowBox[{"g2", "\[Rule]", " ", "5.9646572643958535`"}], ",", 
       RowBox[{
       "\[CapitalSigma]", "\[Rule]", "   ", "0.22596007807663557`"}]}], 
      "}"}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "3.2244841497907073`"}], ",", 
       RowBox[{"g2", "\[Rule]", "5.65593039165689`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "   ", "0"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"gRule", " ", "=", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"g1", "\[Rule]", "4"}], ",", 
        RowBox[{"g2", "\[Rule]", 
         RowBox[{"-", "5"}]}], ",", 
        RowBox[{"\[CapitalSigma]", "\[Rule]", "   ", "0"}]}], "}"}]}], ";"}], 
    "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"gRule", " ", "=", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"g1", "\[Rule]", "4"}], ",", 
        RowBox[{"g2", "\[Rule]", 
         RowBox[{"-", "5"}]}], ",", 
        RowBox[{"\[CapitalSigma]", "\[Rule]", "   ", "0"}]}], "}"}]}], ";"}], 
    "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"gRule", " ", "=", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
        RowBox[{"g2", "\[Rule]", "6.9646572643958535`"}], ",", 
        RowBox[{"\[CapitalSigma]", "\[Rule]", "0.22596007807663557`"}]}], 
       "}"}]}], ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g1", " ", "=", "  ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"\[Delta]L0", " ", "=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "0.141"}], " ", 
       FractionBox["shockMagnitude", "1000"], "\[IndentingNewLine]", 
       "\[IndentingNewLine]", "\[Delta]A0"}], "=", "\[Delta]L0"}]}], "  ", 
    "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]A0", " ", "=", " ", 
     RowBox[{"filteredWidData", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";", "  ", 
    RowBox[{"\[Delta]L0", " ", "=", 
     RowBox[{"filteredLenData", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\[Delta]A0", " ", "=", 
      RowBox[{"-", "0.0763190321896964`"}]}], ";", " ", 
     RowBox[{"\[Delta]L0", " ", "=", " ", 
      RowBox[{"-", "0.1173791507165423`"}]}], ";"}], " ", "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"storedplotL", " ", "=", " ", 
     GraphicsBox[{{{}, {}, 
        TagBox[
         {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
          Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVz2s01HkYwHEcpS2R25Zdkspqa1vNEOXS44RORrQuLZVbSjrS0hGLNttu
5bK6K0WcmopRMkLIGp5IFBNmxlwY83ObGcbiv8mgWtrdF9/zef21jIj1i9TS
0NDw/q//zSwNMnZZuAh6MrniaEAddnvIrjXlXwKWl0X470frcA05pL/b6TKY
Drtn5SbV4XO940v9k66AdnOcrDa/Dt/X7Dhr9+Eq6GsXn2+S16GlqW8iIz4b
fu6LiFfHczBVmhCRGHUbLAxN94xfrkezp2HmI9ZMYGu0aSbXIAZt1B3OUZRA
3/nouEqTJmQmemalz1TAyXqTT9lLmtHJVPm1yWANZK6x7TQTvsIce7sHPvb1
YKcV2hZb0orrOTVb7Fc1woXUzs07Pd9gyFffL7vT9hIK2U4vGv5uww2mBsxj
cS3Ar5rbHpfMRYvH0X7Fo69haGht20T3W0ycM/vsktMOYYwM7oJjJ36QeLR6
fNkB8i2aYzedu1Cn9ISV1L0LxOf5zx7wunAnV35kRy4PfLQ4iz1jeJhtt7Ki
V8QHYdn9tb/O8PDGJ/U/ljbd0OA3O+Kaxsd+w6xC89+EMJJe9q5luQBd46UH
/TgiuHOlZepWugB96RJ9uqEEYpP1Q6x1ujHJ8SqP4dsDRpVTxoyUbtzLnL6q
V9ILCyfCdNe978bYIH122oIU2v2dazceFWJhkELi4CQDT6fVZRc6hJhVE6V5
4zqB4/trxdXOIkwPK3T4VtAPvXtpp/SYIlSWcCNr0wagiN77wEVTjOHifLYt
bRC4hx66BEaJMZLFSGV0DcJD99hKdrMYm4o6uNW/DMG2uxPeKmsJundsZsxb
DYPZM8vwjHQJ+uZF+wy8HIbTDJMD0C/B6ptneKti5aArivJROPdg0dafpBN6
ClAu11Z+kd2Df85vNy4oUYBb5YG8CGUPfqOWtjP3KUGt9QbLoBfNrx1c6jat
BK2F5JxF13sxJri8dfu9EQhI/qPdc6wXd3Hly966joLxRelgj5MUPY68T3Uk
o8B3K/I3zJJi/iZJ3HyGCsLkxnSnASmm3spTBW8YA5n1o6qlNn34nG47aCAc
AxNu1GzzuT5cOVOkw0z9C+arOvi+oj7UDJ17xjUbh5DLFq3ctTJ0U1sMer8e
h0u7RiZpCTJcQbO6cfzYBBjRbnuzGmWoeXNR4uFFk8B6pZ9gq0uQsYEjelo2
CfVn991jBRNcHf5DQ54PBXW3+jIOsAi+U23yD/elQNDk6cUqJtgcrzNqFUDB
y90zi6cfEYxObzAo30/BwH3j6EtPCFaxv4tsPUKBlWtuP5YT3DO/RHc6hYKT
dwMz13EIpuQ17vdmUXBXHSBXdBH0Xl8wafiYgphDNnwan+AadtI5yRMK+kzO
1Z4REGxptCk9XEFBSE7BKRMRQQNVgUZKPQVzhbx8dynBYocUVpGAAsuz7dVM
BcHTjfucY0QUiMqNXCaUBH28aDxaDwWG66Y420YJToeOfuQQCvo1kx91jhF0
TfvRR6CiQBw+uHWeImi0gj58e5yCoR16mbvfEVTmLk8KpShQifuF2VMEL5Y2
M1XTFNxPSgreqCYY5nDPvmyWApqFW07CDEF64+n2Ux8pSGioffNilqC2V2C4
4/x/P1ZkZtkHguJuuvrzZwqE6yvMAz8S/Bf2e6hr
           "]]},
         Annotation[#, "Charting`Private`Tag$206744#1"]& ]}, {}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.58, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.56, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.54, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.52, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.48, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.46, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.44, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.42, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, 
            {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->All,
      ImageSize->{59.41176470588198, Automatic},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{All, All},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";", 
    RowBox[{"storedplotW", " ", "=", 
     GraphicsBox[{{{}, {}, 
        TagBox[
         {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
          Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVkH081AccgFn1sSRCcjUmG6XSytVY5+XbklZniHQThkJKRe3nbpe4Vba7
DBESUnNrh2V33qYjL9+UDzaXMW+ni+vy0p3kR+4UeVn74/k8/z6fx/JYtE/4
B1paWh7v+d+JQr/VzgvJsERTYhfnVI9dbv3XHualwDoTVfcuaj2uHzhqsN/x
KrwI3tg8u7Eeq/RP6R5ipwJjzvc4z7gep8QuF3fOpEE1Jl5pHa1Dy7XeLDqR
AUtDOVYLOXXIkTGPsSKyISEsqGjpu1o0Kw02f7GRD3SXvRUHm2vQb7PeYNZw
MYhTdtgL/KqRzzqQxJsuB0+vxFzaPjE6rh35yEQhhsf+zJmhk5WYZb/zjqd9
HYwb0nOfX6tAq1rxdntKA9BGCyZqFsvw23Wfrbj59yNQXH+9f/l3pWiz1pB/
4mwTtEzvj+eZi9DibqRPkbIFan7zIXQfFCPrrdmic1YrmKUtNMaf+B1npG7N
bmvaoDPhiW3lyULUEZ6xlu1thylKUdTgbQHukQyFueR0wBT5j3y29w5m7DQt
f9LzLzAoy2/7+/6Kme80c5bbumDOv3q9pCsf5UZJAvNL3ZAnatK1mLuNuwlZ
gE9tD5za03NAVZGH3lSpAdVICpOM/pUm53KRTUvroHv3gdfwqtCBhGz04qvT
9IufwFP5zUnbvCyM9jMQcRdkEOV0bPt5ZSYK/IalDo794MvofmrJzMAkcYR2
ZvoAnP0h5j5zWTryggUOmzrlsO1G3XErSRqOFEvCq7nP4KL05p3A8FQM6c0T
7bBTwC8imvALhxQML6Rz6O0KSHamtHECkvBhQZvkXtxzKOW8jHjwYyLubdtK
n7ceBKGX/MsZOQ+9cyM9nz0ahMoIzlWn81y8dz2+gxI9BPqWGaxqk5+w4PMo
2Sv9YaAwzv0lHEnA+/O7Vt8qHoYA54UM557LuEEja+UfHoE3sTrVI82X0Pxa
gK6regQcS63ZDMVFPB1Y1rwr/wUY19Icx2d+wH2SoRWPdyuhfTt1OiqGg25h
UxzagBLCJi87uK6Jx7wt0rPzV1SQKei+q7h/ATk3clWBNqMgeNuqYafHYhV1
h8KwexQKsqWT06fPo+l0gQ6f8xKG6On97sfZqB309k+J2RgkMVMPG3K/R1eN
hcKjZQyU3TUR/EIWrrKzzjx14hUMcfXSS1VM1L6+jBW6bBzU/q9d77kwkW5T
21NaMg4bmsvYjZkx+HHIwfpcTxJYEXpbk5fE4KRqy6EQbxKOprTvs9COwUZC
R2ntS0L7V9buFQsERvLqDcuOkHDlmbnRwAyBlSLb8OYwEthnclJdJgj8ev5D
PXUsCcCwebe5n8DY3IYjHoUkpEdSbErEBHpY3Ro3uktCqMhWGVRJ4HoRO0H6
BwmfVtfyDCoIbGrYJgwtJ6Eq8VUoISLQUHVLK7aOhCODcq6bgMAih9jCgk4S
AvuYm4wzCLzQcNjpdA8JpolV4vY0Aj3d7Trs+khQZ49ZpF4lUB2knK0dICEM
muL0fyZwN5fh2akiwYFICTK9RKDxKupg9hgJVhNF5TIOgSM5K9lBJAltORP9
+XEEJgsb+So1CQV9/KqtbAKDHfLtS96QMPeJf4SGSSC14UJrzOz7nkXZyzqC
wKXu34TQ5knwb2lz450jsLeLqllcfP+rty/GO5rA/wBtSpY0
           "]]},
         Annotation[#, "Charting`Private`Tag$207995#1"]& ]}, {}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.075, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.025, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.125, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.115, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.11, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.105, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.095, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.085, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.065, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.055, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.045, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.035, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.015, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.005, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.005, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.015, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.025, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->All,
      ImageSize->{59.41176470588198, Automatic},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{All, All},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";"}], "\n", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"zero", " ", "=", " ", "0.0000000000000000001"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"g1", "=", "5.133415384573404`"}], ";", 
      RowBox[{"g2", "=", "5.010676553113143`"}], ";", 
      RowBox[{"\[CapitalSigma]", "=", "5.744056677218134`*^-9"}], ";"}], 
     "}"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"bZeroPlot", "[", "xm_", "]"}], ":=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{"0", ",", " ", 
      RowBox[{"{", 
       RowBox[{"u", ",", " ", "xm", ",", " ", "0"}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Dashed", ",", " ", "Thick", ",", " ", "Black"}], "}"}]}]}], 
     "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]Wplot", " ", "=", " ", 
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"plot\[Delta]Wid", "[", 
        RowBox[{
        "g1", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
         "\[Delta]A0", ",", "Black"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Wid", "[", " ", 
        RowBox[{
        "g1", ",", " ", "2", ",", " ", "\[Delta]L0", ",", "\[Delta]A0", ",", 
         "Green"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Wid", "[", 
        RowBox[{
        "g1", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
         "\[Delta]A0", ",", "Purple"}], "]"}], ",", "\[Delta]widthConfidence",
        ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]Lplot", " ", "=", " ", 
     RowBox[{"Show", "[", 
      RowBox[{"\[Delta]lengthConfidence", ",", 
       RowBox[{"plot\[Delta]Len", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Delta]L0", ",", "\[Delta]A0", ",", "Black"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Len", "[", 
        RowBox[{
        "g1", "  ", ",", " ", "0", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Delta]L0", ",", "\[Delta]A0", ",", "Purple"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Len", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", "2", ",", " ", "\[Delta]L0", ",", 
         "\[Delta]A0", ",", "Green"}], "]"}]}], 
      RowBox[{"(*", 
       RowBox[{",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "*)"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Wplot", " ", "=", " ", 
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"plotWid", "[", 
        RowBox[{
        "g1", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
         "\[Delta]A0", ",", "Black"}], "]"}], ",", "widthConfidence"}], 
      RowBox[{"(*", 
       RowBox[{",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "*)"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Lplot", " ", "=", " ", 
     RowBox[{"Show", "[", 
      RowBox[{"lengthConfidence", ",", 
       RowBox[{"plotLen", "[", 
        RowBox[{
        "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", 
         ",", "\[Delta]A0", ",", "Black"}], "]"}], ",", 
       RowBox[{"plotLen", "[", 
        RowBox[{
        "g1", ",", "0", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", 
         ",", "\[Delta]A0", ",", "Purple"}], "]"}], ",", 
       RowBox[{"plotLen", "[", 
        RowBox[{
        "g1", ",", "g2", ",", " ", "2", ",", " ", "\[Delta]L0", ",", 
         "\[Delta]A0", ",", "Green"}], "]"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"GraphicsRow", "[", 
    RowBox[{"{", 
     RowBox[{"\[Delta]Wplot", ",", "\[Delta]Lplot"}], " ", "}"}], "]"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"GraphicsRow", "[", 
    RowBox[{"{", 
     RowBox[{"Wplot", ",", "Lplot"}], "}"}], "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8184312274081354`*^9, 3.8184312403352904`*^9}, {
   3.818433001989605*^9, 3.81843302789931*^9}, {3.8187594897145615`*^9, 
   3.818759504040778*^9}, {3.8197989992170134`*^9, 3.8197989996478605`*^9}, 
   3.819799079242052*^9, 3.819799329267641*^9, {3.8197997285229015`*^9, 
   3.8197997654731092`*^9}, {3.822465120120539*^9, 3.822465174431233*^9}, {
   3.8224653724629126`*^9, 3.8224654095616913`*^9}, {3.822465452296407*^9, 
   3.82246547924631*^9}, {3.822469884149907*^9, 3.8224698994290447`*^9}, {
   3.8225507184459753`*^9, 3.8225507288132687`*^9}, {3.8225508101821785`*^9, 
   3.822550828351587*^9}, {3.8225508687671475`*^9, 3.8225508901498504`*^9}, {
   3.8225644522638693`*^9, 3.8225644879824867`*^9}, {3.8225645693339386`*^9, 
   3.822564570286443*^9}, {3.8226578323050413`*^9, 3.822657833582651*^9}, {
   3.8259314816050463`*^9, 3.8259314861360874`*^9}, {3.8260325971091266`*^9, 
   3.8260326005423174`*^9}, 3.8305246447227306`*^9, {3.831969098956956*^9, 
   3.831969119729998*^9}, 3.83196920250869*^9, 3.8319693261072445`*^9, {
   3.8319694747860503`*^9, 3.831969527988243*^9}, {3.8320667371085043`*^9, 
   3.8320667401299343`*^9}, {3.832309563175886*^9, 3.8323095659210243`*^9}, {
   3.8323103502894073`*^9, 3.8323104190177455`*^9}, {3.832320049663964*^9, 
   3.8323200933255587`*^9}, {3.8323201921571655`*^9, 3.832320250124035*^9}, {
   3.8323374756793957`*^9, 3.83233747636627*^9}, 3.8324037658824043`*^9, {
   3.832403797831914*^9, 3.832403887696391*^9}, 3.832403957465602*^9, {
   3.832404102423932*^9, 3.8324042041031632`*^9}, 3.8324043095275517`*^9, {
   3.8324043793989944`*^9, 3.832404509248228*^9}, {3.8324045394401026`*^9, 
   3.8324045793115606`*^9}, {3.8346714821148415`*^9, 3.834671505239992*^9}, {
   3.8346717868011665`*^9, 3.8346717986434937`*^9}, 3.836286132837511*^9, 
   3.837084870799553*^9, 3.8370849326787357`*^9, {3.8370850401957173`*^9, 
   3.8370850755179386`*^9}, 3.837755076368369*^9, {3.8377551189778147`*^9, 
   3.837755149366619*^9}, {3.8377556268431654`*^9, 3.837755636084243*^9}, 
   3.8377611077539434`*^9, 3.850032591995475*^9, {3.850032625105155*^9, 
   3.8500326252620773`*^9}, {3.8500327037458878`*^9, 
   3.8500328451862183`*^9}, {3.8500380558524933`*^9, 
   3.8500380586936474`*^9}, {3.8500380895970135`*^9, 
   3.8500381168119783`*^9}, {3.850038203189416*^9, 3.8500382449224825`*^9}, {
   3.8500383690126743`*^9, 3.8500383830763335`*^9}, {3.85003842550479*^9, 
   3.8500384595102634`*^9}, 3.850038493084519*^9, {3.850038579189023*^9, 
   3.8500385881905985`*^9}, {3.850038627181698*^9, 3.8500386465492144`*^9}, {
   3.8510550989903927`*^9, 3.8510551242384453`*^9}, {3.8513190411999674`*^9, 
   3.8513190639262257`*^9}, {3.8513190985530615`*^9, 3.8513191039417796`*^9}, 
   3.851319568887164*^9, {3.851319944519308*^9, 3.851319960476142*^9}, 
   3.8513207659419622`*^9, 3.852457594726399*^9, 3.8524587432935095`*^9, {
   3.8526128171502533`*^9, 3.852612833630642*^9}, {3.8527018966430917`*^9, 
   3.8527019705301685`*^9}, {3.852702014170973*^9, 3.8527020145209913`*^9}, {
   3.852914021896673*^9, 3.8529140510741954`*^9}, {3.852914201864347*^9, 
   3.8529142139102006`*^9}, {3.8529142683138356`*^9, 3.852914279783639*^9}, {
   3.8529143363602853`*^9, 3.8529143612057385`*^9}, {3.852914857582094*^9, 
   3.8529148621971684`*^9}, {3.852915000503296*^9, 3.852915018818099*^9}, {
   3.8529150610976267`*^9, 3.8529150997344527`*^9}, {3.8529632030260415`*^9, 
   3.8529632075928726`*^9}, {3.8529633071471643`*^9, 3.852963361649027*^9}, {
   3.8529640726229906`*^9, 3.85296409895088*^9}, {3.8529641363701982`*^9, 
   3.8529641376947284`*^9}, {3.8529646162968516`*^9, 3.852964634341945*^9}, 
   3.8529648587831335`*^9, 3.852965073541106*^9},
 CellLabel->
  "In[1604]:=",ExpressionUUID->"9dff07f3-639c-4862-9575-ec0e8d7e0be0"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzGs0lAkYwHEl912myWTWNaxu1DJLiPZBHOM02GwX2dAopNqdN3RBtISi
KDTWURzXqCxhZ0jNPNhyrY1CZhr3ci3eEcUobfvhf37f/oYBHK/AlXJycu5f
+98Rv/bhEs84cCpUtTtnL8TJEDLDRRYH/Q7fr/KzFOJsOM1lpOgCrBduW3I0
E6LcZf8SfVk83HOeISi6QtSveX+cW3QRzJv2HmteEqCPhu583OIV0DThU3Me
CHDCny9f0ZkBEb6iH0bsBcimKK1NjsoFs7qtT+tcHuJqoxh5eHoHksxoXbFu
dTiaE8twf1IFlB1ToXZXa/Hm7sXYwbW1wG/oEEsW+agkS3De2SWAPBWdjQX+
PDSXtvu2/9kAkyElH/Jl1cj3H3guiXkE8y70s8tpVXib7a7F9m4G6oaL7uXM
SkyXX+b1ybUBU0uxhr75HnYb2Ko3Dj+B2SjDo1co5agu4dfnZjyDrQdmPujR
y1DMdTU8o9MJ7EVNEd/tDoplC8LnSc9B41fuUNqpUuyuaE+6M/ACouJM5Ez7
b+Hn/MMW27y6gbHZxOOkUzFK+kodlgQ9YKta9vFEWyHyQzSi7Vf3QgtLoZBx
oQAFDLtMi1gRfDLgGRvZ5CPuuiQp6BVDh25PqSI9D6fzs780sySgOx7B1ZvM
wS5Hn+T1dX3w984Y56aeG8izsHNaoTEAaUofjQ4pZ2NABTHl6jAImrnm+QOW
WTj22x7W07eDsEc7sFs5NxNdO9XZM9wh8K7Z3GuwiYs7XpgeOe4+DAeT0x+V
V2SgRbQounhhGBLFqcrWwen44PFEgm3VCKz77sawt04aGlZ3OB47+hoET5gr
rvdexXgmU/MA9Q0olDWATmsKxpwz6s5vewNyUcRAZvVlPOWdUlZ6ehTkx1Ru
sUaSkCn615plMAZWXpGiu7aXsHIhtNKtZwzu+nTa3ktORHp9iaNC7Dgw+Cxm
3poEpK2Heu3tE7A7750kIesCUiyD906PTkC81d2Zmx5xODoamOt3bRJSrP0+
7VgXi7/YNHdvZE7BmyOz1SmS8yiwuG9c+X4K9hlpv1ZoiUZh67eHMv56Cw94
qRz98ijMVrT9mXrkHZTGrTk01xiB4VNz+zzVp+Egu2YpXussvv59DWu0aRr0
zAOBFXwavbIb99uFzYD8q1Xam2bC0cOq6PJadRJenDcv888MQ+GJrICHISSE
XVf7cb9tKG5Z6HJ2RBLUjVUDslROojZ1dh3Wk8Ae/2dl5KqTqGim8dm+kQTG
qOkW3y8E9vu78Wwek0DjbtHbOE/gtWaBiXk7CUEtFN+OQQJnM28pGrwkYeuz
9PmQWgL5VmdbPk2TkHI920d4lMACT25RJElCaG6OR8dhAlNDqv5YkJKgZtAm
GPEjMDjnrc3cHAnnvrxU09hLIF2BfXtKRsJumo/PGUcCI7vcksWKUligLvum
ahMYNB0U5K0shYHE6Gc1NAK9lOOdelSkENSqxRumEGhqL5R1fiMFaUWf2F6J
QEkh43grVQrJhjJlhXEOtgg8XV01pcCzdqBx+jnIe3nC+DFNCteuNq2UdHEw
Va3kVT1dCvd36ccIGzgYafKo5iftr78IK1XLWg4GwVDGQx0pZEbTw8vKOeh1
YJmzXU8KiUOTdRuKOQhhOqxafSmIQjv6im9w8D9JKHpF
            "]]},
          Annotation[#, "Charting`Private`Tag$51845#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 
            NCache[
             Rational[2, 3], 0.6666666666666666], 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVzns0lAkYBnCLJMlllmERpVNba2tRyi0vlYwazdK2SRsNmlbatWfpskkn
l24qq0Rbq6kp5XLq1PeNGdeZd7IuibJkukwjDA3TWH0f9jTost/+8Z7n/P55
nnd+fErULmMjI6MI5v7Pgdg2TSkvCzq9tZsOB8rxTRJVEDqVBcoFuuV6XzmO
pdmHDpRkw4Ev7Ky2+8jR6HRcqetUDqS8VF1bvUyOrlXjyYUlJ4C0++BrNU+O
MdYu/2ZNnoE3+ugptYkcdXFSk7udBTDIXzy9rF2GfJuZ7Nx0IeREFE0XxcnQ
1v2ICTyqgEYHnmzD0XrUXsn0jmgnweh80AqDrA6LIycz+9jVEDArXq6eXYcz
p46tW9stA35KcLlway160m072i7eB0n2sbK/amtQGtfbpT7SCIq0bw7yXGqw
nB/hwI9ugVgxXSc8XY3nTT5KeowewoFNafaVc6pR6eZn1aBph483yvx35FWh
lVqqEBZ0gPHagsgzblWoKgybf8C5E0J7uKx3NVJUTRnkXae6wOX273rXzVJU
3m07VdH7BHStFoPCSQl+ECV4rYxSQrDJuMTjqgTVPWXB07Kn8MpmoSKfK0Fp
knVGoO1zGJD+WXbHVIIy74Air8wXEHDjWvtYXSXixpPq689VsH2lY1fp4Uoc
FV3+1MJVw4WgU2N1gZXYHRKTu6i2B7w837fHGleixCtgzWfWvVDKsQm/0CHG
+Lu/6MOC++Cca8h6/2IxDv30HffRSB+0ZDmzc1PEGNZpxX9b2A+a9CWGgvVi
XP3EIzE5QgOWQfq9rnPF6JXxIuOmQQNXhlUmFpMk1jXpjvmRA1C81OxTYTeJ
88V/h+z5cRBqVDsduWISczgcu22s15Cwr3ZkcxGJRw67K0UPXwNb03zf7DcS
90WfvV22Xwsn/HJ1x+NI5Lx4vIrrNgSmonM3F3FIJAy/EuFPh6DEwdQx3ZNE
R0VpyIzMYRB5Spv7nUm0XwQKJ38dTDQrS6xnkmizYveWUa0OwkxyltATBGq1
u4Sx+W/AZbqpd8sggZt9W5SLOXqIt02wPPmEQJlXzQJiXA/2YcmC4UYC5a1z
dhbcGYGN2geT7lICL5v5fctK/Ae+Wjw+71YZgWn6ie95VqMQVWXYoCsmcPDn
z7na5lHoWDby2OIcgVGXG7YGpL4FjavwovQ4gZt8Sk6zrShYIkhvDMpg+vf+
EV+fREF+VpZDeSqBSw3d60KQAvPllq2RyQQ6scbmoYKC1AsBj5YyNvva+kNg
AwV2mf7qWYxfxYVLfJsoYH+65NSwh8D8FtlCzzYKslU5jssZjxXdMnN7RkG3
aBXbIYlAqc/BB+9HKUgouWc8JCDwOq+w5BDF9PlcimlknJdEHjXQFOwP1teL
GO++MuI7MUGBbShe+4Gx4wx+uX6KgsiKjsGuXQQe6g7PVZnRsMFFtf1+IoGC
UYEg2pyGSNPX0VcZR5nnrHk6i4bEh1/uzGDsESif6rSkwaiCc9aPsfqGd3Ir
iwbL9yI+mUDgAxkvLMyOBh2LfS+fseTZ3gVN9jQknS83T2GcN7v0pcKRhjnX
3Z97MD60sLEqyImGZ27GPAvGAugvqHemIa9/omM4ntnf9jHFfy7zX9+7mBbG
kOrMrXalgcU2p24y/g9+WIsh
            "]]},
          Annotation[#, "Charting`Private`Tag$51892#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], Thickness[
           0.007], Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVzGs0lAkYwHEl912myWTWNaxu1DJLiPZBHOM02GwX2dAopNqdN3RBtISi
KDTWURzXqCxhZ0jNPNhyrY1CZhr3ci3eEcUobfvhf37f/oYBHK/AlXJycu5f
+98Rv/bhEs84cCpUtTtnL8TJEDLDRRYH/Q7fr/KzFOJsOM1lpOgCrBduW3I0
E6LcZf8SfVk83HOeISi6QtSveX+cW3QRzJv2HmteEqCPhu583OIV0DThU3Me
CHDCny9f0ZkBEb6iH0bsBcimKK1NjsoFs7qtT+tcHuJqoxh5eHoHksxoXbFu
dTiaE8twf1IFlB1ToXZXa/Hm7sXYwbW1wG/oEEsW+agkS3De2SWAPBWdjQX+
PDSXtvu2/9kAkyElH/Jl1cj3H3guiXkE8y70s8tpVXib7a7F9m4G6oaL7uXM
SkyXX+b1ybUBU0uxhr75HnYb2Ko3Dj+B2SjDo1co5agu4dfnZjyDrQdmPujR
y1DMdTU8o9MJ7EVNEd/tDoplC8LnSc9B41fuUNqpUuyuaE+6M/ACouJM5Ez7
b+Hn/MMW27y6gbHZxOOkUzFK+kodlgQ9YKta9vFEWyHyQzSi7Vf3QgtLoZBx
oQAFDLtMi1gRfDLgGRvZ5CPuuiQp6BVDh25PqSI9D6fzs780sySgOx7B1ZvM
wS5Hn+T1dX3w984Y56aeG8izsHNaoTEAaUofjQ4pZ2NABTHl6jAImrnm+QOW
WTj22x7W07eDsEc7sFs5NxNdO9XZM9wh8K7Z3GuwiYs7XpgeOe4+DAeT0x+V
V2SgRbQounhhGBLFqcrWwen44PFEgm3VCKz77sawt04aGlZ3OB47+hoET5gr
rvdexXgmU/MA9Q0olDWATmsKxpwz6s5vewNyUcRAZvVlPOWdUlZ6ehTkx1Ru
sUaSkCn615plMAZWXpGiu7aXsHIhtNKtZwzu+nTa3ktORHp9iaNC7Dgw+Cxm
3poEpK2Heu3tE7A7750kIesCUiyD906PTkC81d2Zmx5xODoamOt3bRJSrP0+
7VgXi7/YNHdvZE7BmyOz1SmS8yiwuG9c+X4K9hlpv1ZoiUZh67eHMv56Cw94
qRz98ijMVrT9mXrkHZTGrTk01xiB4VNz+zzVp+Egu2YpXussvv59DWu0aRr0
zAOBFXwavbIb99uFzYD8q1Xam2bC0cOq6PJadRJenDcv888MQ+GJrICHISSE
XVf7cb9tKG5Z6HJ2RBLUjVUDslROojZ1dh3Wk8Ae/2dl5KqTqGim8dm+kQTG
qOkW3y8E9vu78Wwek0DjbtHbOE/gtWaBiXk7CUEtFN+OQQJnM28pGrwkYeuz
9PmQWgL5VmdbPk2TkHI920d4lMACT25RJElCaG6OR8dhAlNDqv5YkJKgZtAm
GPEjMDjnrc3cHAnnvrxU09hLIF2BfXtKRsJumo/PGUcCI7vcksWKUligLvum
ahMYNB0U5K0shYHE6Gc1NAK9lOOdelSkENSqxRumEGhqL5R1fiMFaUWf2F6J
QEkh43grVQrJhjJlhXEOtgg8XV01pcCzdqBx+jnIe3nC+DFNCteuNq2UdHEw
Va3kVT1dCvd36ccIGzgYafKo5iftr78IK1XLWg4GwVDGQx0pZEbTw8vKOeh1
YJmzXU8KiUOTdRuKOQhhOqxafSmIQjv6im9w8D9JKHpF
            "]]},
          Annotation[#, "Charting`Private`Tag$51939#1"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJzt22k8lF/YB3ClKKXSooRky65Vm+qilELJkrKmRCqSnSzJkgghRIrsZsYy
Y9+PvZQWtIhk37JX6q9FT8/HnPO8f15Pb/rMJ5n7Pve5rmO+fpfweRtt8/ls
bGy6HGxs//v3XcPRZonyKqQl0+JROHAPrT3KS6NKV6HKpzHuJ7niUdwOJR+5
6Er0N1M86NKXOLRJ+LIhfWElkvUME4u2j0ZG/JIXLQYq0P5N52d0LsQgq29u
a62qypHQ9Xza34X3kduLV09sH5Yh+6Ha7NsZYehOqqiLs3Mp+k+h69K2tij0
4IazpId2CTqiG79XPykaUc88b/WWK0a/OL5WuQVFouKtQgG3FxWhkkyVu04p
UaiBy35PSG8BGpXw1728+x5q7a0fvleRj7KWyKyS4wtHQ2XrH8TE5KF7G18o
11reQ/9FXlWLd8hFmo6pRhbtYYjTpvpnsmYOeuU7u192OpR5vwwk4rohee3z
IOb90dHn4OFTB/YFMe8nE9WM1KzaPH6Xef009HjWYYu/qR/zeiko8L/FadLT
zszrS0UvzRTPcH52ZV5PMip+KZ/XqeTGfP9ENLW27lkatxXz/R4jKs+PF4c5
XJjfPxY1+P9w9hZ3Z36/KFTt0J7/c7M18/+Ho7v7bWwLHMyYX38HgbKQ/qZO
PZj7d28kOF/V2mCROvPr7dBUmddSqYfmwMb8c5Zd8cUxLrwedvBspfHnFK98
5mtvmN7jZOK+rwJ/f0hdrrIvxakcvz/oFK179VqzHF8ffFsh/WRSrgxfP1RZ
LjoaoFaG7w9MRje3KqqX4fuHi7nne/hnSvD6wHtuPs7ULaV4/WD7hicrPwpX
4PWF1QFlPcnT5Xj9wanB5dPmxFL8fGCiQKv80o4S/PzAdzbyY3hCKX6+sFF3
6qPFAH7/HNjx4D95od+leH/AllB9MZ0vxXj/AJXHqCqkoBjvL5BJF1fbASV4
/4Hj1trnXvdK8f6EFlUnftlfJXj/wqK37vpCPUV4f8PHKAmf1UlFeP/D1wbF
qwtFinF9QI3ZyGrz1kJcP5CpVH8jYlkRri84N9LuKfSmCNcf3Lq0dbQnoBDX
J2gLuli61Obj+gXb5U9BVLkQMesbjqZkbtfsLmTefzVsX5vg9tglH93wjhYR
6amGIzfbIzMO5jHXowa21D7j3S2Qj65RVOwEOGuBy9PMxCAnn7k+tTD5eucs
f0s+Mn09WcUrWwfsAQfXR1zOY65XHVytMB+JystDWj8e8vBo1cPrIQWu+w15
zPWrhy0GQDV0zkXKG46dW+L0BLYrekh6d+Yx1/MpnCsX2NfEn4e2HZ6mL4x9
CtUrenO7L+Uw17cBUi8VvHPUz0MiVglsbJUNcN10Q+6hgjzmej+DrRp7Za78
yEEr7x0/+bPvGTSxd29M9M5lrv9z0N/Z0RtxKBexl8zEf1vcCN8rcjt6RHKY
z6MRdqfOs/P1Y6CvXSkT4/IvQExxg1vPHwbz+byAZ7tMWx+V56A+Tm0Y1nkJ
xS+DK85vzGE+r5ewJCyNM7Wejt7Iz4b0urwC1zsPtNqTGczn9xqKRftzvX4w
UI/0qYnxE68h6pal71MDBvN5vga3oGv8eu8YyPCAzFqr7tdgrLneePtsNvP5
NoHVrjr2fRpZqEVrHgzbN0GkwDO97ON05vNugoF3XEJKFDpSN39vYcHRDK8u
VBlN2WQxn38zHAxfdn90XTaqcckM6Y1uBp3HRXvCkunM/dAM7imcy0UsspFi
kE+BqUwLrAiWnY21yWDujxawYVvwn7cQFeXF63/qKG+BnMrZxfqCFOZ+eQOV
6yW+JwZSkWzuZg7Dk28gkBL8nmpDY+6fN6Bb0bzMMpaGkusXyrf2vIH5Cm9f
t8dQmPvpLVzg5G40TKMigbb2U6cc30LXxL15HpspzP31FiQOcZvZ7UpHkWMM
j2bOdzCs7STWpk5h7rd3YPVU3b1gPA1xz7udovngHZwwah03k6Ew9987KAi5
9Eaqk4L8Vpu8aJR9D9ofWmakNVOZ+/E9VES3pMZUJKM/Ejumj6H34DC68Vf4
niTm/mwFu7iNx2O3JSJHRS7BJ1qtYM718tDKxkTmfm2F2Zc7ssMKE9H4iS4V
lb5/rwd9ja+8TGLu3w/QO6zyVvXbY2RxvsCqyukDfNR3/9EV/ZC5nz9AXWfB
quBFj9Anx6CIA4vbQPQPZYRzTQxzf7fB9adcG0PkHiG9gPNlpbFtoLhuXazE
mjjmfm8Dxs7vwju57qNXD3f37ZZvB32Blfq96ZHM/d8OBxpOVB3e+QCp0pct
Lahsh0PfHS/v5Yln1sNHaLGaDuxJiEWopm/7dp2PMH+xw5VVVdHM+vgIwsL/
bShlRKFd70sM6f0fQeep5N2Oc+HMeukAaWGDLnYjf5T9OdRHzqUDWp7RqSn8
vsz66YCoUy6xGw/6I8lZCxqV6xPQHi2gp6gEMuvpE6S/Xun8VdgHPebZ3yLx
6BOc9ckaXfLcm1lfn6AtqdhqdsoHrRNf9St5cydQvvlwxMYEMuutE/wolI9v
X/ih0N3DIiLVnXC9OHnsp5U9s/66oF7qRZXofT20IPVsiqZ0F+TNk/PU+eDC
rMcu2CA45BtqHYoqs9X2hNh3gcS6NUk3nEOY9dkF4QM/ZqaTfZBHscKLxrIu
uNDN+ePsaBCzXruAYnrBqqIkDO2p2XhuCUc3TEiINixnt2PWbzd4W55SG3uk
gaYbl0wf0+wGnSNahplqZ5j13A0Vq2t5SycuAuPd99u3o7vBpaJLqnqvJczV
dzfcX2d58Ku7GbLu6hZ40t0NB8VPmOsqX2fWew/wLf4aUPjLFUl9bqQvlOmB
ipilmqJW7sz674EELfGFafY+qP9roYqKQw8kMWjr9y3xYPaDHtgbeWjp91O2
KOFPYqt3eQ98FgxLXF9oy+wPPSAvJ37bOtQDGXOGWFVx9ELZ2qnIjVu1mf2i
F/oaHRQ5v9+E9TyubGwneyEyY/k78a0mMNc/eqFSc8n1ieOa8G79hYgDMb1g
udIlsvGlJcz1k174eoirar/GOQgX05T06OkF9iObJR6vNmL2lz5ADrF7v0Z5
oBPye8tKZfqAM+b7UC3fTWa/6YOot/xXk/o9ENdu8ZM/HfpA1t9W1dXYm9l/
+uDl8LiY+zVtqFde0be7og++j394/PCaO8z1oz7Y6PjjNXXreeSt/svZmbMf
ln5RTBi2t2f2p34w+nnSv8fSHh04NbCk4GQ/bG2vf2h22Z7Zr/qhwzlkKNnO
DP00aYr/FtMPtRzqT4K9dWCuf/VDY1Cw3XJ2Zyi0LNu+vbcfdvJ+07P4YQ9z
/WwAfJ55+MX2XAF7u7QntrIDkLpm/4ijmzXM9bcBoMdxTbMZnoPN7uGGdMcB
8GrUCTwgcwbm+t0ALL5SK1O6RAmN+HlMjFf8ey37wZrzkhGz/w3AdADjJVeX
B0q7a+kjt2gQiudZdB8O92H2w0G4XvkO9ly5i8xidNZaaQ0CP3/p8aAJV2Z/
HAT5ekbEdmFHEEo6QKM+GIQej+b4FReOwFy/HATeqKddEhb6qD1DCoZ7ByGq
+e+v/K8XYa5/DsEuPW3bNxuuwf2C1S0SckNw2lBgVvnEWWY/HYJli1dFrjc+
C7qVfy0snIYgfcQubLTWCub66xAUX9iqvS5dBVY8+/wzGQ2BZnHAWu1AK2a/
HQL+PbB36hlAY8vbkN5Fw+B4pfrXRZdjMNd/h8FW8NjXvLUGcLujUkREexiW
CMsWiUbbwlw/HoblEptiedzVkMogrcA0dhhOuNZedLixH+b68zB8f7QzLm7S
HtimotTi+4bhS3jChKa1Fcz1689QwW1i+cHXBZX9vPmpQ+4zfMrXHOQvU2b2
789gZLH/8ttvQeCywNpOwPkzbPj1TU5y2hfm+vlnEBTY0KMq5AM7lp3hMKz8
DHqt3rvapG/CXH//DALBwc+jDW7C1NpDD2IWj8BjR/VrwZymMNfvR2BeDKWt
yO8ayhSWl2/VHoHRZYcEjrvYw1z/H4GE8So5xeeBcEmGr5r34QiM917dY6Ny
HubOgxFQFYq61TXjDOIKC/RO9Y/A1wcjhR46ETB3PoxCXrdv43HLe9B9YGL4
nvwoqHPr9rgohsDceTEKIWAap/HAAR4dbfNodh6FZHRorLHSgHl+jIIVr+9+
pb12oK9dx8NTNQp/0i+vSPBQgLnzZBQOCwzLb3GyRmuM6CmaXGPAWBXo2SFz
FebOlzGwlksbP340BJrMY/eE6IxBYbV3ytboIJg7b8b+/bz1QeyC9UUUYnPr
RePDMdghqLnIY6E28/wZAy1j7zBncztQc7U9t2RgDDzaasviJs/B3Hk0Dt/L
Y7i2RPgDh4/R9LHN4/Bg7PONSxV+MHc+jYOpPI/OxQtGUB2kGnDbZRwqlNar
bX8VCnPn1Tj8tt2WqdEQCp5R2wSfVI2DSegC44+1QTB3fo2DB0NB1OZ6BOx9
LMhYuGQCchuUKS6O/jB3nk2AvLRw22o/U/hOWXRYRXcCOByfXJ38e5t5vk2A
6DOLicySOygn92ur96MJKOn0vJkS/JB53k1A5KVtqwL04tDV8k9WVQMTYDd7
7Gjn5B3m+TcJHruV1nG634bI3gtsbOsmYedA/7FEozswdx5OwoTZkuLZPB+w
tzRQi983CT/56zXfPomGufNxEr6Mlo2UvEkCrTHNiAPnJsHY84PUo29pMHde
TsKjvW8v6c8Phc12hz91+E2C864WTd3jGszzcxIWGyu8MVAOAe4feyU9qJPA
OGczPNB3D+bO00kAj1tHzqtHwajbFjuBV5MwhjTDAwVvw9z5Ogkmf7642T68
Ac/YNpWVfp0EiZvyP1ey34a583YKPvP1JG00jgDsG9bj/ULcZTGAfWOLkuG1
5qhAwL7xZfb7uwqjQMC+Uehx1GzKKQywb7T01Azb/fscjH2DI0e6TEYuCLBv
vF7d8PYHNQqwb3x9ak5dp3MPsG8os0X11Ty/A9g3OPncV4aFBgP2jdbG6/WT
FuGAfeNP621/walYwL7R6ljT+zz/MWDfYAjtLFpdHQPYNxo0DP4+jokA7Bue
+8v/+xoTCdg3Qhwr1gTrRQH2jQ0xef+FdscC9g2e7vZtjvb3AfuGYpPGaUnp
+4B9Y8/idXrSbfGAfSPnjjB7d2E8YN8Iq7P0a7eOA+wbha2ng+6JJQL2jfcO
r3aPLIgF7BvcH9idO9dEA/YNfcdDElo7HgP2jWPlboO7eeMB+4bfPIZha2Qi
8Q3d6VVuPZ0JgH2jxTFTDw7EEt9wjas3XqhnQXzDKsbeuZWRRnxjoWZ/Dw+V
QXyD6qX6bP7LHOIbZ3bVBebdZBDf2M4nkr2EO534xuSV6PAu5XTiG57fJaEp
PYv4xr0XN5Tq/q0r9o0T5k/2iUnRiG94C9pLaMnTiW9kiabJZ++hE9+45v3w
hhsHnfhGncDORez3Molv5B4rEZZXyyK+IfVzUZZVNJ34RvfRreI7r6QT3zAv
beysqE8kvsEb3KTAU5xKfOPL0IP90eEU4htvvBbJiP7KIr5hSV/qQfn3/tg3
Li/kDB9QTSe+URj3eqV9OJX4Rv3Z4/X2bTTiG24DLV/XLqEQ3yg5E75f4RqF
+Eb5+qVHUUc68Q2KXDlF/0QK8Y2o6QW7d84mEd/4NDCz4+JGKvENUI9ZJ3Aw
g/hGRont5VU5ScQ34u666W7Jf0R8I0PmQckz4yTiGwW1SmnGA2nEN87vk1xf
4ZJCfOPv1mXLxfQfEd+oCtPSkOKIJ77hKWRRtX38MfENefvmF8VH44hvVF9Z
yrfxYjLxDf3Lp+LzVyUS35C81H/jocgj4hu36CEmu08kEN8wXrPkpaVFPPGN
MtWZu9dk44hvvA44pXz9zmPiG9VBimMK2o+Jb8wkj46EN8YQ3yhJ/Ot/lSOK
+EbkH8FKk2v3iW9UHvmmeOxQDPGNFfss+N5xxxDf8Eg8L35jTwTxDe4+y0C7
rRHENwSCJaMNpCKIb3xryLD72htOfCP2vY3vFtsI4hvD+80rGJkexDfM96U1
z6x2Jr5xQ7WwvSUlnPjGb3rBK6WwQOIbgv6N/72psyS+EW+08mVe6k3iG2qa
744fHYgivvHL2fXVaEg48Q3ZnqZJedkbxDfuSr6IVui2Ib5Rf+RH1fEzdsQ3
DsiPSZyRDyS+IXXe5sr0c3/iG8YrRrsT5FyJb6h3Zr0P8ztJfOPMi4nNq7Lc
iW8kHfSqfjZ8nfjGkGjIrOJ5C+IbAkcFfwQsNSK+IabwJkR2/SnAvhEI1X+b
ZE8T31BVWqZU1nQBsG/o0+bVKnvYAfaNtLKi1W9oxoB94wubSMXlJlfAvsEV
17J343k/wL6h8V7wudJCX8C+wZatdvfPfm/AvtG7ord1PrcB8Y1pwa5TtAVB
gH3jvd7DZfmyKYB9g1akbs7eHwXYN9YF7TsoIhgK2Df2RkTMNobfB+wbdy65
X/EPjADsGwMvrH/X2McC9o2cbJ7qEtVowL5xyOTC4i8uIYB9Y/E2jSw/w2DA
vsGXdL33/J37gH1jtvfPe+QZDdg3OnXbt522jQTsG7EqUyuMmmMA+wZ7z6cD
yb3JgH1DcN3UgZrkVMC+0RMdZjJTnAzYN9z5p0Ilm1MA+8YBu5dt8f7pgH3D
vmHtFk7fVMC+sdPrtGJvdTpg31iulXiUxzQTsG8cU02gXvBNB+wb250EDKwu
pgL2DaFWyyOrDGiAfeOQYp5++t90wL6xPn4n9wvhRMC+8fS6iEegRQJg39gv
tDTTtikVsG+s1D/IJ5lGAewbtReSeI1EkwH7xlozj/fXpaiAfaOcesN+oXo2
YN8QvZSzeNuFbMC+wVkboxjIySC+8dNoG8NHh0F8Y1tvk5THoQzAvlHtk1rb
2J4K2DeKL8Zw7+JNBuwb6bkrr5ZVpAD2DTFFdhM16zTAvqF2kW/C7TAFsG9w
fzIpO7yOCtg32B1Xeub4UAH7xrV9MhdW/80C7BtD5nUWsa05gH2jbo3ISkNa
DvENqiNfm3FgJvGNCGXDO6XHaMQ33DOv/RriyiK+Yd1jfIcen0V849W1mmgB
sQzAvnGfP3lhRwEVsG98MGQzu3kgA7BvbNp864v9GBWwb2yjyn262JIO2DeW
Jo5JyYRlEt9Q8irkmJiXSXzDfXH9y0+taYB9wzbqW3TG73TAvuEz2KfxYz0N
sG/s5AvlFU+mAvYNHzO9zss2mYB947HqhXQ3rSziG8Gu1GgZfgbxjYFF25Vt
PenEN0x/su08/yeL+MZzF8M3P+LoxDfC6aUF036ZxDf0DAQaco5nEN9gMxGL
EvudAdg3TKKCBxuNswD7xhUBQfVCgzTAvpGzPrFq8SQFsG+khwUMLaHkAPaN
jfHvP4QxGIB9Y0Hz+MUXYtnENyi7yyRjfLKIb1zecNxP5l4mYN946LUnLqw3
i/gGX/SkveRLOvGNZya+bzts6YB9Q2LMWiT3F4P4xlFHdf1GJzrxDZ6puubr
e2jEN4T+ozGEQymAfSP7pIWz5OJM4htseXsTBF1oxDeefFGxPhtHI77RU6MX
t24qm/iGudo3i60+mYB9o/mawe/o0WziG647pLVpQ3TiGzMzH87zeNGIb4iW
yja0a1IA+8a8r+EmN2zzAPvG3YyBIq35xcQ3wloqRUz+1Qv2DdoWDb7DfHTi
Gzox80ciVjKIb5x4dEshSiOH+Eat8YPLEtuyiG+YLslhO5FHAewbob/S0/O7
MohvNIU+dQFpOvENZ+eQWP/+TOIbWb5+bOdOMohv6C51OFf5LIf4hkLCQs4W
VzrxjQXnJjN4jzGIb1g95G8pc8klvqFWdFu7zS0XsG/8XrWjN302h/gGTenv
/sf7solvfHy33DNJkw7YN056NU672eYQ35hRT3g7rZBPfKO41r/TOKqA+MZ8
w/4hk3/1hn2DDh0+esU0wL6Rn+AztsEik/jGad2bTQKXMohvKJtJym7/lkN8
46ehTa3TTA7xjRDbUw6wm0F848VkfxKvVSHxDY4mT3a+tALiG3unYr95MgqJ
b6wVnVm4NLyY+IZVVFJEuU0R8Y2KQte7nv0M4hufOxjV6a3pgH1DPXjGhHN1
JmDfmDGpW3dzIQ2wbxiFuFJsZLIA+4aOhq1uZQkVsG+k8/dlpZzOJb5RcEwI
aesUEd/gtn+/sFEkj/jGrqlHqH0mj/iGcZXtPCe2EuIbq9puiWh7lhPfGJM5
3qR3JZf4RrHrqrjOXQzAvvH9tuWlz6sLiW94TVyjpYmU/J9vjIhWHDxdRHzj
ntcyT8b2POIbdzZcPJlonk98Q9Zyu9G5slziGzLxh009zQuJb6jw9HKcPU8n
+Q0LjTNB81tzSH7jU8HU48baHJLf8Pu0/srt+3SS37h+d1h/nTCd5DcSN1U+
UOPJIvmNNjvKgwXzM0l+Y29wwNlOZTrJb5x+U7tdLSqb5DcUucM5Hk9mkPzG
ptXeX8Zbs0l+Q+GZeJD7v8+r2DdqlJzd3C8ySH5j57pvJwbF6CS/kR+r83Gn
ZAbJb9wVNd67qZpG8htnnMeNmkMpJL/hu0ozbXBZBslvXB7QFG2m00h+Y3yw
q+b04VSS30DeL9+c/ZxC8huNcfGn7fRSSX7DmbcyW5wzleQ3CtzofkdTU0h+
461n/3JO3ySS33B9eUP/5Ookkt+Y7J31ONmWRPIbp+tHlHNnEkh+w5Zb6Hu/
RAL2CWQh53lCvCiR5DfuHwlepfA+EmHfmNhWPt58LJ74xsczbDFnJRHxDbtw
dmv7i3XEN7Q0N75PWl5LfIMiUBDwPaSW+AYl8Fx7pnQ98Y264+dFefbWE99A
Wea3ORNqiW8sqDwYTr1dQ3zDZ8fgDyOLWuIbDne5b+Ry1RPfgB+W6i9a64hv
wG3qhi9xNcQ3yjer/Ep/VU18Y62VhC7nv+vFvrH0/ajflge1xDf+qGakaHXX
Ed84dc7CKkmpjviGedagvdqiWuIbE2MVe0PaaohvKPPMn1f0pob4Rgn/9jLl
qBriG1mrfuWJv64mviFnY1/hPFtFfGO+Xbq7pUw18Q2xy9/XxkdWEd/wop7b
4p9TRXwjp681I/thNfGN9Ruqb2rsrCa+Mdrp1Pa5tpL4RlFkgN3i4kriG67a
/nJPX1cS3whIX5DAH1RJfEN7ucYdjn+vsW8c3iNmWadSSXyjOGbTsJ8tIr7x
rirDedShkvhGbbVptA2qJL6xO6i9qqmlkvjGlOlHPq6QSuIbEWu5um8bIeIb
/koOKg53EPGNiLqQ9CdyiPiG4pNGVYE75cQ3fMtXosF/fQj7xss/RjFODZXE
N+yOOG0rMasgvlF2cK2wP6ogvqGVKtC0zKSC+Ea2rhVbQnM58Q1kxn7QOqCc
+Ebv9x1HMoUqiG/0G9ecuySNiG9cW1b9XfNPOfENF9fvh0c9y4hvjHc8YDPY
X0F8Q06ssoraV0F8I6dNXDbidznxjeWidWtMQyuIb3j82q58RrSC+EZazQOL
0bYy4hvHLqYWDE+VEt/Ier9B7AxbBfGNKLZfedWUcuIb9CMaf9b0lRHfaMr4
dTb0binxDU9VqXaL6hLiG+NXhZZ/cC8hviF9f7+668Zi4htHNDrl3vwoJL7x
n4PU1HuVQuIbh8uFpGWdiohvnPiTOxm8qIT4hq+rU0Dd6WLiGyFcy2Kufywi
vlEwcuVUl1ch8Y1Fzet8TH0LiW887Yj5ndZeRHwD+PzlhQ4VkfyGps6HVPrL
IuIbJWyXCwr9Skh+g/PbKt6/ToUkv0F32/TjqEI+yW/4LGVPo7zLI/mNHSvd
dDs/5ZH8xom6rcYlGvkkv9EhtuGc1t88kt8oMRTW3mWRS3wjcYxNqcMhj+Q3
9M8sZX/eU0TyG9wm8mb++/NIfuO+8IVbjWF0kt9QD6BqXnfLI/kNr01X0hXk
8kh+oyWEd8XS8zkkv8F3ndvYdIBO8hsXJ1uElT/TSX7j/M0FI9w7ckl+Y/NZ
/dmG3FyS3/DyKKbt8coh+Y2G/m1G2/PpJL+RcDnh/hL1bJLfOD7jt7blKJ3k
N2oqxLjU9ekkv/G2e9M7Xzk6yW9I5bvm7b/OIPmNo2MyzzWWMkh+Q3iJzabg
4WyS3+CRats9Zcwg+Y0c8S/mNnr5JL+xcJlbY1o+g+Q3wpP91tAO0kh+o4Tq
5+1Xk0HyG3Q32PNHIZvkNwRMljdkqTJIfuOqj56EuBad5DcOLV5w6vu/19g3
esTMuDKW5ZH8RkGPjzL3RA7Jb6yUq284QM0i+Y15MsNXf66lk/xGbUWuzVUH
OslvOC80XC3Ik42wb4gnSgpmx2cj7BsqAxvC+XOzSH6Dl/tnh7BVJslvsEnz
TopFUkl+g7ftrXLdhwyS3/g1pTYZco9O8hsfpHqui6vQSX7DsMYGaqyzSH7D
s6xgk+tUFslvdBxa33t/ay7Jb6SMO1wRu5xL8hv8dQG3cgwzEPaN7utF7upp
NIR9Y81g4HINTSrCviFPq7JcPoXzYL0wFbOvRdIpA2Hf2Gy+M9aiP5PkN8zc
xT9rLGOQ/Ib8m/IRhnkOyW8cCee4eHU7g+Q3+nZ+VVo5j0HyG9a5cRdFL2cg
7Bs3F9z89KQ/BWHfEP6vT3K1EJXkN76FH5qX9iGT5Df4NxWPb57OJvkN9tdV
f8o9s0l+w2ubpTvqyCb5DYX7E8+1+TIR9o3Buwzde44ZCPuG8lLK6KK/NIR9
Y4WyVt2ymzSEfaPrhOaIV0gmwr5RZrQ+OtKAhrBvBAs6d80+oyLsG2duett4
u2eS/EZIhEK2/Eo6yW8MejbMFjdnkfzG02Bp/aiPDJLfeKJ8Y3ebTwnJb/jM
v2vmM5FH8huuptXeXh8pCPtGSXJ5ksvrTIR9ozFNnz1EKpvkN47eKv60vp+G
sG+kPAh6HhuRibBvpCg79mtaMUh+o1O37vgzNgbCviEYbLnxl24mwr4xar5j
xd4IKsK+obb50bcrwpkkv/FcxyPnd0AGwr6R/NjonEEGFWHfmDRdsaHvNwVh
34grVacvv0ND2Ddi3V585TmdRfIbEyal0rFO2Qj7hlNV/W/5txkI+8bDJ/0X
Ln5JQ9g3Ig6oiK60zSb5jQ9bt7y0Kcoj+Y0Z7dMmAnUMhH0jQspfXvIjFWHf
UNMJUB5ITEXYN9zqD5WU3aUg7BvLHY4s7BqhIewbPBOhZQpbMxD2jce2RrvK
3maS/MbbXdHnEufj3z+OgLY03aB7PBFh3/jvgWnezEMawr4RfNO881hiBsK+
kevxm4v9YALCvnGtaqkPnTcWYd+4UFowdM0hCWHfuB6hCfb9dIR9Q/Xdl+Iu
rTyS35AP82k3LaQj7BuLo8qLKQNZCPtGguWsF4dEDslv8Hb2ClaE0BH2jT3z
JnJrVWkI+wav5InRxK4shH1jz5HKAr94OslveG89r5v1IYPkN85yiS6uakxH
2Dc4i4dmFslQEfaNW4PsOic2UBH2DUnl4adFq2gI+wb/UNkegVN0hH3j42PG
n5lFWQj7xootz/X7fTMQ9g2RFwYdql748/I40CPKhtIpWQj7BpuYzuWz4TkI
+wZ/yntluQ46wr6h0MjlcTIjh+Q35F31ZLJd8kl+Q19I5Pi9hlKS35j5dcrk
t1IFyW/Ui6v/vq+fR/IbPPzpTaq2VIR9Q+p1iqy0OwNh3xDZIZW97koWwr7h
VO+4uUcmAWHfoGu16I1mRSPsG5+u5ve0bIpC2DcOCNbt1n2TirBv3K/XnlhN
YZD8hqVZgaXE4myEfSP9QPHOHVvweToJoF+lIGpGRdg35IWncx6dyUDYNzor
hjautmMg7Bu1dzUV9/z7XI59w0qMIvDRmvx+lzWfwppPYc2nsOZTWPMprPkU
1nwKaz6FNZ/Cmk9hzaew5lNY8yms+RTWfAprPoU1n8KaT2HNp7DmU1jzKaz5
FNZ8Cms+hTWfwppPYc2nsOZTWPMprPkU1nwKaz6FNZ/Cmk9hzaew5lNY8yms
+RTWfAprPoU1n8KaT2HNp7DmU1jzKaz5FNZ8Cms+hTWfwppP+X/Np/wP82+z
+Q==
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"], LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
             "]]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.19, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.17, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.13, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.11, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.11, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.13, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{49., 4.999999999999943}, {28.000000000000057`, 
       4.000000000000014}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 20],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{{}, GraphicsComplexBox[CompressedData["
1:eJzt2/dfzf//P/DQoIGUSiIyErJHGT2MikRJA6WUEmWkRSokKyFS2pOGEKWE
1qNFu86ejXPauyhCqo/v5fU89/cf8P319IvLuTzreZ7j8bjfPa6Xx23xKZcj
p6eKiIiYiYuI/L9/H1v1UdQLirGC6rIqhwAbpLhf4fWrlcX4jlsPPdVRG8dt
2nVLM6IIe/bT5vDjrNHyxc5WGWJFWEv+RXAuyRydmL/ijGNHIdY7JLbJU+Ug
Pj/io3i+uADHW1bckpCSRz619eWuMfnY79O106ky1uhByhKvK1fy8O8OxTfd
Oftw1I0rK64dycVLHkjutoo6h18dq2b5a37Guh5huWxxE/x5ver9gOmfcH3U
9YuayWqoUtJdO6g1B3/ztN3Y9tsQsVq/docUfsBJE4+mzzPfgLvylaMiI7Px
MYXwI62PzPGvZxcPxHtkYdb9t3/cFR2whEvJnyTj9/jj4UPaC5Xm4//uNxMP
tKndzfa9QNxfBtZa1XzZvsgD/Xc/6ThJyT3kicgp4vpf4y/rUiqL9toS15uG
ZQJH7Hn1ZsT1pWCXW7FSn99cQv9dTxJeeazAYlH0EfTf9z/HZnYB594M2xLf
l4AX3p/TtP2VBXH+aCyN3l15sf8Q/u98YfjbFo3ZhqEWxPU/xcGP9w8dmmGK
//v9B9jgaVf+k2Rz4vz+uNAvLMRew5D47IYNH4oxNRwckQjxw6zNUbazDibO
54bOL2Zc7f+eRXz2RymHW8IczfIE50eJJhUhoz35gu9H7vmcwOtSWHB9aIlj
HelwCSZ+PxqdPpDCS9hUhIn7Q4Yf7cW2pRcRf/8cDdtmXaSYlRDvKwlRR6jL
QoNLifOloA2Jb7NeOJcKni867bv3uIVoGXH+18hXb2Pnt9ZSYrylI/08pC7j
UUp8XwZKmWy/Oy2zVPB+0TTnYCUX3zLB+0c1ZD1z1eVlgvGBzr2tyh/w/SIY
P0jaxzDQVLkcE+MLJZJLjETby4nry0F2N0NmRVlWCMYnqnhroWkRUiEYv+jx
et4KWma5YHyj4bqOuXPflhPXn4fW6+4J3TFSgYn5gW73v0y0kqsUzB9UJmf5
Ml++EhPzC60+3btA36qSuL8ihKstdg8erhLMTySVd1Ymf0k1cb/FaH3Dq9Ox
ydWYmN9IjRSh941XRdx/CdJr91VSy6vEN/wj1NRaStCBO0NOra2VxPMoRdHm
qa01z6vwpTRdNxWJMnR4Z0SHY0c18XzK0HqS2J7K/BpsSxoqVlj9BeVa7L8t
nl9NPK8vaPmS++U0+WpsMhojK2vyFdGXxzjMba0mnt9XdPFZ2U1ZqVq8e6GB
ndTlcvSpaItG2Y9a4nlWoJ/29amfmmvxBr0fGWLRFShnk71je0At8Xwrkcex
L82l/rVY7XyiiEhRJYp80H9U8mUt8byr0Lf9q5Oc5tfhOSGHDv9pq0L3Op+d
KYytI55/NcocLznalliHp+X+jh+ZUYOs47oXkel1xPuoQZlmmxzLbtfjYV7y
4MCaWlQR4nUiajaJeD+1SGUyOOWmPgm3SRxB3aZ1yDtyuforSRLxvurQCrn7
DBcLEqatmQhq9apHsWrW23jyZOL9kdAYta7m40kybllpPjhgREI7X75QHzhB
Jt4nCb19Lb0gcJCErXRWKZ7nkxC7+/5Fmbck4v2SkadimE7Av+NUkymo252M
DsS/aDOSJRPvm4xMYu/OZMeRseFppqOjOAXNnTCI2cUlE++fgkLJpy/ETJJx
qVd6UGsEBXnPDHLcso9CjAcK2lYkj4IlKHj7w1s5tquoaB3FudKggkyMDyp6
StuSa59Dxtnxx5saC6iInBjvVFdEJsYLDa3/MnLw5FIKXp21VtzqMA1dSprR
fdaDQoyff8dfTGvQz6TgpK9ia1gtNMQOGvx2l00hxhMdaf1uCDsuScUqHK65
uScdKWSyDcv6KMT4+nd8J3lrOJeCn/VnXqNIMNBd/tLk0alUYrwx0FbGQ1sv
LSqWmRKQbBzFQKW259h8Wyox/hhoh5TmtJu3qfiOvE1tzWomcs5SmJ6fSiXG
IxMF7HGY8/YHFY+rb/phgJloaW29rOIUGjE+WehJQ3LFz0Eq9twuuaDchIU0
6Oj+kq9UYryy0C/SiTFGMxUPGPF0ddtY6Mj+y9t6tWjE+GWjN0N7Zxmk0LDj
qZzzxZfZSHJOytbpXjRiPLORV9i7nzbZVNzk+TBUZwYH2WUw4h9o0IjxzUE3
2i5GyG+gY4v7p/LzojloZiavmr6MTox3DvJ7KCWp3kbD9TFabVpruCjPMbqP
w6UR45+LdoeVPAzaQcf7MmZK5xRxUd/fgXtrV9GJ+dCAHvImf/i30zAubdu4
0bQBpWyRyaveTSfmRwM6tKqhZQaJjrcyc60y2huQjWbg4Y9bGMR8aUSTM3XM
7OQZ+F3Pk1uaXo0oc5bGwI8AOjF/GtGht6uWpe+n4xUTjq9fSTYh6TTPfbNc
6cR8akKKWqbqoil0nCC7k6oe24TcD81ZMG0lg5hfTejE2Nnf9k0MrLRMbixp
bTPyW+V7KsaBScy3ZjRzlKPyaICBn2h1q6mVNP8bX2hyzkkGMf946IPHxECi
BwOLppxMNl7JQ+kbtccP9zCI+chDG/4s3mtrycRF7w5oB7nz0I+37hnPjzOJ
+clDNvPiZP9+YuBrnzfX1uTzULySM2vnawYxX3noz4Gcynt7mFi7dJGdlDgf
5Rd4tM1YzyTmLx/lGtXsu5XAxD9qpH4YGPPR5dBJcS0DFjGf+ehby2xOhBwL
ZzJ+BgRE8FHE0TjmlmwmMb/56IhtM1k2gokv8Pgq5Xw+OpjlyJw9xiTmewti
qdif7hVhYY2emgyxVS3I6NnNO2OdTGL+t6BV189UDi9g4fbhj7q6Hi3IVtI0
JOMMi6gHLUhyW2/u4WMsnDj+nOVf0IJ2qX4PsnVjEfWhBS1ODRfVkWRja4mg
88XireiaXoddyHQ2US/+fZ5QUf+ozsLKsldFRA63ovOmC7Z2u7CI+tGKdinO
ryLTWZih7BCqE9mKTlh/7jcrYhH1pBVJyRk4P6Wx8NOlxiuutbSi6GC9G8GP
2ER9aUN2Jh9aw3awsdGabfl5q9pQVl165bURFlFv2hA/RytT0YSNJbWWHf7j
0YZsVWzUstxZRP1pQ3py2xXHdFj46+7ZbVqFbchH4tSJ1+9ZRD1qQ2ah4h+z
3NnY33DsyhWJdvQ01eRj3w82UZ/a0Z4DJTUTOWysY94hlXO4HdX5dcTtyGMT
9aodjewyml3iwMF/bMjxI5HtiHUr8vq1NRyifrWj6J0Vd85XsfHHs/kbN7a2
ow9tOla94WyinnWgMe2o37UiHOzullruuroD7bixgux1jkPUtw6kSVLDm7U4
eK3vU6sMzw40KuLx4p45h6h3HcjrqsMC46sc3Hvn2uBAYQeq3nc16MQ+DlH/
OtCjrpi7ql85OPXx2Vua0zvRRbOpD/7M4BL1sBON/BV3er2Yi+0jTRXPm/z7
/EDR8p0Ol6iPnUj2glLlCxYHq77Qef0qqhPtWbhH3CGdQ9TLTkS7lfvbpIWD
uW80UHdrJ/qqN3GGl8kh6mcXOkNL68vK4uDwHHmqumYXMlou51fnxyXqaRdq
4xkr1IdzsVnRpKPj5S4UMjYz6XU5h6ivXUjilZhf9HEunl3V8ycJd6H2YlH7
RR0NRL3tQnmXmp4k9XNxDZUe1Dq9G12amxmmqMUl6m834j7K0uY84+KAxiI1
tSPdqMVMI8qwk0vU42605zH53rcMLtbtfJ1jG92NRAy+Tx4b4RL1uRst3tBj
TnNswCLfwg7Et3Ujno/Z3JZ/3/dfve5B+a8W5oVtb8D5f242NWr2IO/qfPvw
4w1E/e5Bk19tx+9OcrGX6AU3lSs9aMbxva8eBzUQ9bwHiUYd9ehBDXjTzGPi
VkU9KDCfWjvUyyXqew862SHL8JZvwN8U90ZFzuhFG+LE1o5JNhL1vheZtFxS
HCxsxOmL16xhHelFQ5u8Z8daNRL1vxf1WRx9pmrQiJ1WzStRiOlFHme5hVIB
jUQ/6EUfDikdXLKzES/bLGph3t6LVu/P6/qAG4n+0Ic8h/qiN/1qxHydwe6Q
NX3oyucHGotfNxL9og/1PPjlG1HViGP3c65RrvShmBmrlTquNxL9ow+JTqkY
D6xpxMePfJGVLe5DvnI/m964NRH9pA+tk+2vN3rahOeeyEg2luxHO/NKdfJb
Gon+0o+kD79WibrShMmno7WDTPuRgmpBrtyCZqLf9KOtOyZtP+s24yCXu7U1
Mf3o/G6t0rP5zUT/6Uf9ca6F7P08fOCqq51URz8acIsp/zTWTPSjATTm25LS
Y92MxW+d+GGwdgCNJIybz1DjEf1pAJ0plrM+9ZSHSx7uux/gNYBWnjB1OO7D
I/rVAMp+I+s15wYPXw/bsKC8eACVTvavSjDkEf1rAP325tj+/Xd8W8KCTDGp
QfSF0xb78Cif6GeDaFx+AVMjm49/pk3X0zUbRCVGKtIqGXyivw2i4Nw+c1lj
Pn6fNczyjx1Eh1zYw2pBfKLfDaKup0plWoYt+GJB0/nijkG0NSRi7oJ1LUT/
G0I8f13S2yV8/KzVQUREaQgFz5x979I4j+iHQ2iya+ruKfP52P2s5YH4HUNo
R8SS+/fW8Yn+OIRMNN77DeXysEm/caiO3RBCKxZMtGfwiH45hBZ37IlMk+fj
tW56TY13/h036C+4vp1P9M8hZBzx2+n6Az6WGd224tqrIZR0UTpIxZRP9NMh
FLc45ZRcMA/3+axzU6kfQu8rtwyf/cEj+usQalgd02zL5+MqkeX5ecP/rtel
YYnZlhai335DBXKf73j/4gvWPzjL+Oqund8TwDemV0gPx9vEI4FvKE1f3RWc
mwC+0Z3M+33GJQ58w9W3x3bIPhwJfIOhXPDUYyISfEN85u29LndiwTfaz8wz
KagKQwLfSGyd5yM7+hQJfKM5MNxp4EwYEvgGitg8uNUiHHwj8DsnwcUyAnzj
qrTT/NYp4UjgG5xfOzz8s8KQwDdkRd/f4cmGI4FvUNVd3sgaRyCBb2hLr6tz
j44B3ygYiS+2XpsAvsENnKv0pycKfKPaau3ev99CkMA3/DUXndeVTwDfOCxa
e3/zriTwDUOX9OgJn0jwjaAS+yDnq+HgG84lS1Q7gsPBN64negQ7VgcjgW/c
k3mlsH7lIyTwjdmu72pWaDxCAt+o8CgZD9//DHxjHuVYpLXqs//5hje/p239
Q/CNz2EHnY6o+4BvtDaYUpPjX4JvhJ5XsikTyQbfKDhZzJUbzgbfiG19bf+A
nAm+8VL8/mYL6XfgG28u8K0PRqWBb0heTczOWfkWfOPg84JBucb34BtT7utP
XD+aAb6hpnZwY01zOvhG19QnUy3ZmeAbZYqFS0PO5IBv+FH3uPntygbfcFD0
SNXjp4Nv+C6oy18o8wZ8I0RZnpIlmQC+oeiydvVt/6z/+QbZ47TZwTzwDU5x
Qv3n6s/gG9V/D5Rwxz+Db6i+2bKw0yoffGP9t/ETKpaF4Bvfq7WWdhcVgm90
vbSvmiVVBL7RefqVhXtuEfiGX+9gwMerReAbvwy3RPR0YfCNPb9L7E8YY/CN
gU3qW1bLF4FvmA2rfrxZXwS+8S3caHFScjH4RsDqxjkTRcXgGzLSoihStQR8
I+4gpTfjfQn4RvuhWSRDixLwje36vp7u10rAN6qiuwe0VpSCb1w3sPkxh1oC
viHil3bu1ZdS8I1ZvmLux26XgW/Y7nlk2fi+DHxDZmlS+vY3ZeAbQ7YiZ0J4
X8A33L6/uzgz6iv4xmh81td5Xl/BNy4OmprNfPMVfOO27pL7t/K/gm/M+IHF
ttV9Bd84OeW2ecmfr+AbiTLmZVrd5eAb2smbz+TRy8E3Qs5n2YSUfwXfMB8V
X1e8oQJ8ozDw18rQFZXgGwxyxTL9sgrwja7qODe90grwDd1DdkHlcpXgG35+
Tk+5ulXgG06laXpPmqvAN3rvGvwkZVWDb1TaRzlEt9WAb1xYtmLW0+Eq8I0t
d+cHNqlUgW8Yy+/xqhytAt/oTFF3fWVVDb5x7rb9nmu+NeAbSfO+qelPqQXf
GPeNWuzpWQO+oS8iucs2oxp8o1ahZKPKplrwjc3Z4gtRUS34xrwv1XFqF2vA
N0QOiHtm5FaDb4zRGeX7w2rAN1y/KGb7HqkD3wiff8HCnVoHvlHfkJqx71Md
+Eb8uRgb5vc68I07EWZpmm714BuLUpYkxTyvB9844lZ4jt9XD75x1+3axh8x
9eAbYzb+czMY9eAbV+6y5s5IrgffmGchs/+eIgl8I+Si7EcNfxL4RoXBI43t
kSTwjZ/eygGWT+rBN+LCSQsGo+vBN3IGr/c87iCBbxQEzQnN0iaBb4iHbhOT
MKkH39hR6u5DkSaBb9TcDPTad5UEvlE+e1hWdowEvrF4OOS66S4y+MbaLXIZ
Rk5k8I2jZfwoXwYJfKN9qGdaYwQJfGNglPWDIUEG30gp8WySW04G32hovJvv
s5YMvnEodIl76jUy+MbPQ2vOGc0ng2/Qzy7b4SBJBt84uupsTX8gGXzjy8Ir
OTv1KeAb3lSRzz4RZPCNnD7RnEglMviG2PEpXql1ZPCNXztPr2xXpoBvlJzt
CO9eQwHfUItpjHlnQgHfkP55ybTmIgV846pl2Q2PCAr4xp21y9slNlLBN8wl
/bz9SqngG60jhnsoa6jgG/wngzM5lyngG8+MRqNW2lLANyzMRIxl/32fwDec
P/7++MWJAr4x7aDJytVeFPANRxw4Z/IrBXxj1txsQ4vtVPCN7SNmR/ICqOAb
35fL5zrdpoJvJFhpOmzOooJvUKV3uJY6UME3AtMcf30xooJvXD63fp+hBxV8
I9uix3jXMAV8g/7JT7FunAK+sUFepDZsnAq+EXs5l6feSQXfaJ4e4R+dQgXf
yNrm49FdRgXfMOg5r5pMp4Jv6Cm464c9oIJviImU6rzVoIFvyKhtbrKKpYFv
hDek3j92hAa+Mf29iovoHxr4xhTdQGvbChr4xnGddq6OAw184xaOOXXoEQ18
I3rLoSFyAw18Q9eRo+urTAffUKEM7qxIooFv7L5wwdlLgQa+8WRdzbk9d2jg
G0rMvKUjRTTwjWf9nTbGJBr4hjX1TYRLNQ18w2D79WO8GBr4hvop7TD/f8cF
vhGxoOhP6w46+Mb+8sOWN87RwTdWXf/x8ekoDXxjSf4BfennNPCNtxZ5ew/r
08E3MmaJdU21oYNvFN+yk3+0jQ6+QVoWGLvmKR1841t6yQO/MTr4RtpQGF/l
Ox18Q6RyXEStiQ6+saL5unNdMR18Q2/W4pUMWQb4xlBy0c9qQwb4xoLZl+WP
bmKAbxTudaZYZ9HBN2bknNh4fTsdfMO/71aJRDIdfMPBx+aY2AwG+MZouYSO
eyQDfOPMQJz9n3EG+MY4f423yisG+EarGou97yYDfCO6N5dRfJUBvlGT3fjw
5QMG+MaOvKMJI7UM8I216y31MwYZ4BvX1meI+fgzwDecy1x9jS8wwDccaKkO
BsYM8A2nCRH5Ik06+Ma8X0s8lR/SwTf0Q9c48asZ4Bs4ZWBSVooJvrHpbO7U
OZgBvmHwLtC714cBvrFtxTvuxkMM8A1LzfcvdzxigG9cPjbQf+oBE3xjxWX7
0Y63TPCNoXBNA54ME3yjYDNNOXMDA3xjsU3ggeByOvjGt78nXPiFDPCN14/y
lj06xgTfWFmDNNMuM8E3BpIqjubqMsE33P1lflRpMcE3Iha7bqUHMcE32uXy
562kMsE3Thbf45tuYIFv/D1tqll0jAW+ETvpqpJ+iQm+cfHt+ZN2iAm+Iaeu
k3k6mQm+Ye+0c9hpBxN8w+3VwV89t5jgG30ZHlnHNVngG2ypaX/XybLANxw+
JgQ7/2KCbyxWTxpu/MQC3zAjs1mvv7LBN6bdmvE09zkHfENxY86ooQQHfKOG
JLYrcx0HfKP8lwn3swgXfGNs6h1/tW4O+MaJZhnP8vNs8I2HtRPblvSw/ucb
pwqCXarY4BsaYep1PiIc8I2B1euDVX6ywDdsXjQ37eGywDeW0HxyyXZs8I2R
9a97fpqywTfEfLKb6k6xwTfc5K/Uhf67X4FvmIqKLft4hg2+8SKDP+NdARt8
w97/S6F/Pgd849F0vfzNz7jgG0y7ewcH3nLBN26NpXdekIsTrI9wrUxTRI98
Auzf8HcbT99XHCtYX+FTe9+kHv4QLVh/YV3yyuyPyyJh/4Za4IdbNoxIwfoN
j1rQLHJbIwXrO3y0g9O7Sj8C9m843T1h+LIxEvZvnDnek1AZEAH7N2ixPtov
pMIF60u8qjfJmhwVJlh/4ou+6a0PQsNh/8YL7uMmndORsH/jbor17QLFGNi/
4VHC79p9JwL2b/w9kvpGf8czwfoYN5mSyu9PPBOsn/H7Mq1hunOYYH2Nxzoj
PPumRsD+jdLK4uqHQbGC9Tn2fNGuLzE3QbB+x7pl9CdRK8IF63u87dVN9xs7
QgTrf6znavciLj9U4APY5dlgxVB8COzfSNS07E88Ewz7N7yrbJcW/ngC+zdu
nFrW0R7yVOATeJazqm35+RCBX+Cl2TaT9ZN+WOAbk57K0f1D0eAbp82mSk4P
ywPfsFJmnBE1KwbfKE7sTL7gWgK+kVQlyv6k9hV84+rS83u3T5aDb5zUpqW9
nVoFvmE6O976a30l+Ebh0L125e3V4Bvqybdrzo7WgW80aAdamlnXg2+Yjepk
Ts6vB9+QvyGxQzm0BnyjRtpmLqe8BnzD/ffAiw/d9eAbpimju6r/kMA3rhpN
41YspYBvJFEKMw/FkMA3qvQHLunsI4FvrErkcOa6kcE31paIqC7hksE3iqZV
nj7hSwbf2PMhQfbQfBL4xsDWzMgPY/XgG/kus99lD5DAN57kmv5cnEMC3xBb
2NLKY5LANzQpjVek7MjgGxdlHFcoXaOAb4QsMv+ePI8KvnG3RTmwYScVfGPl
7W+bVGdSwDemGM+c9YJDAt/Yc+NilQKNBL5xYG3hBQ8DMviGddiTiV15FPAN
+fR992Zdp4Jv0AOo0j3qFPCN0xPsg4avyf/bv+FYvmaXCAV8w5G5e397BQV8
467qkI95DBV8Y8hknBR1nwq+sVO09X30v/WFwDd2nrzwMn8zBXwjLi/EY/wc
BXxju8lU71NfKOAbunqiL3wRFXxj9bRWs/JtVPCN9Fj1ny7HqOAb/NoZoiue
UME3RswsxI5uoYFvDOyritXWoINvGHw0yBkeo4JvDPGehT9TooFvGDfQ7WL/
9XeBb0zdY8SrsWaAbzDTFAJ+rWWAb6iGt11KyaeBb0x808k90kcF37hyTmLq
CjEa+MZb6T8KhzOo4Bt96lfndpfSwTdmad8dln3JAN8QiXy10OwWA3zjlkFA
aDiPAb6BCkcbWkl08I3HitY3h2bRwTdSnRNapTfQwTf89m7LOp9GB9/4fX26
X8ZbOvhGxcCsve+nM8A3GPaJZ31XMcE33v+ySvtAZ4JvuN6rqwyqZIJvuN9I
3XkggwG+kdx3rszj3//HBL6RRPvhWp3G+J9vXK6WvTPKAN/Y67m66c10JviG
89792VlbmeAb6ZpGlhLHmeAbldUzHvBVWOAbVc5NSgwFFvhGq+dJcScZFvjG
djO3KuzBBN84ufElur2TCb7RqH/SMJrFBN9ofOHNcbjNBt/Yz7LnKamxwTe2
7uRNXePPAN8Qp0S9tp/HAt/4c33X2+Q8DvhGc9whFbYOB3xjU/jDaHFjNvjG
u/y95Un5LPCNU9rfoiq12OAbaaVVJ2f3s8A3iv8uMLk/wgLfcPJd65bbwwbf
eG3TXL8jggO+MTcirsRyHxd8Y8muH736vzngG4oP1jjphrLBN1JmajRLXWaD
b+zp/nIkl8kG3+Do6vgrF7PBN1R9029VyHDAN3YuIWsfXNoAvnHAeXhmfEYj
+IbCs+xit5kN4BufmufRdr3ggG+89FPQt8zlgG9oVYdaf/fngm8cn6BsGNFr
AN+4NG0Jn6TcAL6xdZqCztC/5y3wja7lZlvGnrLBN+QSF5nstOCCb4T1/P6s
3csF3+AZJY5weQ3gG2G0iUKbpU3gG14zV/w9V9AIvqFp33t791AD+IbOlE3B
S50awDcCTebZV+c2gG9c1nP1mn+1AXwjfdrg4UeGDeAbOQmJa94HNIBvDEo4
f4h1bgTfeFDlco1r1wi+IUl9z/C81Ai+8WRU9/P2xc3gG8sohm+OyTWDb1R2
ad9kmjSAb2xb5/fo1a8G8I2EZXGy08WawDfE/UYdi/IawTfqti/7cIPaCL4x
LK306eHjZvCNguepATeMm8A3jvss/xBv2Ai+sTq4ksX4d1zgG5/uxtPt+rng
Gw9aeknPPnDBN2JITQ2KUxrBN5Y7XZJStmwC37irZHFdYlYz+MauNa/Mbpo2
gW/cXNs4mUFuAt8wC1Tk3jnOA99YzHQM/sRsBt+Yn0TraKM2gW/Quc+O3jvZ
BL4RmXDPcvWWZvCNcLvupOkLeOAbWjrSXV1JzeAbpm3qB1ddbAbfSFvlxVt4
rxl844LsuMPy8GbwDe/AK/bzPHngG4ppS50ojjzwDRVP0R9pbjzwDbmqjvqz
iTzwDXVLU++Hs3jgG4+Div32nWwG35hUaJK9R2kG33hSMlEXd6cZfCOtknYx
MrkZfONN3NRzrVd44Bv9jwaVu1154BvTO1M3ilg1g2+sDCCF9d3ggW/wHS0M
7Pa3gG94e8e8WzSfD75RyLzZE7qRB77BT3sXtciAB77xrvH4WaOzPPCNvQtz
D7Ra8cA3Hm8Vl/uQxQPfMM1/6DyswQff8E5sr5N5yQPfWFj73TmGxgPfaHn/
eBfm88A30NsAb4NCHvgG7bJkX+dRPvgG+d20Ej0lPviGxU5q6WxzPvjGkZ4b
0ReM+OAbs8wueksm88E3hoOuKjpqt4BvMEUWzJL/ywff2Dcpy9KQagHfOE6b
Rna1awHfmL4Vj97+yQffGJpf5ir6hw++cWrz9kXFi1rAN/z6R0TXL20B35Bx
DRpEmS3gGw85HW4LolvANx75z9NXvtACvpF6UOmg49cW8A3lVYe0/zBawDcq
zjbPObmrBXyDHLT0+SZuC/jGwSBR1TTzVvAN3Q2LzZZatYJv5Nt6UHRetIJv
NARqO5qebgPfUHW31z61tw18o3TZ6lHtwlbwjZNrTlBPuraBb6jWBRQ9vtsO
vjHP3u9gwaZ28I1hEScFr8428I2Yqxx2alAb+MbeqDav0mnt4Bt/E0d3vzrS
Ab5hsru2ePx2x/98o2FjPWdmB/hGuNXEO9+odvCNLT/f7euf1gG+cV4jIEpe
oRN8YzBpoPtlbwf4xlyFqR2/n7SDb1jnJFyqv9MOvnFjkfrnqsPt4Bv2pzeu
Itu2g29o5Fd/ovxpA9+ov171cOVIG/jGhpZ95s5e7eAbd3/fFp9a2w6+oTIc
4fDsdAf4xkzTxuyBknbwjTnFlRsML7aBb8zJ87X7I9UOvnEvgn7Sz6EDfOOT
VZiTzPMO8I3Hl9e0X5vXgYX5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWY
TxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhP
EeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R
5lOE+RRhPkWYTxHmU4T5FGE+5f8nn/J/UX8DHA==
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"], LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
             "]]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzX881Accx/HLPULKXXRMWj+Umhats2rE+kTa0YiJktL51closaxfSId+
kZaMlkoli5RMOOmcj+RH+ZGf58e543sSnbv0/V71mLPUbn+8H+/H86+XRfBB
7306NBrNQ7v//+Xe5uF8z0Q4qR58zfMR4ng4mbFlKhGiNQYkO0yI6hiTLS/z
kkAwlmCpOSZEWio3f9FUMsjduPPjbghxUcW7iMy8M7A77Kanz7gQ/ZlffkjU
nAf73PzObQlVqOAK6MUdGeD87U7XQ3dEGDRXzzQlNgdW5lytKlEgGi09QYfW
Qhj0YMWketXi6HW+rUfLQ6i6kpvxNqwOr/2k4ROmj+B01FOa0Z4G1Js65bK5
WwRHJ5N+qAh8hmuo5oDmy09gmqGuW2/dhALuUKf0RB0EVwjrrfRa8G6QxxdB
fo2QCzyi6mkrXqJ/KpfRmoCe53KZ69WG4sX2jNrhFlgYEphkeLgdGVJBTU5G
Gwj5mjT26g6UZHIsjizogEefY23uD2g9NVndea4TeCOG1LmLnSgubj5XONQF
cVmrXCS2XTh9K4S93lsM46H2SzdKu1AqK9j0r6gHzOjHfHfHdaMgnBnvaNQH
TRwdg5Q5YhTZOmSx+f1gSdP58PdtMeKPZ6W5fRJ4sDf98RrrHpy4lf250V0K
zuln1dHCHux28k9Z8VgGl4p1JWWbe7Gc7eA8gzkEf1xRvbHGXgwujlJyNhEQ
w6gz9XXqw7EDPu6tKgJ87o00ZFf0IaeDEfQ2Uw4t3xSOlFv14/ddq0IjPIYh
JqTVMPpmP7Lj++P/mhwGQtrWlG4oQWG94pT9w5fgJTvVYcuXoEVpu9PP+0eA
ZbNQbUdKMNnVlbXL+BXkyg6cLvUdwBNxS8W3ml7B1/u2tN5+MoC/+aXdLzg8
Ci+CzB6ct5Sia/+L79wXj4GjSXvRSJIUSyZ/LXHrGYPVAzbFBQopmtXkO83k
v4bHB8roSzgyNFkBNeYbFLC/lDVOFspw7tow34lRBaiVlilduoM4OrovZ+/F
cYiMaAt4wh3E7XaNYitXJZDOZxJ0cBBF7MplJe+UIM1KTpeYDmH1c8PAjCIV
1NDUazUxQ5ita+9lHPoGGnafPh/QPoQxyvc7PBkTQF2mhYYYEzjyyzz30YYJ
2O7AdqgEAr2za3c6HHoLFtxp3/vhBG5bl5dqyiCh6EoZ5+glAqsj/wyuCich
Nq40LaSaQJvJbhcnJCGen/CP0RiB5sbqJVhDAkQSHxu01rVmTjvWksDbLP0Y
+5rAQa5buV09CSzbe6pXCgIvNoqWr2kmwdqnK7VSRaA6647u4l4SKm3Kn3PV
BArWHX32cYKEf/THtxVME5jrmZl3nCRhPvNp4Z5PBF4If3hykiIhigyfYfSZ
wLDrKrv370nAxK9uHKPJ0Wxm0F3lFAkV8WnXttLleLzbLUWiS4GGHnhTqS9H
3gSP56dPwTqDjrs3ZsnRWz/ZuWcWBVeLrB5sN5DjKsfqqY45FKxUpecLZ8tR
ets24rkxBdFzjwSkMuT4TOTJ4bAo8G/mbASmHMt7I5fVm1Cg5zfb/J3WF2bn
D9SYUbB1MqrW30jbX15XsdGcgrPzTH9nGGv7IM+oWkDBELNsR63W3rs+Hdyw
kAJalPv8w/PkCIcWuD9apO0LiJ6VLDn+B6KWnBc=
            "]]},
          Annotation[#, "Charting`Private`Tag$51986#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], Thickness[
           0.007], Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVjns0lAkchqcUlVBCDt0mW6ctOti0En7jUsM2kqlmVSuhyGXTdrVuGelm
qhWHWocKI3RKm6I0jd9QY4ZB5vIp09DkMtJYvondM0aXtX+85z3vP8/zUiMT
mYdmUiiUoOn83/37JX0VwZkAav7d6F08/BhL5m0xZAJ9yjlqIpSHn05Yb+nn
noUdNlz7zDAeUjjhFcsMWXCAkX25OJqHy56Mx+dzLwD7KeuIIomHey2W/JM5
eRle5Iy5+BbzcDi8zuiBNA/oPtT6pRoeRiwwsclOuQnbS7NEitPPceHKdCNo
vwvZU/V7mx/xUVPMdg1qqwHaikhTsbIBi0Im2Wqbp3CvKoVB+YxoYjjn76fg
g8PgjJm9hQJ01knCJNcbwWnfmRE/p0asC38nU6W/hI4lG3K1kkasighaHBEq
gpYcakZ1TBPmGn2t7aG0QmacOHVS34TE8k3mTX1tIPvjzobzBS/QXFUnuJn3
CnrtvKcKv3+Jynw69bS9FLaGms+T1E9vg75BdkkG/u+tFZ4sIRIPJJfuvpMD
pbPr3sYPQvxSEuWykUlAyLxXtGPnm1HVU0mb4nfB13+/LWmhirAu1iLNc+Eb
OBz40aSyRoR8180FLuxuiB0yrRYHixG3XVSVvlHCGq0m8rc+MY6WFH4TMVSQ
6jEp28duQYXP3uzVz3rA0dOfE7G0FWtdNvvOsHgHN8oCmGPVrRj54KiWTlND
EStL0cCQ4NCvuxjtI2rYn/j7IRu1BOlS84ix/PeQ7FHhfeloG3rJ1x2MD+oD
x5D5ci+zdnRJ604r1/dBUfvaU8m32pEnHD63qaYfSvIzFHqvDqQ+6vSJOzwA
RgssUnK7OzArIMBqj+UgUEmW8+O4V5ieupIoaR0ErVl8p+msTjwZeuVe5SkN
cFkmOeygTgzo7viRsXwIOHocz8rvxIf6Yw8Du4bAi2blVtXfibaCCp/Z7A/Q
4SFMu+YoRevVILDzGIa1bxdyC1OkuGBDzO5RzTAcXM+TxgilqNEcurk/5yO0
KTPKmsxkuNNdRKwJ0ALFqY/p/YsM+S71Dg/HtWDpentuerkMG1rMDuTdH4FR
1WRx74QMC4037bA8+DcY1Ildbb5yPKGdYAWbj0L/dV+bMxw5DhxZxNA0j8KN
ib9+YCrlyCxs+nnz8TFYNys1dNhBgdvduBwbcxJGEqKo5gkKbEi4Efk8loSk
FI1o5zMFOukV/j5IwoBn88kwIwLtLD+tQAEJge2VBWWzCDR2tPji2URCdRjn
yfBsAnvDA2vdhSScSt8xeXIOgTki/ipnCQlzBcrUq2YEfiq4Y7z8NQnr/cbO
4mIC69ySxJ9HSTgdaJtLdSSwNDifm0yS8LbbUBPjRODV2JoMvY4EWlyP/P56
AmOKR9wnJqZ5nFJrDxcCbWdHVGkNJBS1Of7J3EhgsiIwW2msA0Gwz+2zNAKj
R6OjQ+fo4Du1Q2OLD4HMOVm+XXN1cPGocZ+FH4HrPBsM0vk6YF6TOBRtIVBV
5hrfYqmDAdnuisc/ESjmB9PpVjoIjHIXG7YRWPs6wUForYPqcbthWtD0P9OK
twJbHSRZqde2B0/7V7184m2nAxW3aduikGk/vM97bq8Dmlt5wh7mtH/P10SP
pTooF164cmsngXDcnvF0mQ7mseKqB3cR+B/NNZfo
            "]]},
          Annotation[#, "Charting`Private`Tag$52033#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 
            NCache[
             Rational[2, 3], 0.6666666666666666], 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVjms0FHgYxlWbdKNmkdi0cjjtqS2m0ozLvnQ5tI2mpHU5RTPVZEI6XbCF
EFa0nZZou8lEiFpR7mbeWesSgw0zROM2GMYw/hOdg1x29sNzni/P7/weM3aQ
27mlWlparpr83wM+Ilk2Mxp2RJfPcdwrcJRLkg/ORgN4jzcL/Svw81WDgwOZ
t4AWazJpdKsCtRJ9s01nY0AUu3dXdUEFmpZM+qdk/gZSlxXPtPUq0Vvvuy/R
M3eAfoR7266+EhW+xcvyW5IB3FfW+tkLkLVuhWHCjTRIrZ57M3VXiOu3RCyD
plw4GyPiijP+QfnTKKprYyEEy6wn5kNq8cmxmag+w1L4kudjQdlVjytmYw/s
F/OBnag9p2PaiFZq0SnRg7+hQ/DVzaqpGYt9e1ulEdWg757X1yf5gC9ZrhtY
nnUQH9G6tZDeiknLFoq6tRogTc8mmRfVhpLNdN0qWSP88OQVk9ovRl1psTAt
+V/YThG2dVu0Y1eKs1mISQukvw6N0GV1YNfstKD1disEhY35NL/9iJJ80e3c
3jYQ1vjJ14534jzvjLWNmwQW6+Jyyxw+obQ7x/Ervx0GFx2vxMVKsZirF26/
/iPsLFt8PfOuG/lUu1TrqE5gMU6YN33tQTwcL33+sQtiAu2C/A36UMV7tFjH
kEIsw4h9v7QPxU7eCZbl3TCjHLZp9ujHImu7fUv0esGLm9CaqOxHdv4lpbNj
H/C/9BQqEmQ4HOjOaBrrg+P8uHMLpgPo3KLLmkjph6nm/IqE/AF0aNt21t9V
BvGixx/eHh5E6/DO8BfTMrixy7z+k3QQK2oUsfTCAeDuDY57+OsQmr394HTB
bxDe0U6GqChyjHFx0feiDEHe5KumcJ4cI8K2SHgNQ0C7tSMl3W4Yr3n+/ion
WA6cJJMGY9EwunQ272VsHgbVZXYGx2MEC6YvFxxqH4aNmzoa90+MoJEw22l5
1AhkyZR+vDAFGliC0NhWAakjTJc7BqO4bvf5Eyq5AgSPvT3WZI6iXH4uzefe
KESUZLhH7lTicVqdZKuLEmKuDu+OrFUi37rMvGBSCQrDrHjq8TEU1K89nfx6
DMoD1k0GKsfwkTb9KOXsOKxc1WmRGzmOV5VTvzB1VXCqpmzyzWoVDl78liGv
VUFFzmMCz1Xo9qjKw+7KBDw4bHnsxY4JPLInM9FQl8D1oDiqeekECgL+ZFdy
CSyh9tjctyT447T4gBMS6A3jeq4KIGhM+fw9CgmkVTefcgwkqL1db96+ikDo
i2/YwRcJ9vgeKqLVaPhnAxzZJYL36vgWViICCnYou/wawc+pWdqbOwgMnWaY
XbhJsHhP6Ps5FYFFoAjfJxF8zkzJvE4I8Gj09IVkgne5hZHTagKiWbubu1MI
nn86RpuaItBq205Pf0DQaDnrpXKWgK3DeV7IE4LXxYcSurTVkJ3kbGuZRZCj
4nA8ddTgvt5d52Q2QTedmH3tK9UwWO8k+SOH4DZ7wWzLGjU4OFX5z+cSlGZQ
/espamj463SiOJ/gez7T2VlfDd5nIo+uKiBY1BFgXmOg2WvF6DsWav6tzv4k
NFLDzy60h3nvNH6L6pKfjNXQ9VTh1V+k8UN/cqWJGhKsIjduKNH4vRaCbDep
gXliroNRShCumDBKTdWwlOWTEl1G8D+Xmqkh
            "]]},
          Annotation[#, "Charting`Private`Tag$52080#1"]& ]}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{49., 4.999999999999943}, {28.000000000000057`, 
       4.000000000000014}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 20],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.13858506964671988`, 
       1.0639756959973978`}, {-0.7214453714562246, 0.039552376815216506`}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{
  3.8184312466796684`*^9, 3.8184319179256697`*^9, 3.818432267484527*^9, 
   3.818432360292162*^9, {3.818432969900201*^9, 3.8184329929577875`*^9}, 
   3.8184330286299686`*^9, 3.818490901543513*^9, {3.8187594564619627`*^9, 
   3.8187594739645185`*^9}, 3.8187595727766976`*^9, {3.81979364923591*^9, 
   3.8197936726974154`*^9}, 3.8197938103521395`*^9, {3.819793871681675*^9, 
   3.819793903933762*^9}, 3.819794016882174*^9, 3.819794194850177*^9, 
   3.819799000949381*^9, 3.819799080131674*^9, 3.8197993295877843`*^9, 
   3.8197997352668705`*^9, 3.8215144463691044`*^9, 3.8215418508849707`*^9, 
   3.821542743858572*^9, 3.821555613342013*^9, 3.8222951737886543`*^9, 
   3.822295362013232*^9, 3.822295572484714*^9, {3.822465051903974*^9, 
   3.822465074211338*^9}, {3.822465142162552*^9, 3.822465148783822*^9}, {
   3.8224653932642565`*^9, 3.8224654099506536`*^9}, 3.8224654902987804`*^9, 
   3.8224662640124536`*^9, 3.822466905213171*^9, 3.8224670081201277`*^9, 
   3.822468072702202*^9, {3.8224698849258313`*^9, 3.8224698997761436`*^9}, 
   3.8224786238715916`*^9, 3.822478699228033*^9, 3.8224790181520786`*^9, 
   3.8224795279542217`*^9, {3.8225508287655087`*^9, 3.8225508903224163`*^9}, 
   3.8225510607222924`*^9, 3.8225525589853745`*^9, 3.8225526619386377`*^9, 
   3.822564431425708*^9, 3.822564571301647*^9, 3.8226559737264147`*^9, 
   3.8226561768881226`*^9, 3.8226562078572726`*^9, 3.8226568008240523`*^9, 
   3.8226577945101185`*^9, 3.822657835675029*^9, 3.8226592028871565`*^9, 
   3.8230909639818387`*^9, 3.8230910663801765`*^9, 3.8259314868419957`*^9, 
   3.8260326013787236`*^9, 3.830501266294446*^9, 3.8305023322618403`*^9, 
   3.8305234021140037`*^9, 3.8305234877992573`*^9, 3.830523546241762*^9, 
   3.830523658635197*^9, 3.830523710772066*^9, 3.8305237749362326`*^9, 
   3.8307604668182106`*^9, 3.8307605999680357`*^9, 3.8307606804201193`*^9, 
   3.8307609139038305`*^9, 3.8317193925505447`*^9, 3.831904829241949*^9, 
   3.8319050056065936`*^9, 3.8319051500856924`*^9, 3.8319687773076153`*^9, 
   3.831969120368537*^9, 3.831969203127263*^9, 3.831969329221388*^9, 
   3.831969528958826*^9, 3.8320667408437405`*^9, {3.8323095467924147`*^9, 
   3.83230956638926*^9}, {3.832310351750042*^9, 3.8323104100104055`*^9}, 
   3.8323107314823833`*^9, {3.8323200293601084`*^9, 3.8323200794625688`*^9}, 
   3.8323201223586245`*^9, {3.8323202098972106`*^9, 3.8323202506490393`*^9}, 
   3.832337480852603*^9, {3.8324038109310246`*^9, 3.8324038281987486`*^9}, 
   3.8324038907556868`*^9, 3.8324039581083145`*^9, 3.832404204768335*^9, {
   3.8324044856586246`*^9, 3.8324045103617306`*^9}, 3.8324045799005785`*^9, 
   3.8343886397886953`*^9, {3.8346714986097517`*^9, 3.834671505728685*^9}, 
   3.834671676904945*^9, {3.834671791542486*^9, 3.834671803384813*^9}, 
   3.834734675650404*^9, 3.8362861336561174`*^9, 3.83628711820168*^9, 
   3.836287218401178*^9, 3.836287465670403*^9, 3.837064211630392*^9, 
   3.8370642573694906`*^9, 3.8370644217594004`*^9, 3.837084498311982*^9, 
   3.8370848629478436`*^9, {3.837084917550351*^9, 3.83708495237533*^9}, {
   3.8370850465286193`*^9, 3.8370850761266284`*^9}, 3.83708513747123*^9, 
   3.8371451986605473`*^9, {3.837148438931956*^9, 3.837148464888775*^9}, 
   3.8373277771924715`*^9, 3.8373278204143195`*^9, 3.8373279594034443`*^9, 
   3.837328088650633*^9, 3.837754829928689*^9, 3.8377549440178957`*^9, {
   3.8377550583230853`*^9, 3.837755077216445*^9}, {3.83775513468533*^9, 
   3.837755161918791*^9}, {3.837755636694207*^9, 3.837755665970665*^9}, 
   3.837755701508437*^9, 3.8377558378243866`*^9, {3.837755905676345*^9, 
   3.8377559215187387`*^9}, {3.8377559632531624`*^9, 3.8377559814427447`*^9}, 
   3.8377560217089443`*^9, 3.8377560704838076`*^9, {3.8377561463526864`*^9, 
   3.837756160531556*^9}, 3.8377562637566023`*^9, 3.8377564000579596`*^9, 
   3.8377565540618353`*^9, 3.837756590304566*^9, 3.837761109068164*^9, 
   3.8377612666169405`*^9, 3.837761418606662*^9, 3.8397533745516043`*^9, 
   3.8478714577280283`*^9, 3.8484122868965354`*^9, 3.8500326016359425`*^9, {
   3.8500327927863007`*^9, 3.8500327986279116`*^9}, 3.8500328733936167`*^9, 
   3.8500380095849314`*^9, 3.8500380755364037`*^9, {3.8500381103781767`*^9, 
   3.8500381172109423`*^9}, {3.8500382349362354`*^9, 
   3.8500382457583976`*^9}, {3.8500383696884756`*^9, 3.850038383667796*^9}, {
   3.8500384332811766`*^9, 3.8500384597118206`*^9}, 3.8500384948668156`*^9, {
   3.850038580728715*^9, 3.8500386474762077`*^9}, 3.851055066736268*^9, 
   3.8510551280459814`*^9, 3.8510555158541903`*^9, 3.851319066959466*^9, 
   3.8513191051165295`*^9, {3.8513199375388985`*^9, 3.8513199615433245`*^9}, {
   3.85245760249196*^9, 3.8524576267878113`*^9}, {3.85245768540351*^9, 
   3.8524577091057663`*^9}, 3.8524587452442293`*^9, 3.8524588926701794`*^9, 
   3.852459227286171*^9, 3.852459279216073*^9, 3.852459309508819*^9, 
   3.85245955247493*^9, 3.8524596004713435`*^9, {3.852459638800417*^9, 
   3.852459660179118*^9}, 3.8526127746111383`*^9, {3.8526128274477167`*^9, 
   3.852612834739251*^9}, 3.852701755497402*^9, {3.8527018289448037`*^9, 
   3.852701849299726*^9}, 3.852701901460165*^9, 3.8527019718392344`*^9, {
   3.8527020156249123`*^9, 3.8527020366234336`*^9}, 3.852702072631369*^9, 
   3.852913978115943*^9, {3.852914022660947*^9, 3.852914054269764*^9}, 
   3.852914117754239*^9, 3.85291416440145*^9, {3.852914202771896*^9, 
   3.8529142148683567`*^9}, 3.8529142836117496`*^9, 3.852914340016137*^9, 
   3.8529143718322573`*^9, 3.852914863272521*^9, 3.852915019869196*^9, {
   3.8529150728262477`*^9, 3.852915101093069*^9}, 3.8529630636050696`*^9, 
   3.852963151813061*^9, {3.852963195122912*^9, 3.852963208986846*^9}, {
   3.852963270339748*^9, 3.852963362867567*^9}, 3.8529635508553925`*^9, {
   3.852964079032158*^9, 3.852964099714529*^9}, 3.852964138828263*^9, 
   3.852964521406137*^9, {3.85296461697538*^9, 3.852964635873101*^9}, 
   3.8529648596433587`*^9, {3.8529650655753565`*^9, 3.852965074153227*^9}, 
   3.8529659386059732`*^9},
 CellLabel->
  "Out[1614]=",ExpressionUUID->"0a87a99a-c8e3-4c16-9dd1-a7c1d1db9e99"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVyns81Xccx/FTSgfRzrrokUJRkiJToprPZ7PHEZEz6XI6E7n0SHGSHZYO
pQudkGvOqONyvmtEuYxTQq2RW51Vo1YdbYVUm845X4c6zcNiv/3xfrwez8fj
vTj0YEDEVBaL5cfs/4Z7L1/JKhVhqNz4cIybGvb3jIVYV4qwYXgoMMBdDTEC
ZT4qRLilm/PRZb0aEqOFk8ldIkw9Gl6j36CGczmKnik6EY4fiitKADW0qTDB
4Ms4ZJeOV8Rx1WC7n99hOBiHZzrrVNxANbxMSwsxXf4dqvRBLryDavBpc9pc
9DoBlz0lep9yNXiXFccXxyfi8EhBVNxTNYy/DwxuGTuKu9z1x99O14DS0u5Y
vSoZl4wcDN65RgOvpGzqYXUCP3FePNMySAOjaSZNJskn0c0iHWtSNdC7ti4s
svcUzrugzGRVacD06s2qY4tS0bowsLfsvgbW1g4FPBGfxvn15SsnhjVQcSyx
4E2rBBdctfeym6UF/fS6GxKDNJxq9WyviYMW1rGNNh4ITscHjlcenfHSQtvz
NoHhxQxMyGcPZIVogetMHg8YZOK62snIuUe0IF9vs5oXlIUgkAzKcrRgmzFt
brN/NvZd643ilmlB5ya5JZzIxkuOd5W7m7Uw6O/RdFSeg/xtmouv7mmh2zYl
1CkgFwf9I+539mnB4fdFRy5N5iI/VNbgNKKFy/Sv/iR5Hkb/69d7eAqFpV1f
fRjlncMyewchh0Oh3fjhNx3vzqGSVW/QZkmhZ3m98578fGwJGTsldKCgmmar
kHlKcXaoZNNuNwqGmztT17yW4hT9yZYmTwqr/McNo6Xf41CmPpTnT6HF8bg+
2rMAibGL7wSfgviwu6tysAD/WPvAOjiMglPyCZs7eYVo5UQqdVEUjEY+htis
O48uhaLn/DgKPFCacp+cxy2Sra7WSRRyfOz3GaVcwG7X/j5OCoV/bjV+am8n
w3bWM5VJBgX+aO/+vx/LULTC4wf7PAp92Y6zDcVFuM83vDaykMIjo0cr3loU
429npDbOJRRa0Xg45m4xVnvkdZv/SOFxf+z0rdEl+DnpOMutpBBr7To4ZFaK
Sqs+dlYNhZqbgqTsiFJ0n+N1K1pBYTLrvEf4tVLUpTpJFdcp+LbIt7PN5Jhq
Dj2cmxSu2LVKe4PlaB5TY/rmFwq3xelmnFo5Tjsgj45to/DEcdGf5jMIVlds
3MrpojAxr+uh706CpbF7d4CS+RddFjbwCdaYGFj5MZbYZhktERBc7Wj4chdj
zmfb4UMQwQU9niHxjG39BivlYQQrVdecqhj7nGSd0AsJfr3Bz2bBrxSk1G11
aQpBnk1jmI6xIH6h0vg0wYSMd40TjK0/TkbESQj2L1TMnHmPQoVx5wWfdIJm
O26XL2N8Y+m2Ge+zCapkGxQCxgOCQ8+9ZQRjZ+y2a2dcPhCYoCgiKM7bxO1h
HBXpNseqhOCdxvY9Lxi/j5/0ficn2BQpzhxjzM49e7W4nGAyX/PzqvsU7s0/
xDOqIPimOaV1PePcksC331YSPPusodWLsUWVxWLvKoLlL9TX9zDuc5lsrq8m
OCtNVy1kfLFpYLtlLcHipDy5mHHkFx06yU8Em2UPsyWMHbsqMkbrCGbfqUvM
Z/wfwM5rgg==
            "]]},
          Annotation[#, "Charting`Private`Tag$52129#1"]& ], 
         TagBox[
          {GrayLevel[0.5], Thickness[0.003], Opacity[1.], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQneKpocOwoMSBAQw+2KtkRR5je1IK5z/u6krg1SiH
872O6HvPfVYJ53sum1c2r6wGzv/9NST+4M86OP+0nHr95psNcP7TaRzv7eSb
4PzPXdy7uBua4fxbppuSM2+1wPm8W/eurZdtg/NNN7wKul7dDuevrK+Z8fxQ
B5z/jXXTng7mLjjfnIPTJju+G84/cu9INNuSHjjfzXDRtUfMfXD+Qitlg4DY
fkR49LCI7vafAOd/tOjYn/cPwX/ib7erbuFEOP+iSmuSftAkOF/7qmzViv8I
/ur3Lx7WLpwM56uecPn+OWAKnH+U63LMsS8I/iWNzYaJU6fC+TdZVLbMcZ4G
57N5H28zeYbg6/r/ZsudNh3OP6jX+C3XeQacX11haXb6CYKv39CkfHLyTDif
89PfBGXzWXB+gP1pXrfrCP5EL80MztbZcP6P/TuFNNXnwPmRn29lvbyG4D+Y
oCfMVj0Xzr/CeUXrtfQ8OP+QA9eHglMI/rWHRazBufPh/CIFsyev+BbA+ev3
RtdOSEXw//fPskvZhuD7HFwYxsG3EM5fo35o2q14BP9wdTef4AYE/7qe7F1x
9kVw/j+xE5d9IhD8ae8tDBa0Ivh6J1b2fN6E4AMAuYADAA==
            "]]},
          Annotation[#, "Charting`Private`Tag$52129#2"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJztm/lfjev3/zOlTEUlEZIMhyiKQnhRKJQ4lSikgaQ0SJKieR52tatde1d7
oo7p5AiVqciQUAih6GQqhSIq4/d8Huda5/1HfHe/9Hg+rvu617WudQ1r3Xut
Cc7e69z6ysnJ2cjLyf3ff/o7tG242U2nD4v/JR2UzBoTfHwgsSFS7uWd8lQg
XoQh/k8XuZgQm+H2e0OnRkNiC8y0EfetXUFshXP1YWV8P8aha7HmZ5HnTAtq
t4HjgOlzX82ndjtc394xQfA7tW9A6pOoVXUrqd0B5dccjptso/bNEBdsy5rr
zRhO6M3sbCx1pee3wvbW6Ns6vozLnVE/WDnPLpD6u0Iz2lt0P5H6u+H6hkJ5
pRTqvw3WHUWmK0Kp/3b00130IuQI9d+Boe0nj6jVUn8PGMWt6Zx+i/rvxFZx
Fg5UUX9PvJk/x/7jC+q/C43DXf0/1VB/b3xQVv5WfJ3YBwk6KwfUNjNu8kEF
J9kioZ3e74vaFZlVZwd0/Mtaflh4wrV1YS/J88NmRKveGcTanXbjxZTMk8f3
knx/SDcVL21b8+5fFvqj3HiWv49xO5O/B4oH9tpPX8u4aQ8+t2i+HmDHODQA
TRdGv1kSxFhrL15//PnwRADj8r3w7/s1kkfsFIi0P05FNAgZy+3Dsmeai9uy
GQv3wVizIKRyAckPQuOuQpdVS0h+EGpf6/cvSyD5+6FVZXvDr5TkB0MPXtLb
1F4ejP0PtuoYuJD8EJS0a40ODiX5B9B7259/uoLkH0BVSN2UmVUk/yB6V54L
0Cgh+QdRsy/mdUoStYdigFFqcA7pwwmFo1ut6vkX9HwodIbyvXPbGOuHoTza
eN2lpzT+MESlO2/61J/Nf20YWo0G+sz4SfqEIz1cRzn4FWOfcNTc2ye+Mow9
Xx4O2+8dH31WMFaOgPJPed5TdcZOEbBZFa/xsB/jogioNyZ0tFkzlovEgxQz
ryN7GVtHYl/B5B+BjrQeIrGQY1BcbMG4IxJNk+aFCpYxRhSenTgbfNyPMScK
s8zTtb12MG6KwoulpeNub2OsH40y1ZJ41VTGodHg2XeUKbmS/tFY5x5cHxXM
WCsGr3Ijqq78xdgnBtWzf1t215/0j8EHA0GcEclTjsW+M7ycESLSPxaRz1+c
O5pC+sfCcEOkS1IW6R8HrVgLqeQc6R8Ho+pLvmtqSP848I0FRablpH8c5Hs/
ma0uJP3jMWX5zMJP1J8Tj8ahgxdPf0P6x4Nz4laGazXpn4AYh4hWpQrSPwG6
H/w+HK4j/RPg/T7VZM5V0j8RCg4zb2rKvWf6JyL22JXFJmMYlyfC6/xktZVf
SP8kaB8a9/3RW9I/CX+1GryV02DPFyXh6ciUub7DGMsl43PbjXqvNtI/GQVR
Ss9zFVm7MBkzjcZCfh7jjmT0XDpYO3AzY6Tgk4qT97RdjDkpWJecW2u7nnFT
CrZPilk3wILxKA5G1404aLGc+nPw57GPS523MXbnIE5vsWm8Lb2Pg74Vr/UU
vBiXcFA9veZxbDC9n4O7OSWblu5krJCKQNMFPNUwxvqpmB80osKC+tunQmV7
qfNQZ8ahqdhx2dl6KJ9xYSp8r6W5jSxmXJsKo07L2m23GPekYtSXGaseNjDW
SoP9+CtPF91nbJ4GpVNDXkXXkb3ScPDklJUaVxjz0rD15NHwcx1kvzTojTXr
MR7DzuOWNPwyd846p85YOR0ji8Tl640YG6fjwh+/ktNHMnZKx8LFU67YKTGO
TYeFVYfVCbp/i9Kh6W30qmQd4/p0nI77fNdyJp3/XKyyPqYbQPf9VC54NoVt
HdqMrbko2SJ17Z7HOJCL7kUKU/zoPhZycb40WqXTk/ENLoKyDnSkiBl3cHHf
xHZH6p+MR2WgcFxaSDe1IwOx7xbveJfJ2D0D54onzg48xZiTgc5llrX3ixmX
ZGCXhqW8cRHdhxmY0fEqPTuDsUImNmxIKrxRyFg/E/FndAZNfszYPhMeGuN3
FXfR/ZmJ74f6bbC8w7gwE+qX6venBzOuzUT+0d19tKMZ92TCTWvUVM+TjLWy
ENg0MdSK/AfzLHxtEAyZRv6OTxaKSr2aep8y5mXhsMfxyPoeup+zsGn9uj+e
fCL7Z2GQc0Jj92B2XyvzsKVDdevYIYyNeXiddWFIBN3/TjwUu8xZH1JN9ufh
nUY7R4H8jyIeql9vLZ1C/kQ9DyUebS6z/iL7Z0NQeDOm9SrZPxt1gW9UbBrJ
/tmoaCy7mdpA9s/G4dMfdJ5Xkv2zsXvgae83X8j+2chuDRjWPpGNtyMbbRF7
LBIHMh6Vgx1LPlxo7ccYOVA8v3LbdtLPPQcToprGHVZgzMmBg3v7n587yf45
UKuK17hH8ptywJ/k2M47R/bnw+bGxFJDatfno3le8+j4M2R/PkoXKI4X9Gfv
D+Xj/WOhwEeTcSEf8Qp6tnfekf35GB17QXcUrZ8ePgZv7pw/k1hLAHO/a8bT
ic0FiPZVd0gi+/gIUHHPV9JE8ngCJCX5KfVTZ1wuwMguu23dKoxbBHh58bJl
51Cyfy7i8j6XXRhG9s+FVVRQ6HGaH6dcfOSKawbJM47NRfOwOcN/fCP752KH
ikVwNc1ffS7eCZzfLqb5kctD9/agljO0nqfm4ZtUbszv4WT/PNyIc32jResp
MA9XT3INJqgxecI8rPmqEn6rL+MbeSjmK7WvpvXckYeWXz+e9NJ6HpUPu3W+
deOUyf75uNsp99y+g/Z/Pi6bHVr+iNYLJx97Ss0DnEn/knzoLh/UL4PkNeXD
NKDl+B7yp/sL8Umi8uf3PiRPCMvAX0P0aL3pCrHinsm7KJovCKGlWzKRN5yx
jRD+c7O/OZH/7P7P88HLux/R+4KFyJ2bl9dB9uIIUVXbXTCXxicV4pWpnuUX
Ok9KhFDRle/lkD1uCVEdVHekdR6NX4jPrQ7Wb39j3CWEkUllyqLJjBVEKBrg
XWyrzVhThNFjsmadJtYXoWxSybV+tB7MRLh1bGVy1zNa7yIMM9W0DKTxeorQ
EOEQkDmH1r8IfmcFRtqKjLkijM+Mbuql9Vkows4Tz79YrmV8XoQYldlGIkvG
tSKMKazsDDBh/FKExU55q3NUGfeIMHZzXHb+RzaeIWKMjFyI+SMoXhHjiPzw
J+tpfg3FaB55tyaO4h1zMRSXXXqvpsTaHcVwsGrkc0iejxhRA1a56NN8Rorh
P/kpP62FzlsxvOv3L/lB59MxMTaHp+51I/nlYng5b17TQ/NXJ0aQgZrTVD3a
j2I8ffDrXvB0xt/FWFVZp6FB61NZgr47pt42MWWsI8GNquLZk4iNJdBSLCuJ
o/GtluDqw8TzrTSfThKkRazrfDuTsb8EXGWv+KU0nlgJpjebLZITsPELJKh3
XWqulkr7W4I+il3308h/qJTgL89tZ1cNpf0uQf/6Z+EmHMbtEviE6g/r0Wfv
l5PiVnW6WelcxqpSXB/p92PHFMZTpfAZtdh2vAtjEym2vdn06FAeY2spPlZb
tUovMXaVotWmwE0RjAOl0BvcfqSd7rtEKUo9Ck+Hk/2EUkRdOMRPX8O4WIou
jdFxMzbQeSLFwXwdtQU03gYpfnzc7ysYT/eLFH03dU2Sp/b+h7A9NiXcn+b3
n7/SrIOGHduIdRB2pkk6g9a/nCF+vjseUmpIvAhfJiRdfbqM2AxXY+6/ek/z
I2cBV9vA9RuNia2wVmf986MbaT+txcSsP5xX0/6Qs4GcblVMlhG122FWj472
hAXUvgGz2zSu8C2o3QGuE8cFVHpT+2acGDNuy4koOq+ccKC+aZ3Cdnp+Kwx2
/IjYto7WszO+dDXXbLej/q542GtnuJHmE25wuddsGk3vD92GCO/qutubqP92
LDPYJCp0pP47oONk/4f7QervgZnRQyKfH6D+O6EmUdt1dh/198TVi84CnVTq
vwv3F744puJJ/b3hotQQst6J2AdHxsyPE4fReeiDrve5L+yD6f2+GBzbePkE
93/fN47k16v8SiZ5fnh0euOPHnq/0244zxN//aP1f983dlyLDWyOpHjGH+Ps
JFcu3KT4bQ9alc4eXnyY4rU9GLGhYFcVxX+hAdj5bOgyvYPk7+8F9j388vd+
8t/3ItNnaLufGmOnQEzq13P0xUSKr/bhaJzBeS9Lkr8PVoLhT+d8JflBiBsz
ffTNHpIfhJPeQzj6v0j+fszOC66pmUzyg+Hs8HLspv/iv2CUNS3y+NhO8V4I
fNqO5a7eR/IPwMKw3wguxSfCA5j5Rty+i0vx10H4rJ0c/JDir6aD6Ny75ral
MrWHosdQz/0qyeeEojDleWYY6d8UCpUv9+7U21G8FYZ+0/hX7JdSfBWGzIrL
oVbeFE+FYfeTyce+u5M+4fh90cHBOn4UL4VDZ4ar2+ijpF84DhcdFGiWM1aO
QOrWosTeTTTfEVi1M2DRswUU30bg95f2Vc8qSf9IhE90DLEbQf5MJEw32dlM
vEnzEYniTwmTcihe7IiEcfCmcf6FpH8UdiXHPJ+rRvFIFPx2556+Q/FSUxQU
81qvaHaS/tFw80ydVUbnb2g0TOd5/0wqJf2jsfGPQYcrn5H+MThdJ6fZRvGc
Twy+qKoHabaR/jGwKUgpvdWf4sFYVMwJ3S8YRv5/LLYWvHUw7yb9Y2GwQlfU
8JX0j8OjHKE7fxbpH4fWvuUJt9aQ/x4HFeVfiiFm5K/FoWqT1plXcyg+i8f4
O4ZrUin+5MTj7ds6ecPNpH88mkqO7fQn1k9A5rlF008Thybgz2wP1yZ38qcT
YBrWsD/AkfznRITPiRBIyR/1SUT0yY1DHt6l+CgRV5Zpb73rQfonYcGkiu9l
FO85JSHQYOD0+W/oPkxC0pnrum6ltP+TEWWZeuG2OemfjMWGkdmxO0n/ZCxw
HCcuqCD9k/Fg9vab45pI/xT4Dg92XUPxGycFK1Y55S/PIv1TELB03bRaIcW3
HDROMTkvvU39OUiaqmp0oZv8SQ5ctISPJdfofRwE/Qry0L1J/iIHT337VObS
+dXEgaNv/3O95L8rpGLo6YkJy+l7r34qmsbJZe2geNY+FVoDtZ650/fe0FQc
6VO5JIT8ncJUzJw54LMH+S+1qZDTvuhxV4P8tVQsKNiDyml03qbh+ILMsEFT
GZunYVPGuG/7dcj/SsPe5PQDveTf8dJgUn7UTpHux/I0nGn2L3T7g/ypNLyY
mTGU60D+Uzr0PyrE+ZO/YJyOteu+GqzaTOd5Og53Hh87je632HTMPdupVOPF
uCgdF5YrtI3byrg+HedvjHjZSf6FHBcuPMfBZ+eTP8NF0tukhBn0fmsuON1b
fn2l/oFcrPOqdrxqS/4JFyOumvpY0H17gwul7i8TxhaQ/8FFRWy3xuTTFG9k
4Fpi182aQ3S/ZaAhNsYs9QTFtxlI2/3wp0klxQ8ZWHUxdJ5WMcU3Gehz/omG
+jW6DzMQO2JZvFwbxQOZmDfIdtJE6q+fiZMvap0XnGJsn4ny5QY5tU/I/pl4
LLq99Md1sn8meop3uA+j+7k2Ew9UWn83TCD7/9Pu5J6UcIbsn4XrI25i3m2y
fxYmjTndNFpE9s+CRtu5h6vuMuZlwfYHf7r9V7J/FizSLTkTvpH9swBBqSRQ
uZPZn4eaSSoLjNUYG/OgkWLVOqaZ7M/DOMNJ257ReGJ5WFjtWXJSSPbnITfD
58Xn42R/Huo1OtZ5nCP7Z2N+deDz6TfJ/tno/NI843It2T8bBekd6WPryP7Z
eLFhgqSnm+yfjS12nmfiZrDx3ciGwwTtk6enMe7IxvHq2vfr2sn+ORjyZGOD
Jc0/cuAZ9XTF+g6yfw5UPmyM/NFF9s9B1JhrL7X+JvvnoEFrRsuZB2T/HDT2
HTW4i9oV+Ng7i5u/8xHZn//Peu1cxKf1Ys+HsteaDXE0nlD+P+tpTqBSC9mf
j5X6AV+uXST783FKet31Fa2PHj5Mpmwve1RP9hegKrR46gQaj7kAmqe+2u2n
9egjwEJt08aEj2R/AXgF8aV/DWfzUy5Asr6K6puBjFsEuDewaHgbza9yLhLP
Lgv5oEj2z0Vk4+njejR+p1zcazbP9KL1EJuLD9ondf5+Q/bPxSlPk+3vSX59
Ll602Jc9KCP75+GB8lCr0Bqyfx5GZ8de5JD9rPPQsS93rMYYxoF54AQs3jm5
l+yfh8q/l1Vpkr1u5OGj+zTHbBpfRx763+pM1CR9RuUjTHFxTPMQ9j7k490y
+8axpL97Pu49mzz73HjGnHzYnOVe9aT2knzE6mU+rH5M9s9HxZakoWG3KL4R
InL2OVMLsucoIfIfKL4rf8pYV4iMKR7fPjbQ+hNi/JmPlbG/GNsIsU5slKBB
43cXIuZ+83VXag8WYoVE+3T8MBqfEDU1IxPk6H1SIerdLJ4doP1UIoSeXutn
9RXs+VtCVHkkj5nEYdwkhPFQ3eb/9kuXEIOucNdy+zBWECHjtyKr32i9aIpQ
t8PepUqHsb4I7+/ZLEjtZPLMRNjIGeAjpvPIXoSnK5YdH0DrwVOEIXGJ3ZK+
rH+oCOd2N5jofmDtXBFW2isoy9N5UyjCVajLH9NlfF6EERt99HPJHrUiDJev
8UhVZfxShGuls24nGDHuESEqYeqhC8RDxFi8xCD5rR5jLTH6f/3Q5xWtJ0Mx
vH40GX3tz9rNxRhww/GS+hTGjmJcUt24acvvjH3EWBXc0+i2g3GkGI+mreiO
/2+/ifGjdVzxzUbGx8QYNtazW5/2Z7kYkkGJr81fMK4TwzD68mxTGl+LGBc/
L/fMIv4uxqj1y7ojVOh8lmDwlkUeFQGMdSRQemfE8fWg/SqByiWLD+r7Ga+W
QD9tS7lWNmMnCbbNW/n4WzRjfwmC+d0t68cxjpXgQ7La8qt0fgkk8LjVPV9I
67tIgi/Trino0nlUKYHfrVUhDrQe6iVwjpf0fUjnU7sEZUvebwyaw94vJ0VO
V+f0OVGMVaXQ27upXHcp46lSqDzvPZe7hrGJFCM11Z0GCul8kELsNVX71SPG
rlJcvKfqdXounRdS8I3+7g2h+UqUIjk287CVL2OhFN3DzgZNEzMuluLUoubp
/jSeG1IotjSpLzBl3CBFi6/8pI12dL9IET73itq1BYz7H8LHDf1fryd7/PP3
KHfi+OJP9HumDvy++J/4JSU2hHbV3zu3FRAvwkyp4OOwd8RmUL5zuavhG7EF
uD9+t2sbR/GDFe662555rkfx3FqsvzNMtbKbnrdB6V9XHPny1G6H6c8zf33W
p/4bcOHZI2XfvtTugJLl+3d1ULwqtxmv1FN9lO9TPOyEnuAJI11oPKFbYXpt
flrwQoqHnHFtxkZBoym93xXxo2Y9+UjxK9xwbVhC1PDFJG8beH2qGz+aUf/t
CO2siDhCv/fJ7UCd+qm+G0XU3wMj5KOf8HKo/05k/ex3KCmf+nvCrEe6l3+I
+u/C8MI+KZeuU39vqPdz/1p2h9gHl4Zr9Wy8TPGyD3imf1e7NtH7fTFFKU8Y
9o7iQT/8NnbU0RD6/bDcD7cyXNYvX0vxzm64j4x3Pzngf983XnY9H9I1mvIX
/OE85pLOxMNvmfw9mN5uNEj9O+OmPagLTNu0tIFxaABsc6fE2exhrLUXyZ5T
zu73ZVy+F1bc12MvPmLsFIifa7wdHoxtY/L3oXG2/GX316xduA/aAhOt30NI
fhD0L086fiuO5AfhwybbQNNRrH/ofih3zaxQW81YKxhfdb5MW0TjLQ/GwpuR
z3Y/Jvkh6POem3k0hrHcAfyx/bXOoz9J/gG4qcq7vPtB8g8iwsza11GRvb/p
IE7sv/Tr7iDGCIXyvE8c79GMOaFQWVCR9mUVPR8KAx0XZedQxvphOPjiQdOk
PTT+MAS49Z3Py2FcG4bNGW8MNqeTPuG4e61Ktc6esU849gWmPPf0Y1wejn7m
zhZX7zBWjgAnZ5Pkwl3GThFwmp7XdbuacVEEnj64qN7bQPMfienfdTf9JLaO
xPHOL4fuvGcsjESV7tOlNcPZ+uiIRHyNanNlM+kfBcuaNxo6taR/FDo041IG
k7ymKFS8id0XQu/Xj8aQC89e7FKl/JVovN/ruzd1GOPaaFhOeT9oBa1HrRiM
2i6/V2BF+SsxyLNeoBz9k/SPQXx54QbxbdI/FrOMTpbGGlC+TiwK1BvHKE1l
/H/5GzsbJi0ypPydOHjs+fj86DLG1nGITr+0/h7JE8ZBe+u89YNMSP84LOFe
v/8XjQ/x0L84pY8dKH8nHnf1l+zV9qH8nXgskbZfsqF8KP0E7Pt2vcBjIumf
gEKz/UFe1L82AbkOK358mkH6JyIl9HE3l/KZfBIRX6C7W+xK+UmJGGkwvepy
GGPlJChMCv7WtZj0T0J7vtMf11eS/kmYutcOIZTPJJcMt3i5rqHJpH8yhj3K
0TlVQPonY8IIzWeuRaR/MkZb8h52UP4RUhAw0ixoQB/KX0nBlrtP+rhR/lBT
CuwUzgfN72TPj+LANrR1yfuL1J+DO/p3rQY+YOzOwYlFz475vKT55CA2fN3n
F0rsfSUcXHgl+LCbuImDFZWecgn0vEIqHmrqjRZ003yngvtAp+2314ztU/Hm
0mxFiz9p/lMRErZwrNZw9r7CVMTqj/nbbgPl06TCO2989TQ3xj2pKMn1UdOh
fCOtNNhe31DsbsfYPA0uCxruqzlRvlEaYurOqc1LZ8xLw6rmX+tdfSn/KA2f
/PPyD1O+V0saFhrmqKwJpHycdNzeb+B9je5b43Q8PDHoDMeHvtemQ4//ceWG
IMax6Zg080fIxVOUr5SO89abuwxeMK5Px6ewq0/PNtP9ycV97/ylB7IZT+VC
o86wPDqO8nm4sKqNvdnzJ+NALswk+7gbWim/iQvb1qjlawaz++YGFw+hlPuK
8ok6uJjsfi7vYRfjURm4OnGB25r/vl9nYGOVj0VJLWP3DNiG52wLeEbrKQOW
Stkztveh/J0MNJS9rF9C+U5NGVhxbonKbFvGCplYnOcjv6qK8qUyUXyowOrB
KsrfyYTNoUcF1w3o/syEmYKnrnAI5e9kYoHqs8mDHpH9M5Gmp+bw9DPZPxMP
DmyZU0GslQVX/qkD0w6Q/bNwOKJm/Tgx2T8LurkuKo70fZ+Xhbwn2n/J/SD7
Z2FKrOJsv07GLVkoWFM28z3lVynz0LBnxrAB5B8Z8yAY/mz5HVX6fs3DzC1a
zQt/YxzLg1Puz6Lj9D29iIfN4uajLrMZ1/NwUfRlQvJ//ls2Kssk1vvJH5ua
jap+ircmUr6XdTaMuFyvFvqeH5iNiLOCfrdpvQiz8Ztzqt+5NMY3snHCJeuR
2Xz6Hp4N60BD84RllL+Vg+S1AxcPdiD/JgeWr3YrfrCm/K0cbJl7yy/XmH4v
yMGx7NWZf0wg++dgt/U557m0PppysG9Z7GULWu8KfJyeMd4g7THZnw/t7L/P
Nj5nbM/HDdXoqk2UjxbKx5kP6uES8t8K+Qgp8r0wjPLTavmovdaW4qZN+Vt8
CLxU+xynfDotAX42T9RSVaD8LQEeBc9T0CF/1UeABPkl9z1mkv0F+PW6+OZh
0q9cgPnec3yVwLhFgPdtR1Q+rCD752L44FWd6lPI/rkw3HjgsN1Ksn8uJif3
DLf+neyfi9ZHAx8bTSX758LLUmNaGa23+lwou6s41Y0g/zMPy088MfSqJPvn
4Zp6R0kknY/WeTgxPjldyZn2fx56Ht/vNqL8N2EeTk2q3NND83MjD+FuN8dv
H0r2z0POdtV1J5aQ/fNhM3eF6Rn6PQj5qF6/tl/APdr/+XC2XXHmNdmLk48Z
e3sti6aR/fMhKv2++Tyt76Z8DJpxBq0zGPcX4sq0ekMnI5InxOc5bzfMp3xA
XSHe9467OMuJ5Aux3Oxb/zU03zZCLJt6pSl5NK1HIZRW2lhmkn2DhWhJN1A+
TvuJI0SU5GTc41DGUiFGnq9ufE/Pl/wznt558h/dmT63hBCqzfF3vE7rVwi3
JPWQhevY811C3PR4w7+bQfmIIvCuOBj2385YU4SLvKO/ltB86oswrHOutN2E
sZkIr4zjTaRkD3sRwoNfP35Avz96irDxh83b4Xdp/Ytg9aXUVZ/yKbkivC5Q
dH46h/aDCDrG1jXP6fek8yJ8yn6zf+UU+j1GBAuuf2fJDdb+UgSfoSN5a+m+
6RFhzqGKlit7GA8Roz4p5aUK3R9aYuRPdnXNGM76G4rxdnaT3njKhzUXQzPS
1GTqe8aOYrQrVRRH0HnuI0bI2AV3P1P/SDHmdU+xUKL4kCfGm4bS0W5kr2Ni
bKjx+mCwm/afGN7+W33W0O+BdWLEVtSMHkP7v+UfeTt9d1daMf4uxjfnG4GO
dP4rS9D5SsfJZzxr15Hg52qXIydp/RlLsPGwTf/uD+z51RKcnuvv6/bf770S
HOSfHlF8nLX7S+A4+Or6jS/pPpcg8PDmjj1HGP9f/oZ+xui3lH9dJIHqeYfM
29Fsv1b+8z7M8W8yYlwvwXJ+gNxtyndul8DywKvwNnva/1L0LttZFkT3r6oU
FzyH7rGi83+qFFkShcYlFF+aSOHrZpEbS/UW1lLE2rx1qrJi7CrF9BO7z5el
0X0hxYwCNedG+r08UYob2f5xXkp0fkgxrX7qvt5e1l4shedbya3bG+g8kaL9
eK1OAN0nDVJMbGnef+Eu+RdS9B+4yjPRnPb/IZR4zVmkTf3lZPUpsvoUWX2K
rD5FVp/yr/6y+hRZfYqsPkVWn0L+u6w+RVafIqtPkdWn/C9/Q1afIqtPkdWn
UH6frD5FVp8iq0+R1adQvCWrT5HVp8jqU2T1KXQ+y+pTZPUpsvoUWX2KrD7l
X/vL6lNk9Smy+hRZfYqsPuXfdll9iqw+RVafIqtPkdWn/Ku/rD5FVp8iq0+R
1afQ91xZfYqsPkVWnyKrT2Esq0+R1af8f1Kf8v8A8Ck6tg==
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"], LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
             "]]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.81, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.82, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.83, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.84, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.86, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.87, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.88, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.89, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.91, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.92, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.93, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.94, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.96, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.97, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.98, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.99, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.11, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.13, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{37., 5.}, {28., 12.000000000000071`}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 20],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{All, All},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{{}, GraphicsComplexBox[CompressedData["
1:eJzt2/k/VP/3AHAkRKsWoRRJRFqkTZwWFMpSaVcoJWlBq6VFES1atJC10mIr
kn2ZkFRUIkuJ7Mx+78zYU9/5PN53jj/g++v0S4953HHv6977Oufc13PuUXc+
tslFSkJCYouMhMT//j/vH6ah0VJEO3B1+ZtQNhNkjxUNxNkU0a5scf70qpcJ
N3exKufkF9KWfHE91qbNAqX1UxIT5hbSkq+oj39rxoLoxasuzQt7Sxu4se21
7VYWaKm77UoZ+Zb25J99YJIfC3arah880FFAq1vDnFWcwAJ3gY+Se2E+7cO6
/CmLslng8/lrqUdkHs1o4GhR/HsWXHs268zp07m0EkJl5GAfCx6eP63ttymH
ds+w9cU/DTYkbC+r85+XTZu+KSmGZsGG7IUzgoPksmgP2fd+lTuz4aO81/KQ
1gxawKMenWRfNtS1vqeHFqTTOjSznBrusaErT+VhePgbWvB4MC75yIa+e0ct
Y06k0YwlWM/Wy3Go839NC/l59bvEEg51vqk0xXubHF3XcKjzS6HNsh7JfmXK
oc4nmXZwdogk/QKHGn8izWCk+8S0bA413njaRvd9lb9KONT4ntGWEV5qkQSH
Gk8crSOUXnJzLJc6/mPanBMSUoozudTxYmlG9rUOTcCl9h9B6yn2/unnwqX2
d5927hNt9L0o0d/fobXXWrp8zhd9/xqt0fyf5hieaLs/LfSg0e/4E6LPnjR3
6SZa32M2SFD/UqMlC1xrWaLtUKq54l3aO9Fnf9DlBa7ziBXdr2ugo+7hy40X
bb8Dl2NGOzils0TjA99xxGq9TNH3I0BvaPX7uW6i+RILUz+s6gxbJvr7xzC2
6ZeN4j6W6PrAlROlfxbuEu3vGdxP+md38DJLdH1B37Alm1Yk2n8i6FWtkNlS
JZpvyTDO/NUL/QLR8VLA9bvvyl09ovmcCpeZcZdqckTHfw1XmHnt/MMs0fyA
cUFSUoftReN5AwGHDH0yhZ+p+QVZvADp9AOi8WVAsXvq5kclLNH8hFMuqid2
dorGmw0La7Z1Vybj/IYPSxdMnT08/+FaQLxUegfGB6y5djqMycf4gUPrl67w
+YrxBQtuShvcfIPxB/V9GeTuFIxPaJSsbuKNYoviF5LOJA7+Ps8WxTdsOJqS
9FkYH1T8A8s5NtTwAhuo/AAms2502KwVxUsx3Nx2oX2aFhuOx5t6TpN9B1OG
Yh55hori6x1kKQloSR1scKwgCqfolcAAfbrCtTJRPJaAwrgmMBIez643csIE
u/cg5261n3ZcFL/vwdFh/jfTcDasVrNwUjhVCtHr3uqcqBbF+wfokviacqWf
DYvMulNGRnyAmIdumZfGi+LtI/zyczO+PI4DGu6PJCTefoSt1Q/cakdxqOv9
CT65DchP1uWAYuhG24G2T/DdsHr1IWNR/JbB4U+Kj4/qcGBETn+MYFQ5mI+3
ZdWrcKj7UQ5jS+mzzqlygN/0lMvR/wx7v+vqy+0X5YPPMKC75enurRxok90E
9M1fgFlYd+7cPzZ1v74Aq9HtCZNkw3f9vyGtZ75CupF3gOIUUX6pgP6UVd1R
5znQMteey7GuAP0zhzcNlHOo+1kBc/j3A+4K88kuE10l9+YKgIyFvMRKUb76
Btuu8waCwzhQZScJdK9v4Dbv8cGaUA51v7/Bkf3vg/yjOWDlUnvggEwlxF31
9q+9Lcp/lVDc42Lw4TcHis8kh7SGVcIBDs2pYB6Xmg+VcKhRTu2NAxeMrl/K
cNStgncK6+UveHOp+VEFOoE7Nfx3cuFNzI7GhvwqSFv32vrGOi41X76D7rEx
10+u5oJe2nyZXbbfQfZwkLmTBZeaP9/hvPcyBWsrLsS9H6lf1/IddoTFqw1c
4lLzqRrSl5gUKb3hwrSf9fb2J6vh1UNjj+d5XGp+VUOWlkqrXi4X7rFT/Spl
a2ADc4Z+WRGXmm81sN7xy+/Pn7kwRjLoqc3DGnB99ZPeUSfKpzWw/ULShSUl
XAiYtOdzuV4t/Lwu2enVzKXmYy3IB3PUYRQBQ3MWd1vQauGKy5fNxFyCmp91
8JNHfv5rQMBJI/nppXZ18OZn15302QQ1X+tgb8Psuy/HEcCxbjI1bauDiYzp
6y8Kv//f/P0BeV45MUtuEnDAOcO98NQPmElrZ3eeJKj5/APmz3g3WU+4v8aT
1++ajPoJVQpTpTxXEtT8/gk6377tHOFKwNZg57zcCOH2/lPreH4ENd9/gm3p
AqXUwwR8jVzWtky/Hm4c5YTtCyCo+V8P6zz/ZJmkEbAuZezojLf1IJfe3nvo
MUHFwy+oDbOs6BTuj1bcZmCw+RdUsVTNAoTH+y8+fkGG7/hn/UEELK3N2ZXS
/guYpTvnL6giqHhpgC0qfd59/wh4xbh1ad6ZBvhwXjFnxwiSip8GcNw4e3OY
JAnafw8kJsg3wiSDG7erfhNUPDVCgtnMMoUEAmInGFfNiWqE0av6JGMDCSq+
GuFn/Hv6n48ETJ09cTBu/m/w0hzUV5hKUvH2GwQzH55N0SDh1jK6hkbRbzDZ
L9t6dyRJxV8TaF23PHuGQYD0s71PbeY2gfnr54us/hJUPDbBTp+ZTnb2JLx9
Zbk8xKsJ+GRlc+5RkorPJnBeWZuYv4YEv2zDz+V5TeCku9dXeQ9JxWsTFI7u
dlMVbl9ePNNJQaYZMm16lkaPIan4bYYtikun7VtGQne5QreFTTM8bYyT9jhJ
UvHcDAYjzkVE3yMhtaYnKCisGS5YZBieO0dS8d0M6ybdip9+i4QjTc3TSpub
4WBQuZzBK5KK9xYoSshM8k8kQYdRnjJStwVaw6L5I2JIKv5bYFvO9I1zc0ho
52eamp5oAadJ54xTi0gqH7RAyv5/D73ukPBo6HGdf34LjJXUj3r9nKTyQwuc
UNp3bb4GDxxkQ9wLZVqhqZQIzZvMo/JFK1Tp7mytHyRBZcJZCQnbVkhWb5H1
UeFR+aMV9noyFifN5kGNyv67JuGtEF1kHuzURlL5pBWsv2ycPH0GD+5o2mj7
tbTCHZsPz7bY86j80gbfT4QEtpnwwFp/RV6ubhto5jndbM7jUfmmDVyNrG/q
Mnkgv2y27cCJNtih9aw2+iOPyj9toBbnouXiz4P3q8e3LStog5a8tumC7Twq
H7XBQxufqpjrPPC3Gjx9WrYd3Bo6La7H8Kj81A7BXnVvpznzwMS+QyHDth0K
Z2poyt7hUfmqHXZOPSj1sI4HA3u+xQjC2yHPQV9uhSyfyl/tYKukuTKliweZ
rnkGBq3tELbLxdZIOL7/8lkHzFsmyb3dxwMvz+elHnodcHzdEtft/3hUfusA
+rNt85aO4MN83zu7Uk52wFt7gdvORXwq33VAnrmXo4fweMwAPy6noAMOWXz6
ET3Ao/JfB0jfNwgfJc2H5zddL82T64ShnPaYDnk+lQ874WCc/zfCng/7wjcr
udt1wpkQhup1fz6VHzthR1J01Fw/Psx4YpKY8FD490tmLzZJ5lP5shMKd1w+
FlnEh/okHaC3dkJv2bRH8u58Kn92gX/Zl6Ldp/jwIGNS1Zx5XWB/5r3p9T98
Kp92gdTKiUky7/iw5e2/AwdOdYH7mPV264Xj/S+/doGZIxh+ecSH8Z8YA3G0
LmCYbJIfpSqg8m0X7IueohT1lw/lVdUhrXJ0mOU9+dHbLj6Vf+lw65/v1q/T
BRDU8FZDYxMdYmW+NsqNE1D5mA4397zvs+/gg2lnYoZjBB0OdXKXq68WUPmZ
DufhTM4cPQFIkPctY9rocMNqwvviRQIqXzNgoYXXsiZfAeQNXGxsmMeAJNmZ
JffXCKj8zQDawUyd9VcEcEb6iOe00ww4OGVDwNSvAiqfM2Bo2yNJd+HnxWO3
y+x6ywCnz5JW0dsEVH5nwMSj2SETZARAKq19GD6KCWstdp7yE27/L98zIctD
I8jxrEAYd/r6dZuYMGH1soNVhwVU/mfCyPND3V9fCeCQrnLRlEgmKL2qCdIX
fv+/esCE38VdV7SPCWC2ofRW+3YmLI8WTPn1RkDVBxbk9bosj84WQLMJlx6q
zwLXxEj7K/8EVL1gQXPntmWcTgFErf/pV3maBY5VV2j14QKqfrBgaFa/z65o
AezYVDJhQiELvD+mOSRrdFP1hAXtTF+pzgYBTN6d8tRGng2Nnw1N0kIEVH1h
g1Xstc7jNwTwzSViechmNky/qJW9dIeAqjdsuBzQ5R5C50PIscDP5ZFsaHtQ
+tbGUUDVHzawMs5Ga/8SgOVZDycF4XPsu6BZcT17BVQ94gjzcaZOnfD+y1za
3W0xX/gcpd8meUk4v/6rTxxw3OB4M3aeAIqurwsOOsOB0vyHBx2CBFS94sAh
BQ/7yzsFcO7+oumlhcLtmtryj4Xx9F/94sBQVeU4O5IHK2Knp45U4EJYLPEk
YjSfqmdcWGtmPGZNHB964uXMTLdwIXdASybAhU/VNy7kbDGIi/Hlwes0fp2/
cF3YnzqiISCTR9U7LnDUs3MnrhDA0fxG98IOLggGD98dEyCg6h8BeQt3fVA5
IYB7rfslJKYSYLWtyVr6qICqhwTkG21kvNHuBi/XnZYxwucO2r9jH6ysu6n6
KKy7U/RXBtYLwI5tc9fEiYCRrPWvuHkCql4S8CRltv69fQKY72nW2CB87pBq
3GGcUCag6icB9b3P5b16u2FM7wptP2GdPzzx3dgDF7qpeir8nFtpFGguAJbP
As9pXwnYrtmxP6qNT9VXAuaV6gZ/shWI1i80r419E73LWegbVgnK55urWegb
Tfu+7xkhi+sjWtHLNzPpimz0jQm8kjEOUmz0jeNrZ3luXsJG39jPm1JGCNcv
It9Y8jTWaY0zG30jUq47+bwrG33D7rhfs9YTNvrGzD3z1nWUDfvG2A2prgHd
w74xXnrizJ4xHPSNsLlvpJbqc9A36H5zU4M3c9A3/CrMx4QK1w8i31jSMLa4
qGjYN27FvwILKS76xp+H64oD/wz7Bo0WvmkTc9g3xjVC8Ax3LvqGhu1Fn1tf
uegbMvu25cVc4KJvnGzNHRVyj4u+4eJ6lrchZ9g3pm1k2hanDvvGQJjAty9v
2De8k49e92we9o3QlHWPfKYT6BsKSy03r51PoG9k35I41TWbQN8omPUq9czH
Yd9odf98NFa4HhL5xm43Qc+LYjb6hsFub5UdpWz0jYSWpGcHbTjoG1HnbfNW
5XPQNzSeZ7WOX4HjgxubRx2foIjjh1COp+WrLA76Ri+3tkBvAZ4/nJXz4D/z
x+sDKuXLkz+Y4vWDs3brnxV+QT+CljT1SY1GeP3hw7fFSTzh+kPkG/xYyTvW
egT6hqTMUDvnKYG+cXi77lKbNi76xgPVc6Eyf3B+QFq3umLmZi76hvGjuSti
jnPRN7it/REHV3PRNy521FiOnMFF33jROZ5zbjEXfWNg9m+9BG0u+kamenrf
WVUu+kbm38wnznZc9A09f9/v7Q+56BuBusyTdd+56BuqEz2mef3kom9Ena6X
OCC8vyLfuHZDiuGawkXfcBoXnSQo56JvXK86KN9QzUXfMLzl9uf5Vy76xoun
k9bGyRLoG6bqIy01JxHoGwu+faNdHEOgb1yWnhBwWXi9Rb7hUVy7o0WFQN/4
Jtt3ljWeQN9ID3GHA9MI9I05qq38WuH8FfmG4vM1A5ETCfSNH50lywWjCPSN
Xc/XmV1UJ9A3Rub+OCetR6Bv3D0tUSGP679PUMJ3NGdbEegbf+I9AxO2Eegb
hZziqHFmBPpGfmXy8aGdBPrGeyi4tSqMQN/gWb+b8cCDQN9w3x7mHuxAoG9c
M3A7vfECgb6RIVMt5RxKoG+E59n2OoYT6Bt/9if6870J9A2p+7s7v54g0DcM
0x0sPu0n0Deq1rRqp5kR6BvTZyc/vCysCyLfiLhqG9rZRKBvLNk0ZE8K64LI
Nz49bK/wryTQN1q17OebpRPoG1a7X89Rfk2gb6j9VFkv30CgbyxYybD5MoFE
3/j3YFZ5dwuBvnHcfFGMfyOBvlFGK1DQ0yPRNwoeW6e0CNd/It/4xHrn5buB
RN+oaIyLy1Yk0TeMGvnz340j0Td2bhloVdEm0TeM02fo71xIom+0H/O0OqlP
om/8Kfokf3Y5ib5RsjfoIwkk+gZEjlCe6Uyib1TyBkLCDpPoG5XnBtOfBZHo
G6qCb2s8L5HoG88T5l10PE6ib1w+Zzu5x4dE37jq13vhcQOJvjFiinzXDS6J
vuGzwCfLKYJE30jXzGKWEST6xrdFnmSVEQ99I9/ByLB0Lg99gz6HcWfzFB76
RsaIKSG+/ST6Bq+kNMOHT6JveAYFTbfrI9E3Fhx7/JZtxkPf0HDIqXjpyUPf
uPDd/bbXbh76hv6ThL5SFx76xrKM8akjT/PQN2iye/bYHeGhb7j80u9OiOeh
b7ws6V5aUMJD3zALqHYJes5D39hr3sI+7cFD3zCsLvKx/cxD31Bieyrcn8JH
3zD/tW3k6BYe+kaEDKPwunA9KfKN6iWh23+089A3jqhD1kw2b9g3spQd83p4
6Bs0weyy8YM89I0TayozPnzloW/oXP/ZcuMFD33D+gZXb8YQD33j3AmXAwpO
fPQNqYqdx5kX+Ogbi/2aG3fd5qNvFATu+5wcz0ffsMqdo9mTzUffaOi0alz7
ko++odg4Zw4p/HuRb0T41OlcCuSjbxwOKd33NpqPvhGmmK8bGMtH35jzXS5t
wk8++sbG0IW13gN89I0UixDpOAkB+oagKqqix06AvkHeKD05c78AfaP/7XOp
RbIC9I2LX6d3vNAWoG+sZNcLTB0E6BtWvhX1YQcE6BvlN/Yz954SoG+sSLm1
yTpFgL7x+tOgQrWfAH0jV+JlsJtw/SHyjdJAUqtfuF4S+cYe2Zqq0c4C9I0z
Fz0CnW8L0DfMn/2TeFwnQN+IMAiXqxSub0S+Mbu6cuOeLwL0jfOfX09w/iBA
31A7o3k6W7kbfUNi4f6C9ae70Tee9y42ct3Rjb6RbusfEr2lG32jn813cHHp
Rt9wfzWU7SF8nhf5hu7UrYw9Kd3oG38V9x7LSe1G39ilvHHvkdvd6BsfBnRW
RN/pRt+IvtSXebWjG33jisLXFDXdHvSNFVG3rmoS3egblmbFZ7cOdaNv6AxO
7qjQ7kHfmPmsiHV5Ug/6hvoi5aT2nm70jTAYtV5hcg/6BqnZVc5c1oO+ofZK
OnifUw/6Rs6iGQF7bHvQNxLHs60nWfWgb6h7Xzpm7NGDvlGkGrM2vaIHfePp
y/X3nuj2om8Qy99PTBvdi76x/d2cnHCiB31j5hvLkmO5Pegb60ryP6yN7kHf
CB+KuJTe0YO+obpXxui+Ui/6xqELzumblvSibyj+W1JVb96LvmH/zstKZWUv
+kZBAlNAW9uLvqFdoXMjJbIXfUNTY/fSa8W96BsPXqzZfpjoRd/IpTVOJl/3
oW9cNh17VyqsD33jzrTkA7sGetE3YqeOr9Qge9E3VGUWf9Jf3oe+8cFu/Jkr
vn3oGw+t3Wv3vulD38i9XPVuZ0If+saGf6E7Xur3oW/Ula3JcjfsQ98YEfx1
oolwfCLfyIkuSw3a3I++QZzPenkktR99Y2LIy6kPlvajb7SGFh472tOHvpEf
3GlyWqIffeOx2t73c1f2o288Dd1dtt+xH33j7eQN3m/W9aNvlH7g+jYt70ff
2P1s49hwlX70jcT47CDbGf3oG8smvFGVqOhH35Bb5Lbj/ugB9I3zo+yV1tD7
0TfalnDMv1kOoG+Qtvu3rloxgL6h3M+IA0Y/+oZ6q8e+OJUB9I33XnaP764f
QN+oOa+4rKSzH31jxO8lSVc39aNvjDYbn3uxoQ99I2315nJ15370jS+syAKW
8LPINyS2PN5QxO9D3xh1pCfgy8x+9I3Ysw5HH60aQN+YGsX6eCJzAH1DyT+X
JTAaQN/ItZl8aovhAPrGo+96Lb0Kg+gbr9WG2POMB9E3+u4kpQX9HUDf6Iwz
enxyziD6huI6yeelRoPoGylaDcG3Jg2ib/w8tufputOD6Bvr6NZZgu2D6Bvz
VRrTjhQOoG8M5Z0yn282gL5h5OY8Z4vVAPrGzlLvLcljh9/feP83YfI55eH3
N0KWDZ0vsWSibzxwDPl3/wwTfaNJh77VNIGJvlGdG/RwZAkTfWNDKM33XhsT
fWMX40eZ+vjh9zcamF01VZrD728s88jS/mo9/P7G6DHh8sre+Ps3TXf785r+
KPx9nKZVOzX8SSb+fk47NXW53awy/H2d1lpmpriwDn9/p921XXqkd+Lw+xtr
Zn28+mUjG30jWOHAoaxDbPQNrZsOQxZBbPSNq7+OXxkTzUbfKHT/dfb1PTb6
xtqcrYnVT9joG7dPHutSVhh+f+PfH12DBKvh9zdcaDvCK5056BuLIyanOYbg
+p92dkKOyYciDvqGx89A7WA6B32j2oCoWSQx/P5G2mpJzUnTh9/fsHIfcrAI
G35/wzWxdHT9jGHf4EXwxtsls9A3ZKvGBmgzmegbu9n9R8YWMdE3UiSdurxJ
BvpGetHtldH3Gegb7Q8ca1IXMNA3jpbVTFy3m4G+8U5hwppnqgz0DaPY+HEj
V9PRN55krk/yW0tH3+BPs98Q4UFH30iTzRwavYKBvuGT8XjvIwsG+kaJ1Og3
RXfo6BvLLHfNezuLjr5REfkvqS62C30j8pxahcNtOvrG2dzBpc31dPQNV5VW
Um0bHX2jfOGqvK8r6Ogb/pKKR6Su09E3ZPnXdhu7M9A3VrfOHjB8yEDfOBhY
kT+4iIG+8XNj4tKK4wz0DYfREU6yvgz0jW13PXeTGxjoG7Yul/5O/0RH3zBX
CLNIDKGjbyh732nZ/ICOvrHw1PNa330M9A1Bc5Zl2SKMbxg9qt+6wB7jH+IM
a+YWL2Cib8wdJMy3CeusyDceuvcsIWcx0Dc+b4ssblZgom+4ab0/aXuCib4x
YeN1ZzsnJvrG8bEV16LkmOgbz3PyLV6/YKBvnLgclvOjkoG+MXn14J6Xl5jo
G9MWKXK0fjPRN4I7zNqkG5noG8kB6n7/3jPRNwJy9Q3DI5joG6M5i4JtCpjo
G6lKJaf8ypjoG1syo+QKPjDRNyb6mPbmnWeib9wZu03LR4aJvlEv/3VaC+a3
z6D2/LTHM5KJvlE0rWGs818G+oZ7iu7qifkM9I3lfzdN29fPGPaNB3Pbtwif
E0S+sf3d9Jot+D5OBXT4eJ65K6z7It/42RF5h1Rmo294frn6Vv4XE30jxuzJ
iwYXJvrGcc07LhpRTPSN17919sWfY6Jv5MSoy8nYs9A3FmmqnrDsZaFvPJD7
lbhZko2+oR2Te2LfNxb6xqZfR5KmclnoGwFSEnsnV7LQNwr2REmEzmWhb9y+
5aU39J2JvuGq2qn/ZIiJvjHJa5TgQgsLfaM/5a7m8/Vs9I2k64Eqyjps9I2e
FsGhp8L8LvKN8p6dJYnabPSNqBWyCfHCzyLfMI+JW8VYyEbfMPhg91XvPQt9
Y8LiMSkZTBb6RoBWseor4f5FvtGZfO/jrzg2+obqKXfDFVw2+sbnI1LqjGg2
+oar9wvrk5dY6Bumvvts6RwW+sbgEf4YJRku+saUNK0m2R42+oaakt4Jueks
9I1KL3rU8kgW+sY3gafZAS82+kbz71eSFdIc9A2H2wbc8lI2+oZN/AttliYH
fSOHkeQ8YzUHfaNeWcPEUnh+It/YkWOrlmXCRt8g3FVmBdSw0DcOBc5cUm/I
Rt9YMP6VhJonB30jOMVf8noSB32jxGvPGcZFDvpG91zGBdtMDvrGHTjutieS
g75h6j64OGQMG31jhNYgsZnNRN/4wXGLrN/HRt+4d3nqsomvOOgbs6esMRxH
46BvqFnHqCqu5KBvbHzbo3koj42+Efl702KFERz0jfOuDVPepHPRN/K2lTXR
FxPoG2SNn33WeC76xpV3qZo2GRz0jb931Mruy3DQN06bTtEonMhG36g1mlyz
IISNvvFvhOmnWicO+sY4Y8dUXj8HfaPmUHDQlBoO+kbbjpubjhtw0TfeST/Z
ZXWei75RG7B/1193LvqGca6rK6uUg75RXDQxMI3PQd+YXVDP8h3FRd/4wSj8
1PSUjb6xo0s7OLiGjb5BHlGbNM+YQN9Y9bZ4dYUUMfz+xveUJ+2LuegbaiGd
B3Miuegb7clNf4h4LvqGdEL/efoCDvrGjydg/OkCF33DNbql2MSKQN8oLNla
HlPKRd9gHGdbZiiR6Bs7uueGCUxJ9I0jzza8jMgh0DeeTFpk2jeHQN9YZcGu
n1jKRd/I/Lb2XoMtgb6RtSZx2t7ZBPqGunt4YHM4B30jL1RNZcM9LvqGRJPV
qXu7CfSNC59dX4+NJ9A3DM9bFnCE+xf5hpwJ3X3+Oy76xi6HJ0cPAYG+ceXk
DI+1Rwj0DfnNATMrhOsIkW/8nkNMn3uOQN9oGzF/ZpDwfES+Ed49Qkd5JIG+
UdDxJCtPnkDfeNTtltb3g4u+8erxmozdDwj0jW+M3GuLxpLoG6rKi/kW7QT6
hoKFc8QtdRJ9w0Vaemv1LBJ9w8BFJT/jCoG+sTMwZcnTRwT6xrVTo1Tqr5Do
G6a7r0zankmgbxysC1H5mc1G34gIzNpKX0Kgb5zN9t15xoxE34gPanH9tJpE
3xjSP3LW2IBE3wiS3KND30Kib2i9fODvI0Oib6SvnLtyx30CfaPo64vYA0Yk
+kZ8jq+O4TQSfWMPa8mDUuH5i3xjeVFe6zgHEn1jMbt10+NCAn2jXUtvUFON
RN+YfCRbAEwCfePk4cXHqoXjEfnGgnNb5ze/IdA3goqdrSRUCfQN9+sXNMpP
EugbibcXhy0/RaBvXDGQ7jWfRaBvbDo7Z87/ft8Q+UbzHuWsl8UE+kZHbsi2
thcE+sbxNGUV70wCfSPfVqIwbQaBvvGr5sKf2I0E+sbL1ZLbzYTrWJFv/Fa0
HmdhTKBvGBXIZ4Nw3SzyDdsTct3zR5HoG7NNo5Yf2kWgb/QqgPT+RC76RjTX
Ok5KuI4X+UZ+5t/SpPlc9I3sIv3HYQfZ6BuaxhllJs1s9I3o04qlJ7dx0Tcm
jW9z2prMRt/4MnqEcsFIJvqGudKHndf6megbGyCRLyV8XhH5Rs2CK7V6LDb6
xlRz9QldwvWoyDc8Q32yhgLp6Buc2w0d+jPp6Bvr+x4pHxbOA5FvxN62jnxX
zkTfsJngHLGigoG+QU8I6u2X70LfqGKru3pHdqFvnLmrozj6IAt9Iza9Jn/D
Uxb6RmFR97qL29noG2/yt9q4bmSjb6SZ1be1XuWgb4QVlphVFXDQNzwW7Q2W
9WCjb5geSDpTFcdC33BZfNetZAoTfSNubnLzlZFs9I2G8+Sx6NME+sYsH89P
L2246BsbskOuGD9gom8cUEqUURKuJ0S+sWo9o/piEgvE/Sni/hRxf4q4P0Xc
nyLuTxH3p4j7U8T9KeL+FHF/irg/RdyfIu5PEfeniPtTxP0p4v4UcX+KuD9F
3J8i7k8R96eI+1PE/Sni/hRxf4q4P0XcnyLuTxH3p4j7U8T9KeL+FHF/irg/
RdyfIu5PEfeniPtTxP0p4v4UcX+KuD9F3J8i7k8R96eI+1PE/Sni/pT/T3/K
/wEoWODD
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"], LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
             "]]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwV0ns01PkbB3BkZ0lHueVSkWtJJUJs8pbQljKyq+SyqY2SSyr3kqSsiiUT
TcilMlYoTENIN1tpWirXjOXnluvXmGHGJf22/ewfn/M5r3OeP97Ped7aR066
+kpJSEjEk/ffT+seZ548fcAms8Nxw5l0CjIXLkarXDSHpv0Ln7PEm5zvpg/F
OeDx7ZCeeGJ7zmbd93FuUK2xe5xO3DSy4F8f54vI0MuDT4gPBir7fDE5jkq1
yONviAcn1+836T+BMu1dFs3EMQsb8+naIQjf4flwhJgh5ZNcFxeGGR/F5eoZ
FNztA2U6O8NRV8Ud1ifWTIiMF5lEQuWE3KLNxPdlr0cZ9UcjQmpBxZnYR6av
Yo/2BZw7cKzkN+LwpYq5NXGXUVuxKk3mJsmzienVsCEBA+yDs+rE1vs0Ndo7
E8COPFNgRCzJWJcuNElE17jK33TipOU7rq3tvwqjrfzyLOKP8jVbnbRT0SEq
m7FlUrDTitFwjUiFxbu2wf3Ej4xt590bU1H63HhFEHGGy+tKv6jrOKp70CeT
2Cut2eTixzQETHg5zREPq4yvqY5LR+pimawXt8g+swmRX3vSYUXr3tFDHNyp
8xbWGch6yLVdIJ7J9jjxeiYDE461FhaZFGh63JKWACYyay4olBEbmBaZ8N2y
cKlPM4KdRWFMyeGiCTsLdA03zzbiB+Le5tBl2XiyqjltltiiWi10gZuNZr/A
BetsCg62iZUytjmQqeeUvyM2LWTfVkjPg4SeXeHcbQrKTElHdn0evg42VWvl
kDyJdP7PU3mQ1W/R3Elcc2LchknPx+4i+d4MYruNur2ai+9ASWps2w+5FFw5
aTrrY+9C6PTVMzWPwqn6U4WO/ixEDfk1RN2lUBGtY/XxBgteKsncQuIpkxau
53MWpty3KLUTn84z44eoFqLOejJi8z3imFmzrFeF2FPZlCz8z1tiXk5qF8Ey
62h/NItCaHFiN5NXjJe8pSMvish9jlid1KWVgDYkXzhHLFIfk3hgUoLPSc7F
xvfJfKKTXn1iCRprjsXnEIf5ygdMWJRiwHMsJLaY9Enrxtx2xgNEd5+zdC6l
8OTt+yvigjI0KjDNtMrJvk0OsXtry/Cn5Ntd3sQNzbWhBR/KsNTcIy+LuK2r
8JDbQhlMsyMV1Cso8CdizTku5XDdeU9KlU1BW3FTX+hCOSRd2WpaHAoJHqmW
Ihc2FjJGWg5VU6CPuwxPLXBgV8xNzn9JYZ3etnl1pUokX9i8f4ZY2ttQbvu6
StzzHTjuVE/u0SRpnOJeiWXnxgNniA0qKsKNOJV4tepXPv0VhX8ilWlHg6vw
R5hh47IGCqW0T3ptvY/xbJFzydtGCnI6h45UvarF4Y6OKyo80g/FgUt7Mp7j
H0EBbZGIgoam93BefD2updOMPJUnUOWY1L3719ewVzGy2245AYu2Yf94hbcY
jMtY6+I9gV182cu58++gEzsbYndlAjZB7ha7y5qQdaVxB5szgRjpB9sKSj5A
LlD3pNfgBFiqjDWqms1IVx9fcUCDj+fev3t9CG/Bh/8pxD6n86E3SrmfpVrB
HJp+1JXEByVloLXPsx2UdI7N/9/xUUAP2xRc3oHlEva3bshO4o++NbIxep2g
iYNHQJ9ENkuwvuU8Dx7fSq71p02CV7ZSbcVMF96PL2FQPZM4t0u3MdmvG1Kj
alq6ywVYqmLbuPNpD0xutqw+slWAGUUfbpR6L5pYzh7fjgrQY1b805k3vajQ
t+mZSxJg7vbAdqnTfVjMfrJuI0eAqqJGpcVG/ehxr2wb7hOA32R3jdPRD1HA
T0tZS4R4l+E/1Jk2gFswVpO1FoJXEMNi7B4E/Z+zL5kBQhxuWrlEKB5E6eci
0y6mEMm3gtzePPyMiJS6+n6uEKbnd9lv9x7C2QDNT6e/CCF7X5Hp8v0wjH3K
u3iGU7gcmfz+07NhpCUYNuv+MoUoH0aJdOAIlq05vLIsZQpK47uDigxGcb1G
K8Ls9RT0U5JbhK2jaJ32bWifn4J/dF3O+9gxCGNC5ldtmIarTO5eA6txdOcZ
cU75TuPRQ7k7q4fGcVCbEcXKnEbtvCGPkU+BVRIXPNc6DdFV84jsgxMYuaPz
XY+8CAXmf1X/+B0fi/JP7QlwEGHhonJv0DM+rmtHC7TjROCODhdbBE0iJt+C
cbhahM9OPwdz5QTQC4/6ZVYggmVo8pz5cQEsr/ZJ120QY6dhktuZpwJEX2uo
4vmJ4Wjm5y96JkC4QVQm7xgxbGPCXgiguu3UJd5xYjfRvYg/Bdg7uSGYd4I4
zkt0litALo/B5AWLYd+5nnGpXYAvTwYd/w4Xw/ZK44d0vgCzKWvmBhOIbxQO
LhcI8C1J9PTzb8S5cXM3hQLob65OGkoUAxzz1ZkiAUpOa20buSqGTd/tkzlf
SP5odeH472JYWwXLF9LInVtT74oyiO1/1FkrIwRToviT+CYxXceiSFaI89k3
lGeZYmz1bfcuJj2RWfpX3nymGD9ctyl9qCjExq2XF3/LIc5We7FJWYhSh9Yw
iTziwqnWchUh9qX0DEvmE9exvrLVhAis1+iVvkvccGGZuYYQtNydfrR7xC0e
epUrhFDI1p/+voC4x8xyyyohGKYVCbIsMaxG5fc81hTCgze2Wq5QjH8BBSMw
DQ==
            "]]},
          Annotation[#, "Charting`Private`Tag$52177#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], Thickness[
           0.007], Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVy3081AcAx3Gz8rBT5GGJcEnUVpvKEc19aRSWRNnVystTrHs1Cklpp05I
5Xq6lEpocTQWVmo9kKYi8rDY5SHmqTuXc36/6xzndO3XH9/X5/X+47soYm9Q
lLaWlpY/tU/V6R3N2RvPYhY9sGQkZEuhdzQ12SyVgTMxSYYbLknhuOlGtojr
jXaiYZblZSm8qlYvbuUGY19gkEddrhQtI2p2HTcKhj10tWmhFHztMF41NxER
VrVHq/+U4oChcf4Dbjr08wo6bNukEJuNOtznZiOdUzvEpI0hri6ueD1bALW/
kNafNYZHL1pPTBRVQKfOK6lGV4aA0c1iuboKgann5xBcGWi2oRH3nj1EIG3X
WILeOLyNh9I2XqzFm+2hq3qOj8PCOkRccKwO4cKSxg/6BO6tz+r1i3yOZYUf
fToCCDj/K2Yfm/cCvTmzU6XnCPjK9NPzVU0gWCv2F3YTYMZsc/araMHTa3ft
M2xIcGbdci8qawOv5v4aTSQJwXy+w3zrV0g8YuS3vZxEbcjpnW0H2hG09U5E
mZKEnUS67bC0A7lX37xe4C2HVNveJnCHEFViQdNavhxFAYmOsZWvkeRm9Q+9
V46SAQd9jl0X+m432u/+5j1yBcTy9pRupKzKm2Qdfo/uioXmlsoeYFGG23Dr
e/zqu7iZF92LTb1WLEs7BQzNPJo31PTh1Y8eKX8nKKA0Dms8tKAfvjahoYFN
CvQ5lW5JqO+HaYOqf7X1BKauDXlqxw/gs7j6fZn7JnDvZrPJF18P4uTyW3mG
TROQtaw7VfV6EC27rntU0JVousgWdZ0fwuKzBqraFCW6izgCvt8wBtfN2xP5
RonwloUG5MQwguK/KhhwmgTvckxwfflbuNRvlltfnMSqFF8vzxARWBLxS3P5
JPR/N87ZrCsG0bJtIsp/CukHea2dj8WIHdm4q7ZyCofC+GWzfhnBme9lxjlG
KpiM+sXctJfATmw7t/qgCkvO8NrJDgm6KiS2zB4V2MnVea1H3uHnLSsitdyn
EaSX72/vOooZWtqcsJJp3Cmn/UYXjaIzPcSka44aD1XLuvnXpVjpLf98JUcN
xUlGUu72MXjFB+hKRtUoYry87zNbhnHXUp39W2egTjXtj3ksQ9AOh+eO9TNo
lIhLnWPGccvHnJO7+gPe/rA1tpFGwGv2oA89/wPW7OdNMXYTYNBul9qbabBh
WVZwQg2BQ/Sh5AtpGqx3imYrHhP4L7xyIDODMjw4iU8IiJYcD+dkUg5WFCY9
JWDD8iuLzqLM3ak43Ej93V1i3S5o4NW1nJ8mJJCcIbkhuqGBx4nmtmwZgVOZ
VzoD6yhfKB7+kiDwSmcwzPcZ5Xzu1CWSgLrGVduzXgNUMehXFASiRizOOjZp
wBy4tjdvmoBDdGmnUbsG37nGzi3WIaFTwbQSDlL28rFdqkcirKHEuXWYcoCt
8019EsFODuwGkQZro4QhpQYk4nQjFjx8p4HbOeYf5cYkDPlCwXU55VzzJ46m
JL5d9y7zqoJysbyj0oyEiadpWraScrVg5rY5iaGlZc9OTFNuOGrEsCDx6LSF
QdoM5faf7O5aknBhFuxJ0VDuc1rjYkWCleg+fFDrI1wlczf+ZU1iKk6emKD9
Ef8DkhF04Q==
            "]]},
          Annotation[#, "Charting`Private`Tag$52224#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 
            NCache[
             Rational[2, 3], 0.6666666666666666], 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVzX841AcAx/Ee1c2vJ7koFSZEtrZpuUPkc7ehyI+WLC3HJZSnsERFVCee
lVx72h3RD1I5u2VhlyTqS7cU+RVxnPJwuB/usvv2EKLZ7Y/P83lef73XRSXu
itFbtGhRoG7/P+WtuiAxaY/XkGHTF8fyNNA/m5lmnklD7s3CrUq+Bs5Bt/Pk
HB+YFVl5snT2rt5s18EJBYe+ZN6Xp0G7ci5OzImBW4kqe/VlDXh6bO5jTgrY
WFzzKFeD4ybU4kecbJhtfkN7d04DhbnasZaTh68VDsMmSRocFR8t840T4MC9
1LMG/hrUN3dcmCqtxMXQGeaIrQbB6p2K93PVSLdrUt76qIaRbWRUzbM6RL9I
5gta1fChjmQF5DfAabcg+MdiNdZYsxQ3z4lhk0P1jDysRo1v7lv/A00g9LvS
6TQ16D2KuHOmzeg7SVwTLozDb8Igu3j2JeZeHI0wfDoOr/gwun9lO1btSSwh
s8aRseTe1tLyTkRd+Xn2lM84BKt4jqusu8C2ci0+MK9CA+tSeOfxbmzk5zyY
Fqlgr9KEndK8xkEnn+wCtgoaPYfPf9jXC6FBiCzHQIXS4BTnhCoJQp6pzySL
lPh92NEgw74f061r3iXvVOK6QLux+7QUpv2MZs6EAtJKS4u1HwZQlzj9aulp
BdL97Nq4sW+RsVYm7tdXwMSc0bbtySAKD7vZb82T4wOV3ZK6egjWdRKJaLkc
gy53Q449H8L83LpkJXcMMzdGmHpJw6j6nnKtmTKGGmHbCsMvZahKnxtwPDKK
ifbvLlZLZAhcYL+a7x7By/w4ef9vI6CmVZE2DiOQlmYIeP6joDhESyhJMuxv
tzQmp0bBZDLC/RuHwS2MD31eMYbWBSZTND2Eb0/7eTNZckSe7xrs2TQEgz+o
BTs/U6D1g/G+0dZBZJ/kdvQRCgg+iuiFn94glc0rX3JEidgGjSXFbQAr1P7x
QgcVdvf0O2126cf6X7nd5GsVrHvTbht5SBCX9rio48w4IqPbF6ZderBLvzjQ
wV2NqVj3+hxlF+5XGN2ykashzafPFAs7UTfrJOWVaPAv7eq4qUcrJnNoJ67v
fYe4+DDW/U9NKKW11m5fOgG+3/lLRrJGzGWaDcUTE5g//lUU6fwQLSrFXXr8
P3Cfj+BUtgkxtmN3QouRFr57V/7FlKbALZk7QzukRcSodDArqozY5pQbeuyJ
FrNht/sCDj4kfF1i4yYJLfT3L5Z4lugMRkZKoxYdBYZBrgM6h07eOfG3FlbR
JuU7gmsJX0745KkWLeRmerveuz4ivPs38rJ6tQiileS7GdUTjAttnXkTWlgc
muaLagmCwS8bXanVYoexMX9qUudizswVUotG9grrdRYNBKppNlcndT13cVNG
SAPhNXwjseijFlJZ5zcnWhoIT/eEZWUUErzUeqPDtY2Ep/d22w36JH7ZYFqx
X6JzsC1daEAirNJOxJpqJDxiell3jUlUuvKHYjY9JbZc9vqzgkriWed6+QOh
ztctGp3NSFgGqO/0Pde57P3rKnMS7TJ+y8KYzo8F8yILXc9HGBhhKya2vDi7
nLaGxHKiqDyPoXP3T/YP1pIIusdN6YrQedDFzdWKRESph9AsQ0y4q5YFPLQm
MRyYsD38mpj4D0CkfvA=
            "]]},
          Annotation[#, "Charting`Private`Tag$52271#1"]& ]}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0.5},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{37., 5.}, {28., 12.000000000000071`}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 20],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.14752604188199211`, 1.0550347237621256`}, {0.5, 1.8}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {0, 0}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{
  3.8184312466796684`*^9, 3.8184319179256697`*^9, 3.818432267484527*^9, 
   3.818432360292162*^9, {3.818432969900201*^9, 3.8184329929577875`*^9}, 
   3.8184330286299686`*^9, 3.818490901543513*^9, {3.8187594564619627`*^9, 
   3.8187594739645185`*^9}, 3.8187595727766976`*^9, {3.81979364923591*^9, 
   3.8197936726974154`*^9}, 3.8197938103521395`*^9, {3.819793871681675*^9, 
   3.819793903933762*^9}, 3.819794016882174*^9, 3.819794194850177*^9, 
   3.819799000949381*^9, 3.819799080131674*^9, 3.8197993295877843`*^9, 
   3.8197997352668705`*^9, 3.8215144463691044`*^9, 3.8215418508849707`*^9, 
   3.821542743858572*^9, 3.821555613342013*^9, 3.8222951737886543`*^9, 
   3.822295362013232*^9, 3.822295572484714*^9, {3.822465051903974*^9, 
   3.822465074211338*^9}, {3.822465142162552*^9, 3.822465148783822*^9}, {
   3.8224653932642565`*^9, 3.8224654099506536`*^9}, 3.8224654902987804`*^9, 
   3.8224662640124536`*^9, 3.822466905213171*^9, 3.8224670081201277`*^9, 
   3.822468072702202*^9, {3.8224698849258313`*^9, 3.8224698997761436`*^9}, 
   3.8224786238715916`*^9, 3.822478699228033*^9, 3.8224790181520786`*^9, 
   3.8224795279542217`*^9, {3.8225508287655087`*^9, 3.8225508903224163`*^9}, 
   3.8225510607222924`*^9, 3.8225525589853745`*^9, 3.8225526619386377`*^9, 
   3.822564431425708*^9, 3.822564571301647*^9, 3.8226559737264147`*^9, 
   3.8226561768881226`*^9, 3.8226562078572726`*^9, 3.8226568008240523`*^9, 
   3.8226577945101185`*^9, 3.822657835675029*^9, 3.8226592028871565`*^9, 
   3.8230909639818387`*^9, 3.8230910663801765`*^9, 3.8259314868419957`*^9, 
   3.8260326013787236`*^9, 3.830501266294446*^9, 3.8305023322618403`*^9, 
   3.8305234021140037`*^9, 3.8305234877992573`*^9, 3.830523546241762*^9, 
   3.830523658635197*^9, 3.830523710772066*^9, 3.8305237749362326`*^9, 
   3.8307604668182106`*^9, 3.8307605999680357`*^9, 3.8307606804201193`*^9, 
   3.8307609139038305`*^9, 3.8317193925505447`*^9, 3.831904829241949*^9, 
   3.8319050056065936`*^9, 3.8319051500856924`*^9, 3.8319687773076153`*^9, 
   3.831969120368537*^9, 3.831969203127263*^9, 3.831969329221388*^9, 
   3.831969528958826*^9, 3.8320667408437405`*^9, {3.8323095467924147`*^9, 
   3.83230956638926*^9}, {3.832310351750042*^9, 3.8323104100104055`*^9}, 
   3.8323107314823833`*^9, {3.8323200293601084`*^9, 3.8323200794625688`*^9}, 
   3.8323201223586245`*^9, {3.8323202098972106`*^9, 3.8323202506490393`*^9}, 
   3.832337480852603*^9, {3.8324038109310246`*^9, 3.8324038281987486`*^9}, 
   3.8324038907556868`*^9, 3.8324039581083145`*^9, 3.832404204768335*^9, {
   3.8324044856586246`*^9, 3.8324045103617306`*^9}, 3.8324045799005785`*^9, 
   3.8343886397886953`*^9, {3.8346714986097517`*^9, 3.834671505728685*^9}, 
   3.834671676904945*^9, {3.834671791542486*^9, 3.834671803384813*^9}, 
   3.834734675650404*^9, 3.8362861336561174`*^9, 3.83628711820168*^9, 
   3.836287218401178*^9, 3.836287465670403*^9, 3.837064211630392*^9, 
   3.8370642573694906`*^9, 3.8370644217594004`*^9, 3.837084498311982*^9, 
   3.8370848629478436`*^9, {3.837084917550351*^9, 3.83708495237533*^9}, {
   3.8370850465286193`*^9, 3.8370850761266284`*^9}, 3.83708513747123*^9, 
   3.8371451986605473`*^9, {3.837148438931956*^9, 3.837148464888775*^9}, 
   3.8373277771924715`*^9, 3.8373278204143195`*^9, 3.8373279594034443`*^9, 
   3.837328088650633*^9, 3.837754829928689*^9, 3.8377549440178957`*^9, {
   3.8377550583230853`*^9, 3.837755077216445*^9}, {3.83775513468533*^9, 
   3.837755161918791*^9}, {3.837755636694207*^9, 3.837755665970665*^9}, 
   3.837755701508437*^9, 3.8377558378243866`*^9, {3.837755905676345*^9, 
   3.8377559215187387`*^9}, {3.8377559632531624`*^9, 3.8377559814427447`*^9}, 
   3.8377560217089443`*^9, 3.8377560704838076`*^9, {3.8377561463526864`*^9, 
   3.837756160531556*^9}, 3.8377562637566023`*^9, 3.8377564000579596`*^9, 
   3.8377565540618353`*^9, 3.837756590304566*^9, 3.837761109068164*^9, 
   3.8377612666169405`*^9, 3.837761418606662*^9, 3.8397533745516043`*^9, 
   3.8478714577280283`*^9, 3.8484122868965354`*^9, 3.8500326016359425`*^9, {
   3.8500327927863007`*^9, 3.8500327986279116`*^9}, 3.8500328733936167`*^9, 
   3.8500380095849314`*^9, 3.8500380755364037`*^9, {3.8500381103781767`*^9, 
   3.8500381172109423`*^9}, {3.8500382349362354`*^9, 
   3.8500382457583976`*^9}, {3.8500383696884756`*^9, 3.850038383667796*^9}, {
   3.8500384332811766`*^9, 3.8500384597118206`*^9}, 3.8500384948668156`*^9, {
   3.850038580728715*^9, 3.8500386474762077`*^9}, 3.851055066736268*^9, 
   3.8510551280459814`*^9, 3.8510555158541903`*^9, 3.851319066959466*^9, 
   3.8513191051165295`*^9, {3.8513199375388985`*^9, 3.8513199615433245`*^9}, {
   3.85245760249196*^9, 3.8524576267878113`*^9}, {3.85245768540351*^9, 
   3.8524577091057663`*^9}, 3.8524587452442293`*^9, 3.8524588926701794`*^9, 
   3.852459227286171*^9, 3.852459279216073*^9, 3.852459309508819*^9, 
   3.85245955247493*^9, 3.8524596004713435`*^9, {3.852459638800417*^9, 
   3.852459660179118*^9}, 3.8526127746111383`*^9, {3.8526128274477167`*^9, 
   3.852612834739251*^9}, 3.852701755497402*^9, {3.8527018289448037`*^9, 
   3.852701849299726*^9}, 3.852701901460165*^9, 3.8527019718392344`*^9, {
   3.8527020156249123`*^9, 3.8527020366234336`*^9}, 3.852702072631369*^9, 
   3.852913978115943*^9, {3.852914022660947*^9, 3.852914054269764*^9}, 
   3.852914117754239*^9, 3.85291416440145*^9, {3.852914202771896*^9, 
   3.8529142148683567`*^9}, 3.8529142836117496`*^9, 3.852914340016137*^9, 
   3.8529143718322573`*^9, 3.852914863272521*^9, 3.852915019869196*^9, {
   3.8529150728262477`*^9, 3.852915101093069*^9}, 3.8529630636050696`*^9, 
   3.852963151813061*^9, {3.852963195122912*^9, 3.852963208986846*^9}, {
   3.852963270339748*^9, 3.852963362867567*^9}, 3.8529635508553925`*^9, {
   3.852964079032158*^9, 3.852964099714529*^9}, 3.852964138828263*^9, 
   3.852964521406137*^9, {3.85296461697538*^9, 3.852964635873101*^9}, 
   3.8529648596433587`*^9, {3.8529650655753565`*^9, 3.852965074153227*^9}, 
   3.852965938939807*^9},
 CellLabel->
  "Out[1615]=",ExpressionUUID->"5742a91c-1dc2-4895-9612-bf8249a9c10b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"plot\[Delta]Wid", "[", 
  RowBox[{
  "g1", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
   "\[Delta]A0", ",", "Orange"}], "]"}]], "Input",
 CellChangeTimes->{{3.8510552895536823`*^9, 3.851055290209722*^9}, {
  3.851055453108631*^9, 3.851055472314001*^9}},
 CellLabel->
  "In[174]:=",ExpressionUUID->"8248035c-5929-4130-b8cd-e8f61942e189"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[1, 0.5, 0], Thickness[0.007], Opacity[1.], 
      Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVz3k41AkcgHFRoi2prA5ra+yDHG0Uiw7fRTskxhpCIrNkfkNylKhWatxE
jqFNmollsmyOmUpbji+ZsU3SIhGhHFOOya+IiqL2j/f5/P1SfEPo/vJycnKO
X/vfkKgPBXquseAc6mev5CbAi+F1PmFTsbAG1/dXOAuwJihO805WHJw1uJbk
4ShAJW/VXLu2eDDt06OU7RFg/u7NGQQtCajvd3r4bRdg67x7NN8uDV731xUo
rBJgbv3BsgweBw4Jg3BVSyXOWlcnL+dw4fsUZdv9dpUov4MT5ZNdArQI7rK+
oHK0LqLKVDsEMEo5zBhJu47b2ZxbRaIqEF47aT7VUYqmAecNiU010HUv4VaR
WglqNLVvcMqoB2mji3tlajFqe5vOLKI2grF6A3Nono9Ln8NGFVIM/rk5zkOZ
RciKPpjpGngfVB1s4V96IdILHTy3aTQD0yUsO0PlT6yW0oLseS2wMLm/fP1U
PkYnf5J6L2uFQ8cFxlt7r+Kg7y4rX0YbxFd9XvOzhIuKzYsbYq+2w4bFiS4r
P+YhOW0mC/34GLR0itwbKJdxjzrULXN8ApenoylWYZfQQ/zoZkNyJwSLK4e0
3l9EYzOJ256BLlCc8N7bGpGDEjMHzWFKN/hcWEt/qJONOnMW6U5neiBwyQO9
Z21ZSN6YKyban4Fa+J0dK3IzMXLuF+kV1T5wYlTXZiVmoGjJXAs3oB+0RUqS
7KEL2MYzf1b993PQiV+3uutzKvLV+baNx1/Ac6OeXVzL82gDfpEqGwcATmWr
9UUmo1WFv8VI3QA8bjPqoY4lYsE5zTbdoEGYMz+QI3RLwNsOULNbfQg6Usq9
GMNxuIXBtxi8OQQv3jx8ys2PxSVP6lNljGHIdazh5LvH4O7MTcfiF0mhef/t
hU9mbDSwGyt9x5OCMKe4YuPWcxjFCLgj2fsSzsZlEr420WhYb+i5ZfQlqBu9
SrAJikJg81tncl4BHBFadqedRkGybzfNbAQcF6Z108dPYndqsumZJyNwMC/q
QGRgJB5+60+sYo9CRZyJxfzgCaRxEwxMKGMwc/8H/bup4ZhX6iWueTQGerq3
a/2MjyNPeEWocWoc+ouVUm5MhqGcPGWb8joZxHrYxaj1hqJY6JnoJZLBU+UP
NitjQnCs9Gmwpf9roLHXDGhwjqKIW18yIz8BxgW5939rPoKLJr3vqpVPgFfh
ZZ2xuQDkpYF3gyMJor+amLeYLJRoX3VP+ZUEC6qPQ58PC9/Vzju7uJCQ2EFo
Lj3Awn0TtVSpBwkP0grOMvax8ANtl5HyYRLsg8pM9Y1YSFe1UHA+TQJ93PXN
ulkCFTnbSl5cI2HGVn/UJ51AY4OswpISEoJd/zARJRHo1fiWe+w6CT/Gx3rq
xxB4Y6oya7GQhE5N8fZP4QQyXLdGba4lobSXWFHlSeDdbw2dQh+TkKnw+yhb
h0Bp2fm9Fp0kzCpLeAqbCFSljtvId5NwwdhNJ3E9gUREqXl2PwknSK1SznIC
1bo2a/0zSsLqU1YR9yaZCCFJ37FlJOzosa6gy5gYuHRE3Z78+qsfVjUsZWK9
WfE3ve9IaDOhbVHpZuL4f4qK/PckNK2dzeO3M1GdxZQLniVBvLOl0/IhE63l
mmZ/+kzCRDq1r1vMxKOXtKcXFkgo05WWRyATvwAh1H76
       "]]},
     Annotation[#, "Charting`Private`Tag$8705#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.075, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.065, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.045, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.035, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.025, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.015, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.005, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.005, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.015, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.851055290994527*^9, {3.8510554548553357`*^9, 3.851055464737909*^9}, 
   3.851055520280558*^9},
 CellLabel->
  "Out[174]=",ExpressionUUID->"ac92b7c2-f2ae-4b31-be7c-835bec9e085b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{"\[Delta]A0", "\[IndentingNewLine]", "\[Delta]L0"}], "Input",
 CellLabel->
  "In[146]:=",ExpressionUUID->"6b3d7f97-d581-46a4-8d2c-7c740eb59c92"],

Cell[BoxData[
 RowBox[{"-", "0.0763190321896964`"}]], "Output",
 CellChangeTimes->{3.837755111664776*^9, 3.8484122906905193`*^9},
 CellLabel->
  "Out[146]=",ExpressionUUID->"b2992d1c-b081-4cb1-a7d1-ff3280c754bb"],

Cell[BoxData[
 RowBox[{"-", "0.1173791507165423`"}]], "Output",
 CellChangeTimes->{3.837755111664776*^9, 3.8484122907401295`*^9},
 CellLabel->
  "Out[147]=",ExpressionUUID->"0bdc7874-0708-42e5-9a5e-cb97124b70d2"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{"\[Delta]A0", "\[IndentingNewLine]", "\[Delta]L0"}], "Input",
 CellChangeTimes->{{3.8370849882803526`*^9, 3.837084992188875*^9}},
 CellLabel->
  "In[469]:=",ExpressionUUID->"9f11f0c1-037b-4a83-b4e0-df7f45183927"],

Cell[BoxData[
 RowBox[{"-", "0.06422584905618697`"}]], "Output",
 CellChangeTimes->{3.8370849926687384`*^9, 3.837145370971821*^9, 
  3.8371484477563457`*^9, 3.837327850669466*^9, 3.8373279926576085`*^9, 
  3.837755092633297*^9},
 CellLabel->
  "Out[469]=",ExpressionUUID->"8fac3359-67f7-40fc-be8f-35c58849962a"],

Cell[BoxData[
 RowBox[{"-", "0.1173791507165423`"}]], "Output",
 CellChangeTimes->{3.8370849926687384`*^9, 3.837145370971821*^9, 
  3.8371484477563457`*^9, 3.837327850669466*^9, 3.8373279926576085`*^9, 
  3.8377550926692057`*^9},
 CellLabel->
  "Out[470]=",ExpressionUUID->"13f130a7-75a7-4c6d-91a0-6b6bed69e362"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"pqa", " ", "=", " ", 
    GraphicsBox[{{}, {
       {RGBColor[0, 0, 1], PointSize[0.006], AbsoluteThickness[1.6], 
        PointBox[CompressedData["
1:eJwBwQM+/CFib1JlAgAAADsAAAACAAAAcjHxrs/i5b95JrR+6aGQP6+CVCuz
2uS/DQZDXjPmlD8yRsBBv9Hjv8skrKJubJA/oT+qtMXI4r+V1PRzYgWFPxA5
lCfMv+G/2mAN4q4dfD9YnnpTx7bgv0dJSGYEZGs/ji/JjJtb37+amO44kjpR
v7pKpAC/Sd2/R3pYGc5hab+YPXjmyzfbv2mk+Ln86mG/xFhTWu8l2b/YHitg
Q9NPv/FzLs4SFNe/PRRvZds0HL/PZgK0HwLVv9FV/DODUlM/EAnIff/v0r/4
2/3HpINKP+77m2MM3tC/X+1ktj4bYr/SfvzKjJjNv8SIM4B6mHG/8BOWenl0
yb83yYIBPQJev7D5PUaTUMW/St1FsyRuQj8EMPQt2izBv6K1P/7sQUo/qFHH
C6sTur/Z4G8gj2pHPwD3h4obyrG/O5ugR2PGZD8w0c10JAijv4JQz3A5P6a/
AN94kiuoc7/4Wk7I5+rBv+AB5lsaLpw/8C5f8oityb9AtnEwLKquP46EJefT
VMy/iOlZaB+btz+5spzv4jbNvzhEmemu5L8/ISTYIMXGzb9MKd0cXBXEP5wx
jf4dCM+/oNZ83SM6yD+8tzvkVgLQv9RdjYUoXcw/pfhAt7JS0L+E8s6WFkDQ
P3DduOOunNC/LMked3pS0j+9UFKevfLQv8gMJ8v8Y9Q/W48vOAho0b9043ar
YHbWP6j7h8Tj/dG/DCd//+KH2D/IAIWMgYjSv7T9zt9Gmto/hQq8dc7t0r9Q
QdczyavcP+t8LZD5YNO/+BcnFC2+3j9s1CoWSevTv1J3O3pIaOA/68YSyKlW
1L8gmT+kCXHhPyVla8SesNS/7LpDzsp54j8ccVEEMjnVv0Cma778guM/KTi/
pvWu1b8MyG/ovYvkP4uSiJTp9NW/YrOX2O+U5T9p0a6uDlzWvzDVmwKxneY/
aeg92Am91r/89p8scqbnP8bA9YByJ9e/UuLHHKSv6D96It7b2bPXvx4EzEZl
uOk/owmWny4r2L9y7/M2l8HqP+vSVgVGrti/PhH4YFjK6z+BYxvyIyDZv5b8
H1GK0+w/1GuwZWiE2b9iHiR7S9ztP7+1bNSpAtq/tglMa33l7j88XC8lpZTa
v4QrUJU+7u8/YxeOWR3o2r9sC7xCuHvwP3mUbLwSNdu/Uxy+1xgA8T83o7qe
ArXbvzktwGx5hPE/D/FUlEgf3L/kItRkEgnyP1C/8sJaTty/yjPW+XKN8j+F
KlrK/H3cv3Qp6vELEvM/9ZSvaJvb3L8gFAC4
         "]]}, {
        {RGBColor[0, 0, 1], PointSize[0.006], AbsoluteThickness[1.6]}, {}}, {
        {RGBColor[0, 0, 1], PointSize[0.006], AbsoluteThickness[
         1.6]}, {}}}, {{}, {}}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->{True, True},
     AxesLabel->{None, None},
     AxesOrigin->{0, 0},
     DisplayFunction->Identity,
     Frame->{{False, False}, {False, False}},
     FrameLabel->{{None, None}, {None, None}},
     FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
     GridLines->{None, None},
     GridLinesStyle->Directive[
       GrayLevel[0.5, 0.4]],
     LabelStyle->Directive[
       GrayLevel[0], Bold, Medium],
     Method->{
      "OptimizePlotMarkers" -> True, 
       "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}},
     PlotRange->{{-0.6839369217719151, 
      1.191905922869947}, {-0.4509037515948216, 0.020409395817074173`}},
     PlotRangeClipping->True,
     PlotRangePadding->{{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}},
     Ticks->{Automatic, Automatic}]}], ";"}], " "}], "\[IndentingNewLine]", 
 RowBox[{"Show", "[", 
  RowBox[{"pqa", ",", " ", 
   RowBox[{"plot\[Delta]Len", "[", 
    RowBox[{
    "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",",
      "\[Delta]A0", ",", "Black"}], "]"}], ",", " ", 
   RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.834671526767414*^9, 3.834671561840207*^9}, {
  3.8346716812632895`*^9, 3.834671727685129*^9}},
 CellLabel->
  "In[324]:=",ExpressionUUID->"5c14ce12-714e-4b5c-94be-87f87f62cc22"],

Cell[BoxData[
 GraphicsBox[{{{}, {
     {RGBColor[0, 0, 1], PointSize[0.006], AbsoluteThickness[1.6], 
      PointBox[CompressedData["
1:eJwBwQM+/CFib1JlAgAAADsAAAACAAAAcjHxrs/i5b95JrR+6aGQP6+CVCuz
2uS/DQZDXjPmlD8yRsBBv9Hjv8skrKJubJA/oT+qtMXI4r+V1PRzYgWFPxA5
lCfMv+G/2mAN4q4dfD9YnnpTx7bgv0dJSGYEZGs/ji/JjJtb37+amO44kjpR
v7pKpAC/Sd2/R3pYGc5hab+YPXjmyzfbv2mk+Ln86mG/xFhTWu8l2b/YHitg
Q9NPv/FzLs4SFNe/PRRvZds0HL/PZgK0HwLVv9FV/DODUlM/EAnIff/v0r/4
2/3HpINKP+77m2MM3tC/X+1ktj4bYr/SfvzKjJjNv8SIM4B6mHG/8BOWenl0
yb83yYIBPQJev7D5PUaTUMW/St1FsyRuQj8EMPQt2izBv6K1P/7sQUo/qFHH
C6sTur/Z4G8gj2pHPwD3h4obyrG/O5ugR2PGZD8w0c10JAijv4JQz3A5P6a/
AN94kiuoc7/4Wk7I5+rBv+AB5lsaLpw/8C5f8oityb9AtnEwLKquP46EJefT
VMy/iOlZaB+btz+5spzv4jbNvzhEmemu5L8/ISTYIMXGzb9MKd0cXBXEP5wx
jf4dCM+/oNZ83SM6yD+8tzvkVgLQv9RdjYUoXcw/pfhAt7JS0L+E8s6WFkDQ
P3DduOOunNC/LMked3pS0j+9UFKevfLQv8gMJ8v8Y9Q/W48vOAho0b9043ar
YHbWP6j7h8Tj/dG/DCd//+KH2D/IAIWMgYjSv7T9zt9Gmto/hQq8dc7t0r9Q
QdczyavcP+t8LZD5YNO/+BcnFC2+3j9s1CoWSevTv1J3O3pIaOA/68YSyKlW
1L8gmT+kCXHhPyVla8SesNS/7LpDzsp54j8ccVEEMjnVv0Cma778guM/KTi/
pvWu1b8MyG/ovYvkP4uSiJTp9NW/YrOX2O+U5T9p0a6uDlzWvzDVmwKxneY/
aeg92Am91r/89p8scqbnP8bA9YByJ9e/UuLHHKSv6D96It7b2bPXvx4EzEZl
uOk/owmWny4r2L9y7/M2l8HqP+vSVgVGrti/PhH4YFjK6z+BYxvyIyDZv5b8
H1GK0+w/1GuwZWiE2b9iHiR7S9ztP7+1bNSpAtq/tglMa33l7j88XC8lpZTa
v4QrUJU+7u8/YxeOWR3o2r9sC7xCuHvwP3mUbLwSNdu/Uxy+1xgA8T83o7qe
ArXbvzktwGx5hPE/D/FUlEgf3L/kItRkEgnyP1C/8sJaTty/yjPW+XKN8j+F
KlrK/H3cv3Qp6vELEvM/9ZSvaJvb3L8gFAC4
       "]]}, {
      {RGBColor[0, 0, 1], PointSize[0.006], AbsoluteThickness[1.6]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[0.006], AbsoluteThickness[
       1.6]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjn0wFHgch5W6QcJp1JI6lE4XKi+NOTVfRWdy3kq660iXovTeiUuKUHJU
bMRWHIly0YSkTcb37LFO7HoJCXnZtbv2hf2tNr/E1rk/PvPM888zH8vQU7vC
5mtpafnM7X9aZu40+ssvEYLe2Mlv325GA+a+A8cgCZp40iveZc04eyOi0m79
ZXAIFgd+qmvGntSE3ZUGyTCU1p/rOdqM1xIrWC95f8BXVjbTJfavcIadYiQp
zgCVT8GFFM4rDC8ZY02vYoGTwcWlTeIW/NO9a7dhxn1o105/eN+SjwEOWHFa
UgHe+rr3XEM68GzAEvvFF18Ax+BXz4UHX6M2+ap2R/TfUNh0LnDl1m7s5cZZ
sOMawLaljfniuzc4ax0Nbtv+hdgqxcB4Xy+WmYzlRe5phetc5S15dh+m5mWr
eOvagXG6bn+00wCGq8+pJnQ7YetD2ySroneYkslghhl1gevywOkpiyHsmKKL
I9Td8Jumub7w+2GcUrt9FvPfQPkmLzXtG8YDrp43ajregqbH3mtv4giqt1+f
MavshwJZ/Vo5Q4A8VoZOR8074PsZc3KqBZiYrEmZVzME/CPN2n7eQlxvHhi5
v2UYKtnsJ12vhehmqjc5xhuB4NJanX9CRzHsY8iQCwogd1QTVT06io9jb+Y+
bRDC17khFitOivBg6/nMY42jUGi27JlQJUK7L/OnpVUiYHyM/Mb7qBjNeiLs
M9liOKl7+Pe9MjEuTz/dOb9UAlkpZ2jTfgmmmtiWP2GNwaNyCyvTDgmau3H3
Xb0jnftj57LRaww53lrnrdNk4O/j4XvvxRimaRjhE+lyGIx3KBnYIEVOrDhN
na4Arys3rS4VSVF/IMCiPm4cSsKYpZsMZRgznH+ZnTAB4VrZyfwEGX7ipv0U
HamE8mzBuna5DKO2LK102UCgT+zpId0lx3hpYEFLOYFZYT9nsl6Omcmixnob
FXBDugx6bBTIjjoUwHukgqINrcmlOQqUBDoyNq+eBIWDZ0XGZwXycgdidtyd
hFr8ea0ydBwbnKPcj5u/h8/TRgk72saxEfd5TGa9B4vxO7rTjhPYe9f58fVl
amg1i6krLpjAwkFJZVOOGs6WJYWr9JQYbSxTHjL8AJt2nhrhnlBiEKs/axnz
A7B4Czrze5XoZbjijJ3eFDwvFF1cvJIgUbjIRi5NwezqEuenvgRLzD1aSudR
2HzyFj84ieDRLfnC3hgKM52m7oerCM4sIfGqWAoj6XU6254RvCZzM9eLo2Dz
Q3GreTXBJzmC3a6JFJjprn6dzwmqVdbcvFQKhaYFsOUlwbgHZSWhdylYr1Hw
jDkEmYY1JxS1FHQpq7i2jaCVWE9vIVLYXi50ymknWFUb9GBFPYXWgKucMx0E
eyI0g76NFGpXDfSueU3QrMHNv4JH4W1wmyqjh2DRuSaH6EEKDfLo7kPvCDr7
MdpuDFPQD7rvBYMEudYRxx4KKLTVONaZDhGUduoV9YopbNROKuAPE7S38zVx
VVJwL53Y6TJKELXzKwJUFDyzfGqMRQT9+5Q+x99TsO02sRyf88irzOQ8SkGk
L5LekxBcECKwqp6msPaX8R8vjBHMdnJE/sxcv+xA2R4pwW8XXQ6SaCjEP962
aKOMIHuki375QsFfh3lkkZzgf1rtwaQ=
        "]]},
      Annotation[#, "Charting`Private`Tag$13316#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImageSize->{420.7142857142899, Automatic},
  LabelStyle->Directive[
    GrayLevel[0], Bold, Medium],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.834671562588231*^9, {3.8346716829996433`*^9, 3.834671728251614*^9}, 
   3.8346717942103505`*^9},
 CellLabel->
  "Out[325]=",ExpressionUUID->"b72427b6-323e-449f-b39f-810faf74c5b0"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"plotLen", "[", 
  RowBox[{
  "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
   "\[Delta]A0", ",", "Black"}], "]"}]], "Input",
 CellLabel->
  "In[305]:=",ExpressionUUID->"65cef1b0-04c9-4c56-8f03-6f2faefe219e"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8346717201971564`*^9, 
  3.83467172024802*^9}},ExpressionUUID->"9cdf8200-4fe2-4d57-a117-\
df0056f7d636"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SetDirectory", "[", 
  RowBox[{"FileNameJoin", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ParentDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
     "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ppp", " ", "=", "Lplot"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<length-vs-time-800.pdf\>\"", ",", "ppp"}], " ", 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8230910930572653`*^9, 3.823091125212308*^9}, 
   3.8305008596544476`*^9, 3.8305009219525957`*^9, 3.8305240679970417`*^9, {
   3.8319051602727523`*^9, 3.8319051619758205`*^9}, {3.8324042240397325`*^9, 
   3.8324042262065973`*^9}, {3.8373281492559204`*^9, 3.837328150159535*^9}, {
   3.837756661024895*^9, 3.8377566615905647`*^9}, 3.852459295338379*^9, {
   3.852702140529785*^9, 3.852702160184531*^9}, {3.8529633797062016`*^9, 
   3.852963380984294*^9}, {3.8529635582729425`*^9, 3.852963566040169*^9}, {
   3.8529642383058987`*^9, 3.8529642411824417`*^9}, {3.8529650886310935`*^9, 
   3.852965094027746*^9}},
 CellLabel->
  "In[1616]:=",ExpressionUUID->"60d86a94-28d6-4a53-a6f4-d7de3595b064"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Stored Growth\\\\Figures\\\\RawFigs\"\>"], "Output",
 CellChangeTimes->{
  3.8230911260087986`*^9, 3.8305009419882913`*^9, 3.831904894466325*^9, 
   3.831905011984503*^9, {3.8319051549001536`*^9, 3.831905162885383*^9}, 
   3.832320276316106*^9, 3.8377566696188383`*^9, 3.8377611140081253`*^9, 
   3.837761301302595*^9, 3.8524593184196987`*^9, 3.852459560794754*^9, 
   3.8524596092298803`*^9, 3.852459666176738*^9, 3.852612853206444*^9, 
   3.8527021605387907`*^9, {3.8529633755004816`*^9, 3.8529633828967075`*^9}, {
   3.852963555909241*^9, 3.852963566560337*^9}, 3.8529642415238533`*^9, 
   3.8529650945694866`*^9, 3.8529659468403893`*^9},
 CellLabel->
  "Out[1616]=",ExpressionUUID->"8fe2f564-7fe9-41be-b25c-b44077b2d455"],

Cell[BoxData[
 GraphicsBox[{{{}, GraphicsComplexBox[CompressedData["
1:eJzt2/k/VP/3AHAkRKsWoRRJRFqkTZwWFMpSaVcoJWlBq6VFES1atJC10mIr
kn2ZkFRUIkuJ7Mx+78zYU9/5PN53jj/g++v0S4953HHv6977Oufc13PuUXc+
tslFSkJCYouMhMT//j/vH6ah0VJEO3B1+ZtQNhNkjxUNxNkU0a5scf70qpcJ
N3exKufkF9KWfHE91qbNAqX1UxIT5hbSkq+oj39rxoLoxasuzQt7Sxu4se21
7VYWaKm77UoZ+Zb25J99YJIfC3arah880FFAq1vDnFWcwAJ3gY+Se2E+7cO6
/CmLslng8/lrqUdkHs1o4GhR/HsWXHs268zp07m0EkJl5GAfCx6eP63ttymH
ds+w9cU/DTYkbC+r85+XTZu+KSmGZsGG7IUzgoPksmgP2fd+lTuz4aO81/KQ
1gxawKMenWRfNtS1vqeHFqTTOjSznBrusaErT+VhePgbWvB4MC75yIa+e0ct
Y06k0YwlWM/Wy3Go839NC/l59bvEEg51vqk0xXubHF3XcKjzS6HNsh7JfmXK
oc4nmXZwdogk/QKHGn8izWCk+8S0bA413njaRvd9lb9KONT4ntGWEV5qkQSH
Gk8crSOUXnJzLJc6/mPanBMSUoozudTxYmlG9rUOTcCl9h9B6yn2/unnwqX2
d5927hNt9L0o0d/fobXXWrp8zhd9/xqt0fyf5hieaLs/LfSg0e/4E6LPnjR3
6SZa32M2SFD/UqMlC1xrWaLtUKq54l3aO9Fnf9DlBa7ziBXdr2ugo+7hy40X
bb8Dl2NGOzils0TjA99xxGq9TNH3I0BvaPX7uW6i+RILUz+s6gxbJvr7xzC2
6ZeN4j6W6PrAlROlfxbuEu3vGdxP+md38DJLdH1B37Alm1Yk2n8i6FWtkNlS
JZpvyTDO/NUL/QLR8VLA9bvvyl09ovmcCpeZcZdqckTHfw1XmHnt/MMs0fyA
cUFSUoftReN5AwGHDH0yhZ+p+QVZvADp9AOi8WVAsXvq5kclLNH8hFMuqid2
dorGmw0La7Z1Vybj/IYPSxdMnT08/+FaQLxUegfGB6y5djqMycf4gUPrl67w
+YrxBQtuShvcfIPxB/V9GeTuFIxPaJSsbuKNYoviF5LOJA7+Ps8WxTdsOJqS
9FkYH1T8A8s5NtTwAhuo/AAms2502KwVxUsx3Nx2oX2aFhuOx5t6TpN9B1OG
Yh55hori6x1kKQloSR1scKwgCqfolcAAfbrCtTJRPJaAwrgmMBIez643csIE
u/cg5261n3ZcFL/vwdFh/jfTcDasVrNwUjhVCtHr3uqcqBbF+wfokviacqWf
DYvMulNGRnyAmIdumZfGi+LtI/zyczO+PI4DGu6PJCTefoSt1Q/cakdxqOv9
CT65DchP1uWAYuhG24G2T/DdsHr1IWNR/JbB4U+Kj4/qcGBETn+MYFQ5mI+3
ZdWrcKj7UQ5jS+mzzqlygN/0lMvR/wx7v+vqy+0X5YPPMKC75enurRxok90E
9M1fgFlYd+7cPzZ1v74Aq9HtCZNkw3f9vyGtZ75CupF3gOIUUX6pgP6UVd1R
5znQMteey7GuAP0zhzcNlHOo+1kBc/j3A+4K88kuE10l9+YKgIyFvMRKUb76
Btuu8waCwzhQZScJdK9v4Dbv8cGaUA51v7/Bkf3vg/yjOWDlUnvggEwlxF31
9q+9Lcp/lVDc42Lw4TcHis8kh7SGVcIBDs2pYB6Xmg+VcKhRTu2NAxeMrl/K
cNStgncK6+UveHOp+VEFOoE7Nfx3cuFNzI7GhvwqSFv32vrGOi41X76D7rEx
10+u5oJe2nyZXbbfQfZwkLmTBZeaP9/hvPcyBWsrLsS9H6lf1/IddoTFqw1c
4lLzqRrSl5gUKb3hwrSf9fb2J6vh1UNjj+d5XGp+VUOWlkqrXi4X7rFT/Spl
a2ADc4Z+WRGXmm81sN7xy+/Pn7kwRjLoqc3DGnB99ZPeUSfKpzWw/ULShSUl
XAiYtOdzuV4t/Lwu2enVzKXmYy3IB3PUYRQBQ3MWd1vQauGKy5fNxFyCmp91
8JNHfv5rQMBJI/nppXZ18OZn15302QQ1X+tgb8Psuy/HEcCxbjI1bauDiYzp
6y8Kv//f/P0BeV45MUtuEnDAOcO98NQPmElrZ3eeJKj5/APmz3g3WU+4v8aT
1++ajPoJVQpTpTxXEtT8/gk6377tHOFKwNZg57zcCOH2/lPreH4ENd9/gm3p
AqXUwwR8jVzWtky/Hm4c5YTtCyCo+V8P6zz/ZJmkEbAuZezojLf1IJfe3nvo
MUHFwy+oDbOs6BTuj1bcZmCw+RdUsVTNAoTH+y8+fkGG7/hn/UEELK3N2ZXS
/guYpTvnL6giqHhpgC0qfd59/wh4xbh1ad6ZBvhwXjFnxwiSip8GcNw4e3OY
JAnafw8kJsg3wiSDG7erfhNUPDVCgtnMMoUEAmInGFfNiWqE0av6JGMDCSq+
GuFn/Hv6n48ETJ09cTBu/m/w0hzUV5hKUvH2GwQzH55N0SDh1jK6hkbRbzDZ
L9t6dyRJxV8TaF23PHuGQYD0s71PbeY2gfnr54us/hJUPDbBTp+ZTnb2JLx9
Zbk8xKsJ+GRlc+5RkorPJnBeWZuYv4YEv2zDz+V5TeCku9dXeQ9JxWsTFI7u
dlMVbl9ePNNJQaYZMm16lkaPIan4bYYtikun7VtGQne5QreFTTM8bYyT9jhJ
UvHcDAYjzkVE3yMhtaYnKCisGS5YZBieO0dS8d0M6ybdip9+i4QjTc3TSpub
4WBQuZzBK5KK9xYoSshM8k8kQYdRnjJStwVaw6L5I2JIKv5bYFvO9I1zc0ho
52eamp5oAadJ54xTi0gqH7RAyv5/D73ukPBo6HGdf34LjJXUj3r9nKTyQwuc
UNp3bb4GDxxkQ9wLZVqhqZQIzZvMo/JFK1Tp7mytHyRBZcJZCQnbVkhWb5H1
UeFR+aMV9noyFifN5kGNyv67JuGtEF1kHuzURlL5pBWsv2ycPH0GD+5o2mj7
tbTCHZsPz7bY86j80gbfT4QEtpnwwFp/RV6ubhto5jndbM7jUfmmDVyNrG/q
Mnkgv2y27cCJNtih9aw2+iOPyj9toBbnouXiz4P3q8e3LStog5a8tumC7Twq
H7XBQxufqpjrPPC3Gjx9WrYd3Bo6La7H8Kj81A7BXnVvpznzwMS+QyHDth0K
Z2poyt7hUfmqHXZOPSj1sI4HA3u+xQjC2yHPQV9uhSyfyl/tYKukuTKliweZ
rnkGBq3tELbLxdZIOL7/8lkHzFsmyb3dxwMvz+elHnodcHzdEtft/3hUfusA
+rNt85aO4MN83zu7Uk52wFt7gdvORXwq33VAnrmXo4fweMwAPy6noAMOWXz6
ET3Ao/JfB0jfNwgfJc2H5zddL82T64ShnPaYDnk+lQ874WCc/zfCng/7wjcr
udt1wpkQhup1fz6VHzthR1J01Fw/Psx4YpKY8FD490tmLzZJ5lP5shMKd1w+
FlnEh/okHaC3dkJv2bRH8u58Kn92gX/Zl6Ldp/jwIGNS1Zx5XWB/5r3p9T98
Kp92gdTKiUky7/iw5e2/AwdOdYH7mPV264Xj/S+/doGZIxh+ecSH8Z8YA3G0
LmCYbJIfpSqg8m0X7IueohT1lw/lVdUhrXJ0mOU9+dHbLj6Vf+lw65/v1q/T
BRDU8FZDYxMdYmW+NsqNE1D5mA4397zvs+/gg2lnYoZjBB0OdXKXq68WUPmZ
DufhTM4cPQFIkPctY9rocMNqwvviRQIqXzNgoYXXsiZfAeQNXGxsmMeAJNmZ
JffXCKj8zQDawUyd9VcEcEb6iOe00ww4OGVDwNSvAiqfM2Bo2yNJd+HnxWO3
y+x6ywCnz5JW0dsEVH5nwMSj2SETZARAKq19GD6KCWstdp7yE27/L98zIctD
I8jxrEAYd/r6dZuYMGH1soNVhwVU/mfCyPND3V9fCeCQrnLRlEgmKL2qCdIX
fv+/esCE38VdV7SPCWC2ofRW+3YmLI8WTPn1RkDVBxbk9bosj84WQLMJlx6q
zwLXxEj7K/8EVL1gQXPntmWcTgFErf/pV3maBY5VV2j14QKqfrBgaFa/z65o
AezYVDJhQiELvD+mOSRrdFP1hAXtTF+pzgYBTN6d8tRGng2Nnw1N0kIEVH1h
g1Xstc7jNwTwzSViechmNky/qJW9dIeAqjdsuBzQ5R5C50PIscDP5ZFsaHtQ
+tbGUUDVHzawMs5Ga/8SgOVZDycF4XPsu6BZcT17BVQ94gjzcaZOnfD+y1za
3W0xX/gcpd8meUk4v/6rTxxw3OB4M3aeAIqurwsOOsOB0vyHBx2CBFS94sAh
BQ/7yzsFcO7+oumlhcLtmtryj4Xx9F/94sBQVeU4O5IHK2Knp45U4EJYLPEk
YjSfqmdcWGtmPGZNHB964uXMTLdwIXdASybAhU/VNy7kbDGIi/Hlwes0fp2/
cF3YnzqiISCTR9U7LnDUs3MnrhDA0fxG98IOLggGD98dEyCg6h8BeQt3fVA5
IYB7rfslJKYSYLWtyVr6qICqhwTkG21kvNHuBi/XnZYxwucO2r9jH6ysu6n6
KKy7U/RXBtYLwI5tc9fEiYCRrPWvuHkCql4S8CRltv69fQKY72nW2CB87pBq
3GGcUCag6icB9b3P5b16u2FM7wptP2GdPzzx3dgDF7qpeir8nFtpFGguAJbP
As9pXwnYrtmxP6qNT9VXAuaV6gZ/shWI1i80r419E73LWegbVgnK55urWegb
Tfu+7xkhi+sjWtHLNzPpimz0jQm8kjEOUmz0jeNrZ3luXsJG39jPm1JGCNcv
It9Y8jTWaY0zG30jUq47+bwrG33D7rhfs9YTNvrGzD3z1nWUDfvG2A2prgHd
w74xXnrizJ4xHPSNsLlvpJbqc9A36H5zU4M3c9A3/CrMx4QK1w8i31jSMLa4
qGjYN27FvwILKS76xp+H64oD/wz7Bo0WvmkTc9g3xjVC8Ax3LvqGhu1Fn1tf
uegbMvu25cVc4KJvnGzNHRVyj4u+4eJ6lrchZ9g3pm1k2hanDvvGQJjAty9v
2De8k49e92we9o3QlHWPfKYT6BsKSy03r51PoG9k35I41TWbQN8omPUq9czH
Yd9odf98NFa4HhL5xm43Qc+LYjb6hsFub5UdpWz0jYSWpGcHbTjoG1HnbfNW
5XPQNzSeZ7WOX4HjgxubRx2foIjjh1COp+WrLA76Ri+3tkBvAZ4/nJXz4D/z
x+sDKuXLkz+Y4vWDs3brnxV+QT+CljT1SY1GeP3hw7fFSTzh+kPkG/xYyTvW
egT6hqTMUDvnKYG+cXi77lKbNi76xgPVc6Eyf3B+QFq3umLmZi76hvGjuSti
jnPRN7it/REHV3PRNy521FiOnMFF33jROZ5zbjEXfWNg9m+9BG0u+kamenrf
WVUu+kbm38wnznZc9A09f9/v7Q+56BuBusyTdd+56BuqEz2mef3kom9Ena6X
OCC8vyLfuHZDiuGawkXfcBoXnSQo56JvXK86KN9QzUXfMLzl9uf5Vy76xoun
k9bGyRLoG6bqIy01JxHoGwu+faNdHEOgb1yWnhBwWXi9Rb7hUVy7o0WFQN/4
Jtt3ljWeQN9ID3GHA9MI9I05qq38WuH8FfmG4vM1A5ETCfSNH50lywWjCPSN
Xc/XmV1UJ9A3Rub+OCetR6Bv3D0tUSGP679PUMJ3NGdbEegbf+I9AxO2Eegb
hZziqHFmBPpGfmXy8aGdBPrGeyi4tSqMQN/gWb+b8cCDQN9w3x7mHuxAoG9c
M3A7vfECgb6RIVMt5RxKoG+E59n2OoYT6Bt/9if6870J9A2p+7s7v54g0DcM
0x0sPu0n0Deq1rRqp5kR6BvTZyc/vCysCyLfiLhqG9rZRKBvLNk0ZE8K64LI
Nz49bK/wryTQN1q17OebpRPoG1a7X89Rfk2gb6j9VFkv30CgbyxYybD5MoFE
3/j3YFZ5dwuBvnHcfFGMfyOBvlFGK1DQ0yPRNwoeW6e0CNd/It/4xHrn5buB
RN+oaIyLy1Yk0TeMGvnz340j0Td2bhloVdEm0TeM02fo71xIom+0H/O0OqlP
om/8Kfokf3Y5ib5RsjfoIwkk+gZEjlCe6Uyib1TyBkLCDpPoG5XnBtOfBZHo
G6qCb2s8L5HoG88T5l10PE6ib1w+Zzu5x4dE37jq13vhcQOJvjFiinzXDS6J
vuGzwCfLKYJE30jXzGKWEST6xrdFnmSVEQ99I9/ByLB0Lg99gz6HcWfzFB76
RsaIKSG+/ST6Bq+kNMOHT6JveAYFTbfrI9E3Fhx7/JZtxkPf0HDIqXjpyUPf
uPDd/bbXbh76hv6ThL5SFx76xrKM8akjT/PQN2iye/bYHeGhb7j80u9OiOeh
b7ws6V5aUMJD3zALqHYJes5D39hr3sI+7cFD3zCsLvKx/cxD31Bieyrcn8JH
3zD/tW3k6BYe+kaEDKPwunA9KfKN6iWh23+089A3jqhD1kw2b9g3spQd83p4
6Bs0weyy8YM89I0TayozPnzloW/oXP/ZcuMFD33D+gZXb8YQD33j3AmXAwpO
fPQNqYqdx5kX+Ogbi/2aG3fd5qNvFATu+5wcz0ffsMqdo9mTzUffaOi0alz7
ko++odg4Zw4p/HuRb0T41OlcCuSjbxwOKd33NpqPvhGmmK8bGMtH35jzXS5t
wk8++sbG0IW13gN89I0UixDpOAkB+oagKqqix06AvkHeKD05c78AfaP/7XOp
RbIC9I2LX6d3vNAWoG+sZNcLTB0E6BtWvhX1YQcE6BvlN/Yz954SoG+sSLm1
yTpFgL7x+tOgQrWfAH0jV+JlsJtw/SHyjdJAUqtfuF4S+cYe2Zqq0c4C9I0z
Fz0CnW8L0DfMn/2TeFwnQN+IMAiXqxSub0S+Mbu6cuOeLwL0jfOfX09w/iBA
31A7o3k6W7kbfUNi4f6C9ae70Tee9y42ct3Rjb6RbusfEr2lG32jn813cHHp
Rt9wfzWU7SF8nhf5hu7UrYw9Kd3oG38V9x7LSe1G39ilvHHvkdvd6BsfBnRW
RN/pRt+IvtSXebWjG33jisLXFDXdHvSNFVG3rmoS3egblmbFZ7cOdaNv6AxO
7qjQ7kHfmPmsiHV5Ug/6hvoi5aT2nm70jTAYtV5hcg/6BqnZVc5c1oO+ofZK
OnifUw/6Rs6iGQF7bHvQNxLHs60nWfWgb6h7Xzpm7NGDvlGkGrM2vaIHfePp
y/X3nuj2om8Qy99PTBvdi76x/d2cnHCiB31j5hvLkmO5Pegb60ryP6yN7kHf
CB+KuJTe0YO+obpXxui+Ui/6xqELzumblvSibyj+W1JVb96LvmH/zstKZWUv
+kZBAlNAW9uLvqFdoXMjJbIXfUNTY/fSa8W96BsPXqzZfpjoRd/IpTVOJl/3
oW9cNh17VyqsD33jzrTkA7sGetE3YqeOr9Qge9E3VGUWf9Jf3oe+8cFu/Jkr
vn3oGw+t3Wv3vulD38i9XPVuZ0If+saGf6E7Xur3oW/Ula3JcjfsQ98YEfx1
oolwfCLfyIkuSw3a3I++QZzPenkktR99Y2LIy6kPlvajb7SGFh472tOHvpEf
3GlyWqIffeOx2t73c1f2o288Dd1dtt+xH33j7eQN3m/W9aNvlH7g+jYt70ff
2P1s49hwlX70jcT47CDbGf3oG8smvFGVqOhH35Bb5Lbj/ugB9I3zo+yV1tD7
0TfalnDMv1kOoG+Qtvu3rloxgL6h3M+IA0Y/+oZ6q8e+OJUB9I33XnaP764f
QN+oOa+4rKSzH31jxO8lSVc39aNvjDYbn3uxoQ99I2315nJ15370jS+syAKW
8LPINyS2PN5QxO9D3xh1pCfgy8x+9I3Ysw5HH60aQN+YGsX6eCJzAH1DyT+X
JTAaQN/ItZl8aovhAPrGo+96Lb0Kg+gbr9WG2POMB9E3+u4kpQX9HUDf6Iwz
enxyziD6huI6yeelRoPoGylaDcG3Jg2ib/w8tufputOD6Bvr6NZZgu2D6Bvz
VRrTjhQOoG8M5Z0yn282gL5h5OY8Z4vVAPrGzlLvLcljh9/feP83YfI55eH3
N0KWDZ0vsWSibzxwDPl3/wwTfaNJh77VNIGJvlGdG/RwZAkTfWNDKM33XhsT
fWMX40eZ+vjh9zcamF01VZrD728s88jS/mo9/P7G6DHh8sre+Ps3TXf785r+
KPx9nKZVOzX8SSb+fk47NXW53awy/H2d1lpmpriwDn9/p921XXqkd+Lw+xtr
Zn28+mUjG30jWOHAoaxDbPQNrZsOQxZBbPSNq7+OXxkTzUbfKHT/dfb1PTb6
xtqcrYnVT9joG7dPHutSVhh+f+PfH12DBKvh9zdcaDvCK5056BuLIyanOYbg
+p92dkKOyYciDvqGx89A7WA6B32j2oCoWSQx/P5G2mpJzUnTh9/fsHIfcrAI
G35/wzWxdHT9jGHf4EXwxtsls9A3ZKvGBmgzmegbu9n9R8YWMdE3UiSdurxJ
BvpGetHtldH3Gegb7Q8ca1IXMNA3jpbVTFy3m4G+8U5hwppnqgz0DaPY+HEj
V9PRN55krk/yW0tH3+BPs98Q4UFH30iTzRwavYKBvuGT8XjvIwsG+kaJ1Og3
RXfo6BvLLHfNezuLjr5REfkvqS62C30j8pxahcNtOvrG2dzBpc31dPQNV5VW
Um0bHX2jfOGqvK8r6Ogb/pKKR6Su09E3ZPnXdhu7M9A3VrfOHjB8yEDfOBhY
kT+4iIG+8XNj4tKK4wz0DYfREU6yvgz0jW13PXeTGxjoG7Yul/5O/0RH3zBX
CLNIDKGjbyh732nZ/ICOvrHw1PNa330M9A1Bc5Zl2SKMbxg9qt+6wB7jH+IM
a+YWL2Cib8wdJMy3CeusyDceuvcsIWcx0Dc+b4ssblZgom+4ab0/aXuCib4x
YeN1ZzsnJvrG8bEV16LkmOgbz3PyLV6/YKBvnLgclvOjkoG+MXn14J6Xl5jo
G9MWKXK0fjPRN4I7zNqkG5noG8kB6n7/3jPRNwJy9Q3DI5joG6M5i4JtCpjo
G6lKJaf8ypjoG1syo+QKPjDRNyb6mPbmnWeib9wZu03LR4aJvlEv/3VaC+a3
z6D2/LTHM5KJvlE0rWGs818G+oZ7iu7qifkM9I3lfzdN29fPGPaNB3Pbtwif
E0S+sf3d9Jot+D5OBXT4eJ65K6z7It/42RF5h1Rmo294frn6Vv4XE30jxuzJ
iwYXJvrGcc07LhpRTPSN17919sWfY6Jv5MSoy8nYs9A3FmmqnrDsZaFvPJD7
lbhZko2+oR2Te2LfNxb6xqZfR5KmclnoGwFSEnsnV7LQNwr2REmEzmWhb9y+
5aU39J2JvuGq2qn/ZIiJvjHJa5TgQgsLfaM/5a7m8/Vs9I2k64Eqyjps9I2e
FsGhp8L8LvKN8p6dJYnabPSNqBWyCfHCzyLfMI+JW8VYyEbfMPhg91XvPQt9
Y8LiMSkZTBb6RoBWseor4f5FvtGZfO/jrzg2+obqKXfDFVw2+sbnI1LqjGg2
+oar9wvrk5dY6Bumvvts6RwW+sbgEf4YJRku+saUNK0m2R42+oaakt4Jueks
9I1KL3rU8kgW+sY3gafZAS82+kbz71eSFdIc9A2H2wbc8lI2+oZN/AttliYH
fSOHkeQ8YzUHfaNeWcPEUnh+It/YkWOrlmXCRt8g3FVmBdSw0DcOBc5cUm/I
Rt9YMP6VhJonB30jOMVf8noSB32jxGvPGcZFDvpG91zGBdtMDvrGHTjutieS
g75h6j64OGQMG31jhNYgsZnNRN/4wXGLrN/HRt+4d3nqsomvOOgbs6esMRxH
46BvqFnHqCqu5KBvbHzbo3koj42+Efl702KFERz0jfOuDVPepHPRN/K2lTXR
FxPoG2SNn33WeC76xpV3qZo2GRz0jb931Mruy3DQN06bTtEonMhG36g1mlyz
IISNvvFvhOmnWicO+sY4Y8dUXj8HfaPmUHDQlBoO+kbbjpubjhtw0TfeST/Z
ZXWei75RG7B/1193LvqGca6rK6uUg75RXDQxMI3PQd+YXVDP8h3FRd/4wSj8
1PSUjb6xo0s7OLiGjb5BHlGbNM+YQN9Y9bZ4dYUUMfz+xveUJ+2LuegbaiGd
B3Miuegb7clNf4h4LvqGdEL/efoCDvrGjydg/OkCF33DNbql2MSKQN8oLNla
HlPKRd9gHGdbZiiR6Bs7uueGCUxJ9I0jzza8jMgh0DeeTFpk2jeHQN9YZcGu
n1jKRd/I/Lb2XoMtgb6RtSZx2t7ZBPqGunt4YHM4B30jL1RNZcM9LvqGRJPV
qXu7CfSNC59dX4+NJ9A3DM9bFnCE+xf5hpwJ3X3+Oy76xi6HJ0cPAYG+ceXk
DI+1Rwj0DfnNATMrhOsIkW/8nkNMn3uOQN9oGzF/ZpDwfES+Ed49Qkd5JIG+
UdDxJCtPnkDfeNTtltb3g4u+8erxmozdDwj0jW+M3GuLxpLoG6rKi/kW7QT6
hoKFc8QtdRJ9w0Vaemv1LBJ9w8BFJT/jCoG+sTMwZcnTRwT6xrVTo1Tqr5Do
G6a7r0zankmgbxysC1H5mc1G34gIzNpKX0Kgb5zN9t15xoxE34gPanH9tJpE
3xjSP3LW2IBE3wiS3KND30Kib2i9fODvI0Oib6SvnLtyx30CfaPo64vYA0Yk
+kZ8jq+O4TQSfWMPa8mDUuH5i3xjeVFe6zgHEn1jMbt10+NCAn2jXUtvUFON
RN+YfCRbAEwCfePk4cXHqoXjEfnGgnNb5ze/IdA3goqdrSRUCfQN9+sXNMpP
EugbibcXhy0/RaBvXDGQ7jWfRaBvbDo7Z87/ft8Q+UbzHuWsl8UE+kZHbsi2
thcE+sbxNGUV70wCfSPfVqIwbQaBvvGr5sKf2I0E+sbL1ZLbzYTrWJFv/Fa0
HmdhTKBvGBXIZ4Nw3SzyDdsTct3zR5HoG7NNo5Yf2kWgb/QqgPT+RC76RjTX
Ok5KuI4X+UZ+5t/SpPlc9I3sIv3HYQfZ6BuaxhllJs1s9I3o04qlJ7dx0Tcm
jW9z2prMRt/4MnqEcsFIJvqGudKHndf6megbGyCRLyV8XhH5Rs2CK7V6LDb6
xlRz9QldwvWoyDc8Q32yhgLp6Buc2w0d+jPp6Bvr+x4pHxbOA5FvxN62jnxX
zkTfsJngHLGigoG+QU8I6u2X70LfqGKru3pHdqFvnLmrozj6IAt9Iza9Jn/D
Uxb6RmFR97qL29noG2/yt9q4bmSjb6SZ1be1XuWgb4QVlphVFXDQNzwW7Q2W
9WCjb5geSDpTFcdC33BZfNetZAoTfSNubnLzlZFs9I2G8+Sx6NME+sYsH89P
L2246BsbskOuGD9gom8cUEqUURKuJ0S+sWo9o/piEgvE/Sni/hRxf4q4P0Xc
nyLuTxH3p4j7U8T9KeL+FHF/irg/RdyfIu5PEfeniPtTxP0p4v4UcX+KuD9F
3J8i7k8R96eI+1PE/Sni/hRxf4q4P0XcnyLuTxH3p4j7U8T9KeL+FHF/irg/
RdyfIu5PEfeniPtTxP0p4v4UcX+KuD9F3J8i7k8R96eI+1PE/Sni/pT/T3/K
/wEoWODD
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large], CapForm[
        "Butt"], LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
         "]]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

         "]]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large], CapForm[
        "Butt"]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large], CapForm[
        "Butt"]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large], CapForm[
        "Butt"]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwV0ns01PkbB3BkZ0lHueVSkWtJJUJs8pbQljKyq+SyqY2SSyr3kqSsiiUT
TcilMlYoTENIN1tpWirXjOXnluvXmGHGJf22/ewfn/M5r3OeP97Ped7aR066
+kpJSEjEk/ffT+seZ548fcAms8Nxw5l0CjIXLkarXDSHpv0Ln7PEm5zvpg/F
OeDx7ZCeeGJ7zmbd93FuUK2xe5xO3DSy4F8f54vI0MuDT4gPBir7fDE5jkq1
yONviAcn1+836T+BMu1dFs3EMQsb8+naIQjf4flwhJgh5ZNcFxeGGR/F5eoZ
FNztA2U6O8NRV8Ud1ifWTIiMF5lEQuWE3KLNxPdlr0cZ9UcjQmpBxZnYR6av
Yo/2BZw7cKzkN+LwpYq5NXGXUVuxKk3mJsmzienVsCEBA+yDs+rE1vs0Ndo7
E8COPFNgRCzJWJcuNElE17jK33TipOU7rq3tvwqjrfzyLOKP8jVbnbRT0SEq
m7FlUrDTitFwjUiFxbu2wf3Ej4xt590bU1H63HhFEHGGy+tKv6jrOKp70CeT
2Cut2eTixzQETHg5zREPq4yvqY5LR+pimawXt8g+swmRX3vSYUXr3tFDHNyp
8xbWGch6yLVdIJ7J9jjxeiYDE461FhaZFGh63JKWACYyay4olBEbmBaZ8N2y
cKlPM4KdRWFMyeGiCTsLdA03zzbiB+Le5tBl2XiyqjltltiiWi10gZuNZr/A
BetsCg62iZUytjmQqeeUvyM2LWTfVkjPg4SeXeHcbQrKTElHdn0evg42VWvl
kDyJdP7PU3mQ1W/R3Elcc2LchknPx+4i+d4MYruNur2ai+9ASWps2w+5FFw5
aTrrY+9C6PTVMzWPwqn6U4WO/ixEDfk1RN2lUBGtY/XxBgteKsncQuIpkxau
53MWpty3KLUTn84z44eoFqLOejJi8z3imFmzrFeF2FPZlCz8z1tiXk5qF8Ey
62h/NItCaHFiN5NXjJe8pSMvish9jlid1KWVgDYkXzhHLFIfk3hgUoLPSc7F
xvfJfKKTXn1iCRprjsXnEIf5ygdMWJRiwHMsJLaY9Enrxtx2xgNEd5+zdC6l
8OTt+yvigjI0KjDNtMrJvk0OsXtry/Cn5Ntd3sQNzbWhBR/KsNTcIy+LuK2r
8JDbQhlMsyMV1Cso8CdizTku5XDdeU9KlU1BW3FTX+hCOSRd2WpaHAoJHqmW
Ihc2FjJGWg5VU6CPuwxPLXBgV8xNzn9JYZ3etnl1pUokX9i8f4ZY2ttQbvu6
StzzHTjuVE/u0SRpnOJeiWXnxgNniA0qKsKNOJV4tepXPv0VhX8ilWlHg6vw
R5hh47IGCqW0T3ptvY/xbJFzydtGCnI6h45UvarF4Y6OKyo80g/FgUt7Mp7j
H0EBbZGIgoam93BefD2updOMPJUnUOWY1L3719ewVzGy2245AYu2Yf94hbcY
jMtY6+I9gV182cu58++gEzsbYndlAjZB7ha7y5qQdaVxB5szgRjpB9sKSj5A
LlD3pNfgBFiqjDWqms1IVx9fcUCDj+fev3t9CG/Bh/8pxD6n86E3SrmfpVrB
HJp+1JXEByVloLXPsx2UdI7N/9/xUUAP2xRc3oHlEva3bshO4o++NbIxep2g
iYNHQJ9ENkuwvuU8Dx7fSq71p02CV7ZSbcVMF96PL2FQPZM4t0u3MdmvG1Kj
alq6ywVYqmLbuPNpD0xutqw+slWAGUUfbpR6L5pYzh7fjgrQY1b805k3vajQ
t+mZSxJg7vbAdqnTfVjMfrJuI0eAqqJGpcVG/ehxr2wb7hOA32R3jdPRD1HA
T0tZS4R4l+E/1Jk2gFswVpO1FoJXEMNi7B4E/Z+zL5kBQhxuWrlEKB5E6eci
0y6mEMm3gtzePPyMiJS6+n6uEKbnd9lv9x7C2QDNT6e/CCF7X5Hp8v0wjH3K
u3iGU7gcmfz+07NhpCUYNuv+MoUoH0aJdOAIlq05vLIsZQpK47uDigxGcb1G
K8Ls9RT0U5JbhK2jaJ32bWifn4J/dF3O+9gxCGNC5ldtmIarTO5eA6txdOcZ
cU75TuPRQ7k7q4fGcVCbEcXKnEbtvCGPkU+BVRIXPNc6DdFV84jsgxMYuaPz
XY+8CAXmf1X/+B0fi/JP7QlwEGHhonJv0DM+rmtHC7TjROCODhdbBE0iJt+C
cbhahM9OPwdz5QTQC4/6ZVYggmVo8pz5cQEsr/ZJ120QY6dhktuZpwJEX2uo
4vmJ4Wjm5y96JkC4QVQm7xgxbGPCXgiguu3UJd5xYjfRvYg/Bdg7uSGYd4I4
zkt0litALo/B5AWLYd+5nnGpXYAvTwYd/w4Xw/ZK44d0vgCzKWvmBhOIbxQO
LhcI8C1J9PTzb8S5cXM3hQLob65OGkoUAxzz1ZkiAUpOa20buSqGTd/tkzlf
SP5odeH472JYWwXLF9LInVtT74oyiO1/1FkrIwRToviT+CYxXceiSFaI89k3
lGeZYmz1bfcuJj2RWfpX3nymGD9ctyl9qCjExq2XF3/LIc5We7FJWYhSh9Yw
iTziwqnWchUh9qX0DEvmE9exvrLVhAis1+iVvkvccGGZuYYQtNydfrR7xC0e
epUrhFDI1p/+voC4x8xyyyohGKYVCbIsMaxG5fc81hTCgze2Wq5QjH8BBSMw
DQ==
        "]]},
      Annotation[#, "Charting`Private`Tag$52177#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], Thickness[
       0.007], Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwVy3081AcAx3Gz8rBT5GGJcEnUVpvKEc19aRSWRNnVystTrHs1Cklpp05I
5Xq6lEpocTQWVmo9kKYi8rDY5SHmqTuXc36/6xzndO3XH9/X5/X+47soYm9Q
lLaWlpY/tU/V6R3N2RvPYhY9sGQkZEuhdzQ12SyVgTMxSYYbLknhuOlGtojr
jXaiYZblZSm8qlYvbuUGY19gkEddrhQtI2p2HTcKhj10tWmhFHztMF41NxER
VrVHq/+U4oChcf4Dbjr08wo6bNukEJuNOtznZiOdUzvEpI0hri6ueD1bALW/
kNafNYZHL1pPTBRVQKfOK6lGV4aA0c1iuboKgann5xBcGWi2oRH3nj1EIG3X
WILeOLyNh9I2XqzFm+2hq3qOj8PCOkRccKwO4cKSxg/6BO6tz+r1i3yOZYUf
fToCCDj/K2Yfm/cCvTmzU6XnCPjK9NPzVU0gWCv2F3YTYMZsc/araMHTa3ft
M2xIcGbdci8qawOv5v4aTSQJwXy+w3zrV0g8YuS3vZxEbcjpnW0H2hG09U5E
mZKEnUS67bC0A7lX37xe4C2HVNveJnCHEFViQdNavhxFAYmOsZWvkeRm9Q+9
V46SAQd9jl0X+m432u/+5j1yBcTy9pRupKzKm2Qdfo/uioXmlsoeYFGG23Dr
e/zqu7iZF92LTb1WLEs7BQzNPJo31PTh1Y8eKX8nKKA0Dms8tKAfvjahoYFN
CvQ5lW5JqO+HaYOqf7X1BKauDXlqxw/gs7j6fZn7JnDvZrPJF18P4uTyW3mG
TROQtaw7VfV6EC27rntU0JVousgWdZ0fwuKzBqraFCW6izgCvt8wBtfN2xP5
RonwloUG5MQwguK/KhhwmgTvckxwfflbuNRvlltfnMSqFF8vzxARWBLxS3P5
JPR/N87ZrCsG0bJtIsp/CukHea2dj8WIHdm4q7ZyCofC+GWzfhnBme9lxjlG
KpiM+sXctJfATmw7t/qgCkvO8NrJDgm6KiS2zB4V2MnVea1H3uHnLSsitdyn
EaSX72/vOooZWtqcsJJp3Cmn/UYXjaIzPcSka44aD1XLuvnXpVjpLf98JUcN
xUlGUu72MXjFB+hKRtUoYry87zNbhnHXUp39W2egTjXtj3ksQ9AOh+eO9TNo
lIhLnWPGccvHnJO7+gPe/rA1tpFGwGv2oA89/wPW7OdNMXYTYNBul9qbabBh
WVZwQg2BQ/Sh5AtpGqx3imYrHhP4L7xyIDODMjw4iU8IiJYcD+dkUg5WFCY9
JWDD8iuLzqLM3ak43Ej93V1i3S5o4NW1nJ8mJJCcIbkhuqGBx4nmtmwZgVOZ
VzoD6yhfKB7+kiDwSmcwzPcZ5Xzu1CWSgLrGVduzXgNUMehXFASiRizOOjZp
wBy4tjdvmoBDdGmnUbsG37nGzi3WIaFTwbQSDlL28rFdqkcirKHEuXWYcoCt
8019EsFODuwGkQZro4QhpQYk4nQjFjx8p4HbOeYf5cYkDPlCwXU55VzzJ46m
JL5d9y7zqoJysbyj0oyEiadpWraScrVg5rY5iaGlZc9OTFNuOGrEsCDx6LSF
QdoM5faf7O5aknBhFuxJ0VDuc1rjYkWCleg+fFDrI1wlczf+ZU1iKk6emKD9
Ef8DkhF04Q==
        "]]},
      Annotation[#, "Charting`Private`Tag$52224#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 
        NCache[
         Rational[2, 3], 0.6666666666666666], 0], Thickness[0.007], Opacity[
       1.], Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzX841AcAx/Ee1c2vJ7koFSZEtrZpuUPkc7ehyI+WLC3HJZSnsERFVCee
lVx72h3RD1I5u2VhlyTqS7cU+RVxnPJwuB/usvv2EKLZ7Y/P83lef73XRSXu
itFbtGhRoG7/P+WtuiAxaY/XkGHTF8fyNNA/m5lmnklD7s3CrUq+Bs5Bt/Pk
HB+YFVl5snT2rt5s18EJBYe+ZN6Xp0G7ci5OzImBW4kqe/VlDXh6bO5jTgrY
WFzzKFeD4ybU4kecbJhtfkN7d04DhbnasZaTh68VDsMmSRocFR8t840T4MC9
1LMG/hrUN3dcmCqtxMXQGeaIrQbB6p2K93PVSLdrUt76qIaRbWRUzbM6RL9I
5gta1fChjmQF5DfAabcg+MdiNdZYsxQ3z4lhk0P1jDysRo1v7lv/A00g9LvS
6TQ16D2KuHOmzeg7SVwTLozDb8Igu3j2JeZeHI0wfDoOr/gwun9lO1btSSwh
s8aRseTe1tLyTkRd+Xn2lM84BKt4jqusu8C2ci0+MK9CA+tSeOfxbmzk5zyY
Fqlgr9KEndK8xkEnn+wCtgoaPYfPf9jXC6FBiCzHQIXS4BTnhCoJQp6pzySL
lPh92NEgw74f061r3iXvVOK6QLux+7QUpv2MZs6EAtJKS4u1HwZQlzj9aulp
BdL97Nq4sW+RsVYm7tdXwMSc0bbtySAKD7vZb82T4wOV3ZK6egjWdRKJaLkc
gy53Q449H8L83LpkJXcMMzdGmHpJw6j6nnKtmTKGGmHbCsMvZahKnxtwPDKK
ifbvLlZLZAhcYL+a7x7By/w4ef9vI6CmVZE2DiOQlmYIeP6joDhESyhJMuxv
tzQmp0bBZDLC/RuHwS2MD31eMYbWBSZTND2Eb0/7eTNZckSe7xrs2TQEgz+o
BTs/U6D1g/G+0dZBZJ/kdvQRCgg+iuiFn94glc0rX3JEidgGjSXFbQAr1P7x
QgcVdvf0O2126cf6X7nd5GsVrHvTbht5SBCX9rio48w4IqPbF6ZderBLvzjQ
wV2NqVj3+hxlF+5XGN2ykashzafPFAs7UTfrJOWVaPAv7eq4qUcrJnNoJ67v
fYe4+DDW/U9NKKW11m5fOgG+3/lLRrJGzGWaDcUTE5g//lUU6fwQLSrFXXr8
P3Cfj+BUtgkxtmN3QouRFr57V/7FlKbALZk7QzukRcSodDArqozY5pQbeuyJ
FrNht/sCDj4kfF1i4yYJLfT3L5Z4lugMRkZKoxYdBYZBrgM6h07eOfG3FlbR
JuU7gmsJX0745KkWLeRmerveuz4ivPs38rJ6tQiileS7GdUTjAttnXkTWlgc
muaLagmCwS8bXanVYoexMX9qUudizswVUotG9grrdRYNBKppNlcndT13cVNG
SAPhNXwjseijFlJZ5zcnWhoIT/eEZWUUErzUeqPDtY2Ep/d22w36JH7ZYFqx
X6JzsC1daEAirNJOxJpqJDxiell3jUlUuvKHYjY9JbZc9vqzgkriWed6+QOh
ztctGp3NSFgGqO/0Pde57P3rKnMS7TJ+y8KYzo8F8yILXc9HGBhhKya2vDi7
nLaGxHKiqDyPoXP3T/YP1pIIusdN6YrQedDFzdWKRESph9AsQ0y4q5YFPLQm
MRyYsD38mpj4D0CkfvA=
        "]]},
      Annotation[#, "Charting`Private`Tag$52271#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0.5},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 20],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{-0.14752604188199211`, 1.0550347237621256`}, {0.5, 1.8}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {0, 0}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.8230911260087986`*^9, 3.8305009419882913`*^9, 3.831904894466325*^9, 
   3.831905011984503*^9, {3.8319051549001536`*^9, 3.831905162885383*^9}, 
   3.832320276316106*^9, 3.8377566696188383`*^9, 3.8377611140081253`*^9, 
   3.837761301302595*^9, 3.8524593184196987`*^9, 3.852459560794754*^9, 
   3.8524596092298803`*^9, 3.852459666176738*^9, 3.852612853206444*^9, 
   3.8527021605387907`*^9, {3.8529633755004816`*^9, 3.8529633828967075`*^9}, {
   3.852963555909241*^9, 3.852963566560337*^9}, 3.8529642415238533`*^9, 
   3.8529650945694866`*^9, 3.852965946879529*^9},
 CellLabel->
  "Out[1617]=",ExpressionUUID->"f8f698e6-aa5f-409a-9180-183c3030747e"],

Cell[BoxData["\<\"length-vs-time-800.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.8230911260087986`*^9, 3.8305009419882913`*^9, 3.831904894466325*^9, 
   3.831905011984503*^9, {3.8319051549001536`*^9, 3.831905162885383*^9}, 
   3.832320276316106*^9, 3.8377566696188383`*^9, 3.8377611140081253`*^9, 
   3.837761301302595*^9, 3.8524593184196987`*^9, 3.852459560794754*^9, 
   3.8524596092298803`*^9, 3.852459666176738*^9, 3.852612853206444*^9, 
   3.8527021605387907`*^9, {3.8529633755004816`*^9, 3.8529633828967075`*^9}, {
   3.852963555909241*^9, 3.852963566560337*^9}, 3.8529642415238533`*^9, 
   3.8529650945694866`*^9, 3.8529659470678673`*^9},
 CellLabel->
  "Out[1618]=",ExpressionUUID->"916ae562-1a2e-46f3-a06b-65ca176f5b80"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SetDirectory", "[", 
  RowBox[{"FileNameJoin", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ParentDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
     "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ppp1", " ", "=", " ", "\[Delta]Wplot"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaWidth-vs-time-800.pdf\>\"", ",", "ppp1"}], " ", 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8500383329539595`*^9, 3.8500383386177654`*^9}},
 CellLabel->
  "In[416]:=",ExpressionUUID->"c5790694-c03c-4fb9-8ca3-019766b390d1"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Stored Growth\\\\Figures\\\\RawFigs\"\>"], "Output",
 CellChangeTimes->{3.8500383403056707`*^9, 3.850038726323556*^9},
 CellLabel->
  "Out[416]=",ExpressionUUID->"fea62175-5793-4cf6-9583-80759ce5ed27"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVxX041AccAHCXlEU6b0NJhdQji2pPJeu+5CUr5mVF3XHdC72M5KUrtbzd
uY2T03nPREjpNEmzMlffCovdhefKSZLXq5DXH0pxtv3xeT7rWKd8gxepqal5
/uf/RRfVmWVeXPDeGNrC6ZFgUkBM8Q4jHpyPLBEEtUsw1uZj/99veKDBfWjm
1yzBUNnQUeVJPmyo0W52kkjQTVsean4xCaRVenYOuRL8nHI1Or9RCMKnn3ZV
e0vwToOZe+PVLLCjUl0e1dVial+X7RvtIrCS28hIVX/hDzrZO4LTK8C8I4Fk
kXgfRfq8PS6XqyHIqbA09NqfWLtfHlPcVAv1smxLycQfqJmaY7ze8TEMl5oX
fqHcxbNjd9XXsuqBHFh4dWXTHZw3bRfD06fQ8fth7/4fK5Hd45rPN5WCqcRY
l7ukAnUKzQsjdzbDIXOrEE5dOR4zULd9Im2F0srJkEfxN3FQsSmngC6HZztt
j69Mu4G0oPOWwsHnYNHWn2IoK8VD/rIV5Ow2CDtcwpBqXsNPe9t4yvXt0GLr
p1+RWIwWBb0HPdtfQjebvMWAVIQU1PdsjH8Fs/Tc2la3QvzSNSfLXv4aSEbs
Hb4j+ejMGhR/rO0CSVFWx/uMPNw8cFH3lmc3jFRdaLgnzEW50iTkXHwPuJbO
W2ULslED1BhWfr3AcQhQGNdk4ldGe0xiVveBKDxM/nhjBj4v4pOuTPdBSXKi
YX2uCMPKLSuOYj842a3SaXG8hAl5fiP2/AFon68ctNcTIvU7AU1BU8Jhm+qp
4uIUXBxoIjS1fAtTE04JVEEyRtmJxzbNvwXnC52dI5G/InXwWb+L/B3s22Zi
PJXGR/11nvlLL78HD76qMm2chyKtZl5G+CCEPHNDfx8u9pwW2zbZD8Ht3TPb
936Ixxt1JmGaC0PglTrK9fCJw28bBJ3ktmGIyjq6WdB0AdNd/ZfX5X+ATNfM
B1H557E6en0YhTMCZXG9NFJ4NIqtvTLYMArqqggOX3QGjZ5o7U/XGIOtI86B
M92n8Xvtf7YIXo+BZa7hLvbmKLw+FDGa5TsOo+WK7b/URKCgLI62H8dhUuae
EuAajtYdCpGG9QT02SyxZQ2fxK1NNHFm6gSM0AIpCzdD8Eo6k5o0OwFn1rRy
1U+cwIhVWR+86ZMgUNWSX0UfQ5KRnrvZ40nwM9sj2XovGKeGVzh42xCQXq1X
4zvNRq94B7L/JQJua52pOBnJQhdG913DdALWbnBgTYawcJcjz/9FBgG5PhqB
54JZaKUmLfDJIWB3FcdSeIiFqjjqNx4FBERHhA/IKSy8FXdun9MtAjy2LT3b
qMXCZXH3Ejc1EnCEo3uMfoOJakdoG4eaCOi1m4myLmLiDGVBWiYlwMyxueJT
HhP7VG76Vi0ErI5wL/9NyMSaWEXRWgUB1bLF4i8cJh6PnX5oOEDAx8KfDSxc
mUinX2a9UBLQ4exWqgtMPEDZvSTjHQHCvH7/RfZMBFWiJ3mYAEzIWTNkw8Sv
Yw1eL5skgPvys8VzAyZq0+/HNREEBHWeqpDrMHERJcAiaZoA3vVHB15oMnF0
vuQnjVkClhsvTHTNMXCga69O/WcC9llFvlPOMPDVg+E73DkCtsuk02PjDGy9
knbQSUXAS7aX6dwQAxtits0uLBCQnOxIXaZk4L/Z3IEB
        "]]},
      Annotation[#, "Charting`Private`Tag$13473#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 
        NCache[
         Rational[2, 3], 0.6666666666666666], 0], Thickness[0.007], Opacity[
       1.], Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwV0HtUjAkYBvBxacx2t7GzbVM7qLQmcltdMG+Uy8pIThcMYUIOishusdO0
jdSOLirVZjMadrd25NI30314Kal2QjvMREw3Temi1CdW1rTf/vGc5/zOef56
ZgmObNk3mUaj8aj83xkpU/YU+SdAGvGu90SHCpN3CC+7M8Xw/QHGwal6Fca5
vn95v00M6ukG2vlnKjzc1L/fEJEIzSVXDpVpVLjWXHN4dkoysHyqOYw6FY6f
LYjJb0iDrgKtafufKiypc1jfUJANUTLeUEi0ClO79G5t5jJoNLMZCjNX4SbL
HPd9mdfBLLREKvGoxgwb8WrfvFK44xocsSuhCqv9NMLLjdXwJG2UzdNXIiM1
90sn77tQ03sUl3pU4g/DiilswT2wcXR28pJX4CdWixzq64HG2jouYlVgWMea
/ESWGkww3FGeX46Wl2ZfOubxEFyTrOgVC8oxfMYUtxp1M5xWeKbo7pRhn46T
Kw3VwLfHWxy2CcqQv/ekY1rfY9jjOXdFmXkZbg1psrLO0ULSeNpCenkp/rNO
KzY4tQCd3TUUGFGKc6SdQbyWp+DjbydTzSlFLtrwGuJboTI5i7a1U4kf9f82
5Vi8gNZOwfGVRUr0EfTJ31frgR/j8crxiBIXdKdML+a1Q1tAhIcZV4kag+2h
2PgOeHDbbpOZhRJNgLbbObgTrjDLXFs7FPgZc7Wt0L4Lcu9wDj+tUuBjWeKk
i2NdMHoq3Kn9vAIjrzpe348voaZHonSPVuBPF4JfeyZ2w0BNbHBBsAK3r5Dw
dXwDaK9lp9M9FTh1p20ay7EH2FJaZcbXCjy+UD7M+dQDkSknAubSqX3fg5e+
ml4wRKX6eA0TaDOLlz8t7xWMBEfFJjwnMMPsoTjraB9U+eWom+oJ7IiWuzV6
9sPTwmT1szICC2ttIxkT/WDV5/2VsJDApXWS59baAfj7Pu6w/4XAzDUhFrX5
g+C2we7nbgmBpTFOkdwTryFeuvbCDSGB8nn+WWEwBOnemp2Bxwhk1pj5ZZoM
w+PnJ5mmBwj8zvyvRZIXw5DUllmBOwn8oz9qKHvLG/gYk+7VE0igpEjE98M3
4LPXw2i9kcB5z3QZJvNGYJkk/UdbXwIXN/Ll51NHICiWDIeVBF7M3LM9+cMI
VGk7U/YvIzDKLntwc+goyPOXeIkXEjiJ+fl6h7ujEMA1LJrPIfDtgNXyza4k
iLVhQp0Tgf7xy61DzpHAsBi0h1kE+u5uV8zMJIHlwojgUPbyFoc8ySLhVbRV
LZOyM00tDcgl4ZsBrfgNm0CjaPv8jVISfos0hlymXCyK3bCqmIQzt2Trp1E2
FZWf5jSQ8Ku10EvnQCBtF9+lv5GEa8ZtglrK77gT6iI1CdIx7bmblLuMa22c
H5GQf1M26SzlyjidjK0jIejgusXelA/Ejd2e2U3Co+n1D67aExgamid4YiCB
5yIKzaMcyF1Jz+olofdIydgZymA8zbMeIKEy5pS7gPIXcTNemI6SENG3j2FL
2Ty0QtRIktDy8UYTnfJk7o45yWMk/M4W5L5lETj06cpBkw8kuMjGoJlyt36d
5b1xEpRxGvvblFtvDZQk/EtC4DHLycWUmy+mB60ykjDALRzMo1wnXPJhYoL6
q+iCPonyf8SYgWI=
        "]]},
      Annotation[#, "Charting`Private`Tag$13520#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], Thickness[
       0.007], Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwVkGs0lAkYgEeSLkgoVOyUmtOZbFdRjZ1XErZ2lrUb7Si5JCVmuy3dXGqa
kku7TDNWy4Q2OlKtI0dleF0bY4bMxfiSiTDKyCXfxiqx7Y/nPOf5+6wI/cUv
fBaFQmF94X+npxqG3PW5BPQId8OYbjEm7Y/Ld7Hmgsv04DnPXjHGO070PnvF
hU9zmrda94sxSq4/rIvmwYtm36tPBsXoaaKMWpmaBAUT9scNJsT4MSX3THbj
dUhbqYkRmVZiSYO9d2OuAGhbNEmmjEpM69Guf2WSB4yjPPcaYSV+byZ0Cc94
ABdzL3TEhFRhuiXX3SOrDMg0eWq+A2LFHmVcvrQCcoKdSkv7EeemZdqsdquB
P47lGXccrMbYkVJDamg9nKvJmCqTVOPn5e1FIJFAgPY8ODJqMKx7VzZvuQwE
h3w3pz6sQbNbK2+d3NoCTU6Kca19LUZYGa6vlbXC7jIzWvHNWhzQrM0UBSlh
Z5fqIGNRHQYeOrfq+oAKTr3olvsl1eG+APlCc2EbhL95V6cyqcd/vdq4utXt
wB92W5KXUo8Ootd7We0EXAv+K1hk04BMtGQ1JnbAkZmhwkcFDfhJOyUXmnaC
/XO3a4J1z3Bn6EDRRIUWXD96mD9teIbr+lIXFbO64NZwRHi0vwSVOttjZxO7
4aKFr5PXhASNgBJM838NHCv6naNZjTjP2t02zq4Hbt9jX7nqJEVVHs8g50MP
OB932GD8Woqce6seHMZesJF485hXmvDiTf+hbbw+8DbvNnRxlCHbNTlQE6gD
/47WmZd9Mpx9wPb68lX9QCtp8RcK5HhqQ9HI2s/9EFVy5O0idjOyB5p7PZRv
QA1XVTbUFrRcwco2znoLN91qBYnaFkxf0MLlHx+ALR2PqPS/n2P36aL10m16
UH/1qGTUtRUL62w5c2f0YLHGa5CZ34pODckvzdsGQchvvjNhocCMXQGmddnv
gMMf61TFK7DszGoO89chODP0M6tuXIFFdB9+GAxDnWmUa+FRJVrXLtiTYTQC
zhQrtaVWid+aNG1M7hyBHqao5ewBFRboTwwL/EZhw4/M7DBChcl3EwL34Cgw
CnLCjUPUSH+hSTeiv4dP7ERxtV6Nm6SBRTfS3sMNRdONRE4b5mSEsJMm34NO
u8J2joEGTywTvPMNGoOyZJOYfWkaNLC28LavGYMDy8R2rKXt+M/gQoavIwkj
TyWO1PJ29ElkmAf8ToLMjG7hzCLQI7irdHEGCdvSxzM7fQjc7sYNUPNJeDqv
PoLrRyCNIhP9kEkCQbukUwQQOJ3A/vo7EQnTXtHsk6EEFiec3b2jmIT2KsuN
NbEEzk8ov7y2kQRFyekmYT6BlIOBa/RSEqY4VrmedwgcZ87I7spIqKc+qR4v
JLBn2tOS9pyEWLtNvQH3CXwSr8mjakgol0vu2z0m8Ej8h6rFfSSIzj8MLm8m
MCgoK1StI6HLJ0Z/rJXAn5jfzOG/IaE2ugGpKgJh+jLLfJCEBeftWCkEgUvi
rTrnj5EQWfUnGdZLoEnQ4wQpSQJNnNKxtJ/AWcz9DkkfvvRsT1PlWwKHP9+O
NJokYf/l7f47hgns03qZ1X8kIdmLFzU5SmBH5WDJpSkS9JEVLSUkga05v+3d
Mf3ln7PuQuQ4gQ1xmydnZkhYOjY/1mGSwP8AuaWdXw==
        "]]},
      Annotation[#, "Charting`Private`Tag$13567#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJzt22k8lF/YB3ClKKXSooRky65Vm+qilELJkrKmRCqSnSzJkgghRIrsZsYy
Y9+PvZQWtIhk37JX6q9FT8/HnPO8f15Pb/rMJ5n7Pve5rmO+fpfweRtt8/ls
bGy6HGxs//v3XcPRZonyKqQl0+JROHAPrT3KS6NKV6HKpzHuJ7niUdwOJR+5
6Er0N1M86NKXOLRJ+LIhfWElkvUME4u2j0ZG/JIXLQYq0P5N52d0LsQgq29u
a62qypHQ9Xza34X3kduLV09sH5Yh+6Ha7NsZYehOqqiLs3Mp+k+h69K2tij0
4IazpId2CTqiG79XPykaUc88b/WWK0a/OL5WuQVFouKtQgG3FxWhkkyVu04p
UaiBy35PSG8BGpXw1728+x5q7a0fvleRj7KWyKyS4wtHQ2XrH8TE5KF7G18o
11reQ/9FXlWLd8hFmo6pRhbtYYjTpvpnsmYOeuU7u192OpR5vwwk4rohee3z
IOb90dHn4OFTB/YFMe8nE9WM1KzaPH6Xef009HjWYYu/qR/zeiko8L/FadLT
zszrS0UvzRTPcH52ZV5PMip+KZ/XqeTGfP9ENLW27lkatxXz/R4jKs+PF4c5
XJjfPxY1+P9w9hZ3Z36/KFTt0J7/c7M18/+Ho7v7bWwLHMyYX38HgbKQ/qZO
PZj7d28kOF/V2mCROvPr7dBUmddSqYfmwMb8c5Zd8cUxLrwedvBspfHnFK98
5mtvmN7jZOK+rwJ/f0hdrrIvxakcvz/oFK179VqzHF8ffFsh/WRSrgxfP1RZ
LjoaoFaG7w9MRje3KqqX4fuHi7nne/hnSvD6wHtuPs7ULaV4/WD7hicrPwpX
4PWF1QFlPcnT5Xj9wanB5dPmxFL8fGCiQKv80o4S/PzAdzbyY3hCKX6+sFF3
6qPFAH7/HNjx4D95od+leH/AllB9MZ0vxXj/AJXHqCqkoBjvL5BJF1fbASV4
/4Hj1trnXvdK8f6EFlUnftlfJXj/wqK37vpCPUV4f8PHKAmf1UlFeP/D1wbF
qwtFinF9QI3ZyGrz1kJcP5CpVH8jYlkRri84N9LuKfSmCNcf3Lq0dbQnoBDX
J2gLuli61Obj+gXb5U9BVLkQMesbjqZkbtfsLmTefzVsX5vg9tglH93wjhYR
6amGIzfbIzMO5jHXowa21D7j3S2Qj65RVOwEOGuBy9PMxCAnn7k+tTD5eucs
f0s+Mn09WcUrWwfsAQfXR1zOY65XHVytMB+JystDWj8e8vBo1cPrIQWu+w15
zPWrhy0GQDV0zkXKG46dW+L0BLYrekh6d+Yx1/MpnCsX2NfEn4e2HZ6mL4x9
CtUrenO7L+Uw17cBUi8VvHPUz0MiVglsbJUNcN10Q+6hgjzmej+DrRp7Za78
yEEr7x0/+bPvGTSxd29M9M5lrv9z0N/Z0RtxKBexl8zEf1vcCN8rcjt6RHKY
z6MRdqfOs/P1Y6CvXSkT4/IvQExxg1vPHwbz+byAZ7tMWx+V56A+Tm0Y1nkJ
xS+DK85vzGE+r5ewJCyNM7Wejt7Iz4b0urwC1zsPtNqTGczn9xqKRftzvX4w
UI/0qYnxE68h6pal71MDBvN5vga3oGv8eu8YyPCAzFqr7tdgrLneePtsNvP5
NoHVrjr2fRpZqEVrHgzbN0GkwDO97ON05vNugoF3XEJKFDpSN39vYcHRDK8u
VBlN2WQxn38zHAxfdn90XTaqcckM6Y1uBp3HRXvCkunM/dAM7imcy0UsspFi
kE+BqUwLrAiWnY21yWDujxawYVvwn7cQFeXF63/qKG+BnMrZxfqCFOZ+eQOV
6yW+JwZSkWzuZg7Dk28gkBL8nmpDY+6fN6Bb0bzMMpaGkusXyrf2vIH5Cm9f
t8dQmPvpLVzg5G40TKMigbb2U6cc30LXxL15HpspzP31FiQOcZvZ7UpHkWMM
j2bOdzCs7STWpk5h7rd3YPVU3b1gPA1xz7udovngHZwwah03k6Ew9987KAi5
9Eaqk4L8Vpu8aJR9D9ofWmakNVOZ+/E9VES3pMZUJKM/Ejumj6H34DC68Vf4
niTm/mwFu7iNx2O3JSJHRS7BJ1qtYM718tDKxkTmfm2F2Zc7ssMKE9H4iS4V
lb5/rwd9ja+8TGLu3w/QO6zyVvXbY2RxvsCqyukDfNR3/9EV/ZC5nz9AXWfB
quBFj9Anx6CIA4vbQPQPZYRzTQxzf7fB9adcG0PkHiG9gPNlpbFtoLhuXazE
mjjmfm8Dxs7vwju57qNXD3f37ZZvB32Blfq96ZHM/d8OBxpOVB3e+QCp0pct
Lahsh0PfHS/v5Yln1sNHaLGaDuxJiEWopm/7dp2PMH+xw5VVVdHM+vgIwsL/
bShlRKFd70sM6f0fQeep5N2Oc+HMeukAaWGDLnYjf5T9OdRHzqUDWp7RqSn8
vsz66YCoUy6xGw/6I8lZCxqV6xPQHi2gp6gEMuvpE6S/Xun8VdgHPebZ3yLx
6BOc9ckaXfLcm1lfn6AtqdhqdsoHrRNf9St5cydQvvlwxMYEMuutE/wolI9v
X/ih0N3DIiLVnXC9OHnsp5U9s/66oF7qRZXofT20IPVsiqZ0F+TNk/PU+eDC
rMcu2CA45BtqHYoqs9X2hNh3gcS6NUk3nEOY9dkF4QM/ZqaTfZBHscKLxrIu
uNDN+ePsaBCzXruAYnrBqqIkDO2p2XhuCUc3TEiINixnt2PWbzd4W55SG3uk
gaYbl0wf0+wGnSNahplqZ5j13A0Vq2t5SycuAuPd99u3o7vBpaJLqnqvJczV
dzfcX2d58Ku7GbLu6hZ40t0NB8VPmOsqX2fWew/wLf4aUPjLFUl9bqQvlOmB
ipilmqJW7sz674EELfGFafY+qP9roYqKQw8kMWjr9y3xYPaDHtgbeWjp91O2
KOFPYqt3eQ98FgxLXF9oy+wPPSAvJ37bOtQDGXOGWFVx9ELZ2qnIjVu1mf2i
F/oaHRQ5v9+E9TyubGwneyEyY/k78a0mMNc/eqFSc8n1ieOa8G79hYgDMb1g
udIlsvGlJcz1k174eoirar/GOQgX05T06OkF9iObJR6vNmL2lz5ADrF7v0Z5
oBPye8tKZfqAM+b7UC3fTWa/6YOot/xXk/o9ENdu8ZM/HfpA1t9W1dXYm9l/
+uDl8LiY+zVtqFde0be7og++j394/PCaO8z1oz7Y6PjjNXXreeSt/svZmbMf
ln5RTBi2t2f2p34w+nnSv8fSHh04NbCk4GQ/bG2vf2h22Z7Zr/qhwzlkKNnO
DP00aYr/FtMPtRzqT4K9dWCuf/VDY1Cw3XJ2Zyi0LNu+vbcfdvJ+07P4YQ9z
/WwAfJ55+MX2XAF7u7QntrIDkLpm/4ijmzXM9bcBoMdxTbMZnoPN7uGGdMcB
8GrUCTwgcwbm+t0ALL5SK1O6RAmN+HlMjFf8ey37wZrzkhGz/w3AdADjJVeX
B0q7a+kjt2gQiudZdB8O92H2w0G4XvkO9ly5i8xidNZaaQ0CP3/p8aAJV2Z/
HAT5ekbEdmFHEEo6QKM+GIQej+b4FReOwFy/HATeqKddEhb6qD1DCoZ7ByGq
+e+v/K8XYa5/DsEuPW3bNxuuwf2C1S0SckNw2lBgVvnEWWY/HYJli1dFrjc+
C7qVfy0snIYgfcQubLTWCub66xAUX9iqvS5dBVY8+/wzGQ2BZnHAWu1AK2a/
HQL+PbB36hlAY8vbkN5Fw+B4pfrXRZdjMNd/h8FW8NjXvLUGcLujUkREexiW
CMsWiUbbwlw/HoblEptiedzVkMogrcA0dhhOuNZedLixH+b68zB8f7QzLm7S
HtimotTi+4bhS3jChKa1Fcz1689QwW1i+cHXBZX9vPmpQ+4zfMrXHOQvU2b2
789gZLH/8ttvQeCywNpOwPkzbPj1TU5y2hfm+vlnEBTY0KMq5AM7lp3hMKz8
DHqt3rvapG/CXH//DALBwc+jDW7C1NpDD2IWj8BjR/VrwZymMNfvR2BeDKWt
yO8ayhSWl2/VHoHRZYcEjrvYw1z/H4GE8So5xeeBcEmGr5r34QiM917dY6Ny
HubOgxFQFYq61TXjDOIKC/RO9Y/A1wcjhR46ETB3PoxCXrdv43HLe9B9YGL4
nvwoqHPr9rgohsDceTEKIWAap/HAAR4dbfNodh6FZHRorLHSgHl+jIIVr+9+
pb12oK9dx8NTNQp/0i+vSPBQgLnzZBQOCwzLb3GyRmuM6CmaXGPAWBXo2SFz
FebOlzGwlksbP340BJrMY/eE6IxBYbV3ytboIJg7b8b+/bz1QeyC9UUUYnPr
RePDMdghqLnIY6E28/wZAy1j7zBncztQc7U9t2RgDDzaasviJs/B3Hk0Dt/L
Y7i2RPgDh4/R9LHN4/Bg7PONSxV+MHc+jYOpPI/OxQtGUB2kGnDbZRwqlNar
bX8VCnPn1Tj8tt2WqdEQCp5R2wSfVI2DSegC44+1QTB3fo2DB0NB1OZ6BOx9
LMhYuGQCchuUKS6O/jB3nk2AvLRw22o/U/hOWXRYRXcCOByfXJ38e5t5vk2A
6DOLicySOygn92ur96MJKOn0vJkS/JB53k1A5KVtqwL04tDV8k9WVQMTYDd7
7Gjn5B3m+TcJHruV1nG634bI3gtsbOsmYedA/7FEozswdx5OwoTZkuLZPB+w
tzRQi983CT/56zXfPomGufNxEr6Mlo2UvEkCrTHNiAPnJsHY84PUo29pMHde
TsKjvW8v6c8Phc12hz91+E2C864WTd3jGszzcxIWGyu8MVAOAe4feyU9qJPA
OGczPNB3D+bO00kAj1tHzqtHwajbFjuBV5MwhjTDAwVvw9z5Ogkmf7642T68
Ac/YNpWVfp0EiZvyP1ey34a583YKPvP1JG00jgDsG9bj/ULcZTGAfWOLkuG1
5qhAwL7xZfb7uwqjQMC+Uehx1GzKKQywb7T01Azb/fscjH2DI0e6TEYuCLBv
vF7d8PYHNQqwb3x9ak5dp3MPsG8os0X11Ty/A9g3OPncV4aFBgP2jdbG6/WT
FuGAfeNP621/walYwL7R6ljT+zz/MWDfYAjtLFpdHQPYNxo0DP4+jokA7Bue
+8v/+xoTCdg3Qhwr1gTrRQH2jQ0xef+FdscC9g2e7vZtjvb3AfuGYpPGaUnp
+4B9Y8/idXrSbfGAfSPnjjB7d2E8YN8Iq7P0a7eOA+wbha2ng+6JJQL2jfcO
r3aPLIgF7BvcH9idO9dEA/YNfcdDElo7HgP2jWPlboO7eeMB+4bfPIZha2Qi
8Q3d6VVuPZ0JgH2jxTFTDw7EEt9wjas3XqhnQXzDKsbeuZWRRnxjoWZ/Dw+V
QXyD6qX6bP7LHOIbZ3bVBebdZBDf2M4nkr2EO534xuSV6PAu5XTiG57fJaEp
PYv4xr0XN5Tq/q0r9o0T5k/2iUnRiG94C9pLaMnTiW9kiabJZ++hE9+45v3w
hhsHnfhGncDORez3Molv5B4rEZZXyyK+IfVzUZZVNJ34RvfRreI7r6QT3zAv
beysqE8kvsEb3KTAU5xKfOPL0IP90eEU4htvvBbJiP7KIr5hSV/qQfn3/tg3
Li/kDB9QTSe+URj3eqV9OJX4Rv3Z4/X2bTTiG24DLV/XLqEQ3yg5E75f4RqF
+Eb5+qVHUUc68Q2KXDlF/0QK8Y2o6QW7d84mEd/4NDCz4+JGKvENUI9ZJ3Aw
g/hGRont5VU5ScQ34u666W7Jf0R8I0PmQckz4yTiGwW1SmnGA2nEN87vk1xf
4ZJCfOPv1mXLxfQfEd+oCtPSkOKIJ77hKWRRtX38MfENefvmF8VH44hvVF9Z
yrfxYjLxDf3Lp+LzVyUS35C81H/jocgj4hu36CEmu08kEN8wXrPkpaVFPPGN
MtWZu9dk44hvvA44pXz9zmPiG9VBimMK2o+Jb8wkj46EN8YQ3yhJ/Ot/lSOK
+EbkH8FKk2v3iW9UHvmmeOxQDPGNFfss+N5xxxDf8Eg8L35jTwTxDe4+y0C7
rRHENwSCJaMNpCKIb3xryLD72htOfCP2vY3vFtsI4hvD+80rGJkexDfM96U1
z6x2Jr5xQ7WwvSUlnPjGb3rBK6WwQOIbgv6N/72psyS+EW+08mVe6k3iG2qa
744fHYgivvHL2fXVaEg48Q3ZnqZJedkbxDfuSr6IVui2Ib5Rf+RH1fEzdsQ3
DsiPSZyRDyS+IXXe5sr0c3/iG8YrRrsT5FyJb6h3Zr0P8ztJfOPMi4nNq7Lc
iW8kHfSqfjZ8nfjGkGjIrOJ5C+IbAkcFfwQsNSK+IabwJkR2/SnAvhEI1X+b
ZE8T31BVWqZU1nQBsG/o0+bVKnvYAfaNtLKi1W9oxoB94wubSMXlJlfAvsEV
17J343k/wL6h8V7wudJCX8C+wZatdvfPfm/AvtG7ord1PrcB8Y1pwa5TtAVB
gH3jvd7DZfmyKYB9g1akbs7eHwXYN9YF7TsoIhgK2Df2RkTMNobfB+wbdy65
X/EPjADsGwMvrH/X2McC9o2cbJ7qEtVowL5xyOTC4i8uIYB9Y/E2jSw/w2DA
vsGXdL33/J37gH1jtvfPe+QZDdg3OnXbt522jQTsG7EqUyuMmmMA+wZ7z6cD
yb3JgH1DcN3UgZrkVMC+0RMdZjJTnAzYN9z5p0Ilm1MA+8YBu5dt8f7pgH3D
vmHtFk7fVMC+sdPrtGJvdTpg31iulXiUxzQTsG8cU02gXvBNB+wb250EDKwu
pgL2DaFWyyOrDGiAfeOQYp5++t90wL6xPn4n9wvhRMC+8fS6iEegRQJg39gv
tDTTtikVsG+s1D/IJ5lGAewbtReSeI1EkwH7xlozj/fXpaiAfaOcesN+oXo2
YN8QvZSzeNuFbMC+wVkboxjIySC+8dNoG8NHh0F8Y1tvk5THoQzAvlHtk1rb
2J4K2DeKL8Zw7+JNBuwb6bkrr5ZVpAD2DTFFdhM16zTAvqF2kW/C7TAFsG9w
fzIpO7yOCtg32B1Xeub4UAH7xrV9MhdW/80C7BtD5nUWsa05gH2jbo3ISkNa
DvENqiNfm3FgJvGNCGXDO6XHaMQ33DOv/RriyiK+Yd1jfIcen0V849W1mmgB
sQzAvnGfP3lhRwEVsG98MGQzu3kgA7BvbNp864v9GBWwb2yjyn262JIO2DeW
Jo5JyYRlEt9Q8irkmJiXSXzDfXH9y0+taYB9wzbqW3TG73TAvuEz2KfxYz0N
sG/s5AvlFU+mAvYNHzO9zss2mYB947HqhXQ3rSziG8Gu1GgZfgbxjYFF25Vt
PenEN0x/su08/yeL+MZzF8M3P+LoxDfC6aUF036ZxDf0DAQaco5nEN9gMxGL
EvudAdg3TKKCBxuNswD7xhUBQfVCgzTAvpGzPrFq8SQFsG+khwUMLaHkAPaN
jfHvP4QxGIB9Y0Hz+MUXYtnENyi7yyRjfLKIb1zecNxP5l4mYN946LUnLqw3
i/gGX/SkveRLOvGNZya+bzts6YB9Q2LMWiT3F4P4xlFHdf1GJzrxDZ6puubr
e2jEN4T+ozGEQymAfSP7pIWz5OJM4htseXsTBF1oxDeefFGxPhtHI77RU6MX
t24qm/iGudo3i60+mYB9o/mawe/o0WziG647pLVpQ3TiGzMzH87zeNGIb4iW
yja0a1IA+8a8r+EmN2zzAPvG3YyBIq35xcQ3wloqRUz+1Qv2DdoWDb7DfHTi
Gzox80ciVjKIb5x4dEshSiOH+Eat8YPLEtuyiG+YLslhO5FHAewbob/S0/O7
MohvNIU+dQFpOvENZ+eQWP/+TOIbWb5+bOdOMohv6C51OFf5LIf4hkLCQs4W
VzrxjQXnJjN4jzGIb1g95G8pc8klvqFWdFu7zS0XsG/8XrWjN302h/gGTenv
/sf7solvfHy33DNJkw7YN056NU672eYQ35hRT3g7rZBPfKO41r/TOKqA+MZ8
w/4hk3/1hn2DDh0+esU0wL6Rn+AztsEik/jGad2bTQKXMohvKJtJym7/lkN8
46ehTa3TTA7xjRDbUw6wm0F848VkfxKvVSHxDY4mT3a+tALiG3unYr95MgqJ
b6wVnVm4NLyY+IZVVFJEuU0R8Y2KQte7nv0M4hufOxjV6a3pgH1DPXjGhHN1
JmDfmDGpW3dzIQ2wbxiFuFJsZLIA+4aOhq1uZQkVsG+k8/dlpZzOJb5RcEwI
aesUEd/gtn+/sFEkj/jGrqlHqH0mj/iGcZXtPCe2EuIbq9puiWh7lhPfGJM5
3qR3JZf4RrHrqrjOXQzAvvH9tuWlz6sLiW94TVyjpYmU/J9vjIhWHDxdRHzj
ntcyT8b2POIbdzZcPJlonk98Q9Zyu9G5slziGzLxh009zQuJb6jw9HKcPU8n
+Q0LjTNB81tzSH7jU8HU48baHJLf8Pu0/srt+3SS37h+d1h/nTCd5DcSN1U+
UOPJIvmNNjvKgwXzM0l+Y29wwNlOZTrJb5x+U7tdLSqb5DcUucM5Hk9mkPzG
ptXeX8Zbs0l+Q+GZeJD7v8+r2DdqlJzd3C8ySH5j57pvJwbF6CS/kR+r83Gn
ZAbJb9wVNd67qZpG8htnnMeNmkMpJL/hu0ozbXBZBslvXB7QFG2m00h+Y3yw
q+b04VSS30DeL9+c/ZxC8huNcfGn7fRSSX7DmbcyW5wzleQ3CtzofkdTU0h+
461n/3JO3ySS33B9eUP/5Ookkt+Y7J31ONmWRPIbp+tHlHNnEkh+w5Zb6Hu/
RAL2CWQh53lCvCiR5DfuHwlepfA+EmHfmNhWPt58LJ74xsczbDFnJRHxDbtw
dmv7i3XEN7Q0N75PWl5LfIMiUBDwPaSW+AYl8Fx7pnQ98Y264+dFefbWE99A
Wea3ORNqiW8sqDwYTr1dQ3zDZ8fgDyOLWuIbDne5b+Ry1RPfgB+W6i9a64hv
wG3qhi9xNcQ3yjer/Ep/VU18Y62VhC7nv+vFvrH0/ajflge1xDf+qGakaHXX
Ed84dc7CKkmpjviGedagvdqiWuIbE2MVe0PaaohvKPPMn1f0pob4Rgn/9jLl
qBriG1mrfuWJv64mviFnY1/hPFtFfGO+Xbq7pUw18Q2xy9/XxkdWEd/wop7b
4p9TRXwjp681I/thNfGN9Ruqb2rsrCa+Mdrp1Pa5tpL4RlFkgN3i4kriG67a
/nJPX1cS3whIX5DAH1RJfEN7ucYdjn+vsW8c3iNmWadSSXyjOGbTsJ8tIr7x
rirDedShkvhGbbVptA2qJL6xO6i9qqmlkvjGlOlHPq6QSuIbEWu5um8bIeIb
/koOKg53EPGNiLqQ9CdyiPiG4pNGVYE75cQ3fMtXosF/fQj7xss/RjFODZXE
N+yOOG0rMasgvlF2cK2wP6ogvqGVKtC0zKSC+Ea2rhVbQnM58Q1kxn7QOqCc
+Ebv9x1HMoUqiG/0G9ecuySNiG9cW1b9XfNPOfENF9fvh0c9y4hvjHc8YDPY
X0F8Q06ssoraV0F8I6dNXDbidznxjeWidWtMQyuIb3j82q58RrSC+EZazQOL
0bYy4hvHLqYWDE+VEt/Ier9B7AxbBfGNKLZfedWUcuIb9CMaf9b0lRHfaMr4
dTb0binxDU9VqXaL6hLiG+NXhZZ/cC8hviF9f7+668Zi4htHNDrl3vwoJL7x
n4PU1HuVQuIbh8uFpGWdiohvnPiTOxm8qIT4hq+rU0Dd6WLiGyFcy2Kufywi
vlEwcuVUl1ch8Y1Fzet8TH0LiW887Yj5ndZeRHwD+PzlhQ4VkfyGps6HVPrL
IuIbJWyXCwr9Skh+g/PbKt6/ToUkv0F32/TjqEI+yW/4LGVPo7zLI/mNHSvd
dDs/5ZH8xom6rcYlGvkkv9EhtuGc1t88kt8oMRTW3mWRS3wjcYxNqcMhj+Q3
9M8sZX/eU0TyG9wm8mb++/NIfuO+8IVbjWF0kt9QD6BqXnfLI/kNr01X0hXk
8kh+oyWEd8XS8zkkv8F3ndvYdIBO8hsXJ1uElT/TSX7j/M0FI9w7ckl+Y/NZ
/dmG3FyS3/DyKKbt8coh+Y2G/m1G2/PpJL+RcDnh/hL1bJLfOD7jt7blKJ3k
N2oqxLjU9ekkv/G2e9M7Xzk6yW9I5bvm7b/OIPmNo2MyzzWWMkh+Q3iJzabg
4WyS3+CRats9Zcwg+Y0c8S/mNnr5JL+xcJlbY1o+g+Q3wpP91tAO0kh+o4Tq
5+1Xk0HyG3Q32PNHIZvkNwRMljdkqTJIfuOqj56EuBad5DcOLV5w6vu/19g3
esTMuDKW5ZH8RkGPjzL3RA7Jb6yUq284QM0i+Y15MsNXf66lk/xGbUWuzVUH
OslvOC80XC3Ik42wb4gnSgpmx2cj7BsqAxvC+XOzSH6Dl/tnh7BVJslvsEnz
TopFUkl+g7ftrXLdhwyS3/g1pTYZco9O8hsfpHqui6vQSX7DsMYGaqyzSH7D
s6xgk+tUFslvdBxa33t/ay7Jb6SMO1wRu5xL8hv8dQG3cgwzEPaN7utF7upp
NIR9Y81g4HINTSrCviFPq7JcPoXzYL0wFbOvRdIpA2Hf2Gy+M9aiP5PkN8zc
xT9rLGOQ/Ib8m/IRhnkOyW8cCee4eHU7g+Q3+nZ+VVo5j0HyG9a5cRdFL2cg
7Bs3F9z89KQ/BWHfEP6vT3K1EJXkN76FH5qX9iGT5Df4NxWPb57OJvkN9tdV
f8o9s0l+w2ubpTvqyCb5DYX7E8+1+TIR9o3Buwzde44ZCPuG8lLK6KK/NIR9
Y4WyVt2ymzSEfaPrhOaIV0gmwr5RZrQ+OtKAhrBvBAs6d80+oyLsG2duett4
u2eS/EZIhEK2/Eo6yW8MejbMFjdnkfzG02Bp/aiPDJLfeKJ8Y3ebTwnJb/jM
v2vmM5FH8huuptXeXh8pCPtGSXJ5ksvrTIR9ozFNnz1EKpvkN47eKv60vp+G
sG+kPAh6HhuRibBvpCg79mtaMUh+o1O37vgzNgbCviEYbLnxl24mwr4xar5j
xd4IKsK+obb50bcrwpkkv/FcxyPnd0AGwr6R/NjonEEGFWHfmDRdsaHvNwVh
34grVacvv0ND2Ddi3V585TmdRfIbEyal0rFO2Qj7hlNV/W/5txkI+8bDJ/0X
Ln5JQ9g3Ig6oiK60zSb5jQ9bt7y0Kcoj+Y0Z7dMmAnUMhH0jQspfXvIjFWHf
UNMJUB5ITEXYN9zqD5WU3aUg7BvLHY4s7BqhIewbPBOhZQpbMxD2jce2RrvK
3maS/MbbXdHnEufj3z+OgLY03aB7PBFh3/jvgWnezEMawr4RfNO881hiBsK+
kevxm4v9YALCvnGtaqkPnTcWYd+4UFowdM0hCWHfuB6hCfb9dIR9Q/Xdl+Iu
rTyS35AP82k3LaQj7BuLo8qLKQNZCPtGguWsF4dEDslv8Hb2ClaE0BH2jT3z
JnJrVWkI+wav5InRxK4shH1jz5HKAr94OslveG89r5v1IYPkN85yiS6uakxH
2Dc4i4dmFslQEfaNW4PsOic2UBH2DUnl4adFq2gI+wb/UNkegVN0hH3j42PG
n5lFWQj7xootz/X7fTMQ9g2RFwYdql748/I40CPKhtIpWQj7BpuYzuWz4TkI
+wZ/yntluQ46wr6h0MjlcTIjh+Q35F31ZLJd8kl+Q19I5Pi9hlKS35j5dcrk
t1IFyW/Ui6v/vq+fR/IbPPzpTaq2VIR9Q+p1iqy0OwNh3xDZIZW97koWwr7h
VO+4uUcmAWHfoGu16I1mRSPsG5+u5ve0bIpC2DcOCNbt1n2TirBv3K/XnlhN
YZD8hqVZgaXE4myEfSP9QPHOHVvweToJoF+lIGpGRdg35IWncx6dyUDYNzor
hjautmMg7Bu1dzUV9/z7XI59w0qMIvDRmvx+lzWfwppPYc2nsOZTWPMprPkU
1nwKaz6FNZ/Cmk9hzaew5lNY8yms+RTWfAprPoU1n8KaT2HNp7DmU1jzKaz5
FNZ8Cms+hTWfwppPYc2nsOZTWPMprPkU1nwKaz6FNZ/Cmk9hzaew5lNY8yms
+RTWfAprPoU1n8KaT2HNp7DmU1jzKaz5FNZ8Cms+hTWfwppP+X/Np/wP82+z
+Q==
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
        LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
         "]]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

         "]]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.8500383403056707`*^9, 3.8500387263675184`*^9},
 CellLabel->
  "Out[417]=",ExpressionUUID->"4b606b8e-96fb-41b5-9be6-599fd2bf63ab"],

Cell[BoxData["\<\"deltaWidth-vs-time-800.pdf\"\>"], "Output",
 CellChangeTimes->{3.8500383403056707`*^9, 3.850038726647088*^9},
 CellLabel->
  "Out[418]=",ExpressionUUID->"c9d44fea-a58b-4c20-8404-acbb8482bcf3"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SetDirectory", "[", 
  RowBox[{"FileNameJoin", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ParentDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
     "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"ppp1", " ", "=", " ", "\[Delta]Wplot"}], "\[IndentingNewLine]", 
 RowBox[{"ppp2", "=", " ", "\[Delta]Lplot"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaWidth-vs-time-1200.pdf\>\"", ",", "ppp1"}], " ", 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaLength-vs-time-1200.pdf\>\"", ",", "ppp2"}], " ", 
  "]"}]}], "Input",
 CellChangeTimes->{{3.822657852542942*^9, 3.822657904653783*^9}, {
   3.822659067842312*^9, 3.8226591019421186`*^9}, 3.8226591342627096`*^9, {
   3.8226591667438416`*^9, 3.822659211511117*^9}, 3.830500823088908*^9, {
   3.830500947286971*^9, 3.830500956481895*^9}, {3.8305012864446793`*^9, 
   3.8305013156481814`*^9}, 3.830502388007599*^9, 3.8305238809562984`*^9, 
   3.83052407306985*^9, 3.830524402591647*^9, {3.8307605063568473`*^9, 
   3.830760528968004*^9}, {3.8307606209970636`*^9, 3.830760662626516*^9}, 
   3.8317194130416355`*^9, 3.831719451892785*^9, {3.831719503874995*^9, 
   3.8317195699738445`*^9}, {3.8320667597615337`*^9, 3.832066839012351*^9}, 
   3.832320262588691*^9, {3.8323203322397814`*^9, 3.8323203367086415`*^9}, {
   3.832404238232563*^9, 3.8324042450216246`*^9}, {3.837756678120943*^9, 
   3.8377566817027693`*^9}},
 CellLabel->
  "In[167]:=",ExpressionUUID->"0bda899b-c495-4b1a-a1d7-1df95c8b7325"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Hidden Growth  - eLife\\\\Figures\\\\RawFigs\"\>"], "Output",
 CellChangeTimes->{{3.822657810901305*^9, 3.8226578393531923`*^9}, 
   3.822657905278121*^9, {3.822659126573266*^9, 3.822659134675606*^9}, {
   3.8226591858307714`*^9, 3.8226592118073206`*^9}, 3.830500957546127*^9, 
   3.83050131687862*^9, 3.830502388377986*^9, 3.8305238562943497`*^9, 
   3.830524074892748*^9, 3.8307605300420055`*^9, 3.830760655726322*^9, 
   3.830760685884634*^9, {3.8317195048133144`*^9, 3.8317195136314898`*^9}, {
   3.831719546498517*^9, 3.831719570500474*^9}, 3.831968795406955*^9, 
   3.832066765184741*^9, {3.8320668141974382`*^9, 3.8320668393949966`*^9}, 
   3.8323202647233696`*^9, 3.8323203379502797`*^9, 3.8324040169710183`*^9, 
   3.8324040711180844`*^9, 3.8324042461165524`*^9, 3.8377566826459494`*^9, 
   3.837761303611177*^9},
 CellLabel->
  "Out[167]=",ExpressionUUID->"d68886d1-afe6-473e-8387-594cb4a1b6ab"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzms01AkYBnBqmmLVit1YokOtu6RcQnpFpV0pCQmlZkQZt3N0omTM5C7S
YMpqXBvmgsRQGentYiOF3FYZU0zDf2ujNooTZWc/POc9z4f3dx4DSrT3iSVK
Skqeivx/q8voVsXVfDh733KAmylC4fzPxf3tfODtuXTaIk2EfL9aVVU5H+Sf
7zQ0XhBhldrI+Jm1AhgSLCxvTxBhRbwDxytHALwvlprTkSIs9JpZQYoWgjzk
Wf5JbxGmKYXLwjfXgO3qkoQOXREeO+bL3tpcB4cjB2S+NxtQoHI+KKBOBCKS
VWtoTz1S452Dt+24DSM5ltZT5Ho0nnYxtH4gBneBctr07zcxM8xs55qce9BS
6M6hqtche45Z/aPaA6CFD5z1aKpFW/HxkOzZh6AXca3MYV8NSpiURI3hNrjp
tubglu9CNPCRXDLjPAbNkErzvj4B2q1v73FM6YAV6nWR/Rw+/rNgpiL16ASq
AU+em8HDqpG6igzVZ1C4t+0iPbUKNzXzaBYfukBra0XMt/hKDCjTsqSIemDj
ZO/H1kwumrp+W9XR/Rzilt6dM8q7jib2Sbep2Av7aXGO0cIKjLN2Duoo7YNu
9tL1SiPlaCls1DbN74fv+nO3zMnluMXkZK/3mQEQZik/LnEvw/INg+XxEYPQ
7pB+TnNZKWpwvQ3XH/0LYLrF2rGgGPtN1EqvwBCs/RyhdNWDg/PmSVvINi/A
oNekKXi2CGNtNrZt134JRpOZdLOOP3AKJ0kLsy9hk6GQ9KK6EHufhB5pejcM
tK5jXxxTryLppW6DfZcEuHf69ZvoV7AkNEv/1sMRCPMxtdGKZqNTnIpTs0gK
Xj4ZyhMxBWiS03YwteAVnIpOGYy6lI+JBg4pnhmv4dAHtW7ieh6ypKf9P9iO
Qrjz4nKij4XjtMHd5ypHofvTAU9iFQsjmzV2JOuPQRzHr+uu22UsVolqjskd
g6Xf1q6M1MtF5V+qnEdUZEC93K3cWJWDK80XwOK8DJLXJbeK/bOxiB5QtP29
DFpSag/krbuIgSy2Us+JN+DFPRJjJMnEtqopudvQG8gIs1VdJc7A4wkbBu28
5WDTuDNnSW46JrEoeu875TBT33bXNC4NdwnvvUl1Goen8yaigcRUhAuzTcVN
4yCIekTUJqTgWNA+cpHxBNB7ovYVs5ORdLb2hv/VCbA1beS9br2AgT5vKWx1
AngNfG2PV0wM2OzGvsUkYNnWcjcNLSZmUXvEdckE0PyH6ms0mSguCBzlpxJg
FyJ75q7ORJ3ZWPNrmQRskE6uYKgwcbiF+yCJRcApCx323DwDA3aRp/aUE3DU
V/paZUzR/Z/sltwnwHO5zoGaagZmZfpGDDwkwGlCphXEZ6BYPMbqaiOAmu+a
rlbJQB29ryPYQUCPn0twdAkDh8fMYrnPCfjhffbHbSyFR8sujRxV/Ic5Jcye
UXgc7T9DZQRIWzpb6mMVXhf3XbCcAPthSUVEjMLb1Grr/bei6yxS5acU3szk
U7uPBCRW1NyQBDFQ1ejcv1afCHi+unbdtcMMdDxE1jKdIWB0h7FdoB8Di5r1
KbpzBGwOWnZQup+Bne+E6T99JaA7z/hw6V4GftW1r125QEC/oQuJ8hsDzTwf
9ZG/E3DPdaPPr7sVe+n75xYXCcix6t3z1pWB/wFhqYDC
        "]]},
      Annotation[#, "Charting`Private`Tag$4709#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJzt1ns01GkYB/BBF51pmQ5bpDScSrZUWzaXLi9qhtKihKY6yKIssjNptA0Z
4zJGR02OzLjUGMQYl4g5UfGqTbXdKKJSI2mlo2LXZYtod8/O++zf+//MP3Pm
vPP+3uf3Pp/zPY9FUNTOEF0KhaKvQ6H8891hldmT2KHGPdQu6lBrIebg7XPv
uL/AEhHzE1VQgA38prvTrnXhCsNF7uPv5Fj5oSHed90zPPJi6hujiHzMSOHW
5pU9wdG1OUNWdXm4Z+Gqt6/onZjvFMtJfCXFcao3C62zHuMFBlJXmc0ZbPJ9
/s4oajt283S/Ux6egWtf7xaq+I+wrtlM6mvJKewVO+fqxGgr3mcwwqszE+F/
63uAJYqGiIBkvqaeu/hziMslkx9+1px/G5s9txy2dBFozmvGiz9yNh2Jjtc8
/zp2ntQdn5fK1jyvEQ/8oh83uS5Qs78OXzaukTy6c1Dz/4t4x6Heiwm0Q5p1
BY475qAu6QrQ/JbiMBPHx+k52xBF88nJFnjsWhtN1lGS9NxLPXM52Y98ac6/
z2dXkeejnJU7eotENeR8tDGQFZjuXUPqQ7ayUyzm/mpSPxLYnDW9FVlB3g/V
hHtzuh3LyPuj0zOmktIVCnI/6PPAh71+6hJyf2iz2MB/qrGY3C9S67w/YjVc
SO4fhUwLm7Eys4D0BzktOm65ZkhO+odGbIrU61vOkf6iAmvqtmcNuaT/qMSp
TlQ6lEt8oGB9UbuOVw7xgxhSyvuu8CziC+V6DWRPL83U1KdG461jxzMrs/DC
25Ed51a/RP6ls+xn20k09b5EelxfoyszJViwWiXffaUHVf4aYH5TnEf24z3L
ZRkXfEXg14lh32ojFYDfpweO9BQ588Av642R9SYFB/wuHtHluZSxwS8reu2X
SLOD4NfvpF8auyUCEb8+3XHib5nxiPj1Wpaw86encYj4ne1kYFLtIUDE79j9
sdR+jzRE/Irj3CLpz9MR8au757cLtFERIn7L7Cl9w72piPj1tFOe2X8+DRG/
qsaAt0HSVET8qlKWmU54JCLid2rDPWZTvgARv/Y2u2NVMhEifq+1GeWFfkoG
v4pHDvtaVm4h68iYf6OriSYEv3rNElMdbjb4jdWfKNBxLAS/nS79S7I9z4Pf
Ses/Fdz0IvB7dPvb8GOp+eDXtelCdtPeHPC7PEHNUtKzwO/RoOMZE17Z4Pdy
Rmy5e102+H3f1xdc2wn5gajMINq7lJPgd5uFZ/PhbiH4dTAzfBARnwB+GWFh
9dMMEsHvtJv7Ktm+fPDr9srY0j/JGPxSeBwTmfwQIn6X2Q4GnwlgI+K3fIUJ
r+/0YUT82trx++ed4CLiF60355UowxHxa8UeU933+xH8cpcKTecXV4HfQT5C
M1ZVgd/V9TMnu+2rwO/kpi6xeWIl+B30cZRjgRL8rp8lyrgXWAJ+9YQbA7PG
iyF/11L3fubsKob8TbvYZkgXFkL+rpFMJqZayCF/xYYO1W3lZyF/m9mMjDxZ
7n/5K/ravWyDDPI3VOqQYbsiD/J3a07HratzsyB/fWh/tA2xxJC/RnN0Q4Jr
T0H+Go+bi/ntYsjfd4zhes+7YsjfWnFEj3GxABO/N9YxtzhzkyF/KXO2p3XG
lIPf8FUL8lRJl8Hv6JPFo27cBvBrIGu08fhyBfxGlBb6P+TVgV+GUNErslaB
3wLeG/fBwlrw6xqa8iGIXgN+A7w9Y0zSqsFvZvggZ8CrCvy6ikPro49Vgl9m
TL2+PKUC/NpwFd7C/grwu/QAvSwwCvqLdrRUmbH+7ifxu8TQwvyrrhLwOzwZ
cx4zlOB3FAvVoz4KyF+6nYj5sb0Y8je9g+XxkF4K+bu5yvS7KH0l5O8llv6J
kOsKyN/cIMrmrQNKrJ0ftPODdn7Qzg/a+UE7P2jnB+388H/nh78AJASoYQ==

     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[
         PolygonBox[{{89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 
          102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 
          115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 
          128, 129, 130, 131, 132, 88, 87, 86, 85, 84, 83, 82, 81, 80, 79, 78,
           77, 76, 75, 74, 73, 72, 71, 70, 69, 68, 67, 66, 65, 64, 63, 62, 61,
           60, 59, 58, 57, 56, 55, 54, 53, 52, 51, 50, 49, 48, 47, 46, 
          45}}]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large], 
        LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 
         18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
         35, 36, 37, 38, 39, 40, 41, 42, 43, 44}]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
        LineBox[{45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 
         60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 
         77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88}]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
        LineBox[{89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 
         103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116,
          117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 
         130, 131, 132}]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.075, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.025, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.125, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.115, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.11, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.105, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.095, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.085, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.065, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.045, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.035, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.015, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.005, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.005, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.015, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.025, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.822657810901305*^9, 3.8226578393531923`*^9}, 
   3.822657905278121*^9, {3.822659126573266*^9, 3.822659134675606*^9}, {
   3.8226591858307714`*^9, 3.8226592118073206`*^9}, 3.830500957546127*^9, 
   3.83050131687862*^9, 3.830502388377986*^9, 3.8305238562943497`*^9, 
   3.830524074892748*^9, 3.8307605300420055`*^9, 3.830760655726322*^9, 
   3.830760685884634*^9, {3.8317195048133144`*^9, 3.8317195136314898`*^9}, {
   3.831719546498517*^9, 3.831719570500474*^9}, 3.831968795406955*^9, 
   3.832066765184741*^9, {3.8320668141974382`*^9, 3.8320668393949966`*^9}, 
   3.8323202647233696`*^9, 3.8323203379502797`*^9, 3.8324040169710183`*^9, 
   3.8324040711180844`*^9, 3.8324042461165524`*^9, 3.8377566826459494`*^9, 
   3.8377613036520405`*^9},
 CellLabel->
  "Out[168]=",ExpressionUUID->"4b4af4a8-a302-4d8e-b379-6c1e7d2afd92"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVznk41AkcBvBR04SUapMpxSMdDLmPzcSXrmf3KfJIkaRSJGft1KRyrBpF
pVIsiXWsxCBF2NE2X8fIpDDMDPNz5Bjj1+HYpIenpuzsH+/zPu8/n+c1DIj0
DJxHoVDcVPm/S3JjLbJLikC24NbV21p85H7TyRY3F8HAdtmNLzp8LDpQpqk5
UgRJvX7RvgZ8LNTqU7DXFMPGCsLA0JqP+VFbsjySi2HlHgo7z5uPGR7T6tRI
LgzodydF5PPxKiVkOMS6FIScewVMB8SjR/en/cwrhyBqCb3LvA6LNaL9fMsr
4fOBbPaPoHo8HuV0ZKtrDTwLZR7TudyAmz67rLOqr4UVpdxva+40YtJJxo6V
yXyIat9iSikTYNpsfIm2Vj3Ee5WGlZY3oV3tsRM3ZxrgN2fdyct1L7E3PiBm
eY8ApgxaeEZNzWjo1XuLkfUSIkL9m3UqhGhv1NzuyBHCSFpw+P3SV/hRydDo
390CwprEM1V3WrCwrzw/UfMN0HTFvmahr9GS9yjUbLIVaGP74p94vkHfXN3N
AZXtoNz1IKBxQyuabPu+RNgmArO1n9ODF7ShsUNczXHsABd1OPC9tw3PWzn5
CXM6YVjdv+FtTjtu5j6jm9wTQ9tBdca0gwhtjIM7PNkSSDn4vVU7XYR566V5
UWFS2EGtmqetFOHyAs91Rv5dwPwSEeh4uAPFxlo5f0A3WD7SazKv7sBvpnE2
NFsZeMXHa/av6ESWrbnAmU7Au4xA68ehnTiB41TlDAE5EWzlEezEjldBh6s+
9EBqncvNR3QxUgm9CofWXrBzSKRkhYjxz6Dr+tUNfXDtU2wutUGMzPMaTF5l
PzhaRcjZKyVonCzYl5D6FnaLCjhLT0gwxnALxy1xAJYucvNVq5FgSv9Zn0m7
QWh+etLPe74UFaHSXRcfDoL7uGSZjZsUw3nLXa/oD8GSkOC3e7KkmK0RwTt9
ewjs6clChkKKaqsKnfo0hmG+3DvGwqYLF5sqwSx6GOgvT4+aXOrCzFjfTOex
Ybjdc2pgqq4LD6WkUdoD5TD7a7+sbVE3CgonRrZ3y4GnLs0Z8+jGY5fWS+09
R+Chm/mM5oNujEsJWDvWMgJkkevdJfJu3MnlyxOYCqhRexKbvkGGcHmmKrtK
AZzqcwbLwmU45OdOy9w0Cqd+Io2sy2VIvVD22Cd9FJ4G/SOKnpThIa/3AWlL
SbhLGTzDtSXQ13p7WnU8CYQzU1h5lsDrx9try6+Q4B7MyBGdI7A29dBgUQIJ
PI/csHE2gatnWKYPkkiwGt30ceMFAnueF9THpZCwsKmHfT9G5e2kTfySR0K9
Easl+qpq+7za1VtHQh3rQuTWDJWftD9M0kCCs/3Aap/7Kr92KKVVQMINl4Uv
WJkqf+3XPhSSMC/hoYKbpfKHGKwCEQkL1rsL6XkqL/RmTvggCclO7yVTxSov
i94UNEyC9qq944tLVF5rwYcjIyRMslKVxqUqz/KFnec7EqbfCeb8H6u86fHX
9v+SEMmZzGipIFBz48VPFlMk/LWME6yoJNDRm6ZrMk2CazrNglJFYCZPP0Bv
lgR2fV+uXQ2BLR+411Z8JUGNYrvH428Cv+o5lC1WkiAP+X0ihEcgw62xk/aD
BMu2xmsJtaq/sXtn5+ZIyP8yp5v7nMD/ABewk9U=
        "]]},
      Annotation[#, "Charting`Private`Tag$4756#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJzt1ns4lFkcB/AhbeyY1m6yVmmbiCxJSlva7Siru8gUU7Klmy5ki1UtlahI
wiRmXYqdZGtm3SYzyOVIM5iJGMYYYwmppJsuiNj22ac5v//3/3n/eZ/3ed9z
zu895/N8nx99Z6DHHm0KhaKrRaH8d1dYXu6OVHTinWwdu5TQRHQErzeSruvA
22c/+CYv6CSa7DVxncGddmxuu00WEeOMuC/LT3kuUuET09JPRscEY5dzIYXp
PCVeFa5vY+h3DnebznvaM7MVV0SKuE8fX8AnBE9MrZJb8HcOTBO38Hhs7Jrp
EUiV441UptDC4hIu7GVGCcKbcP0k+/c1+knYPezLsg+DjTgkJnR5D76MP9V3
HwfNf7w0QjcJf6rnHn5g9Ss1wjRZvX4t/l6nS9I2K1G9nhjLZdEVV0JY6vmr
sLaro9NgEEs9XwUeTxm6NSaKU48vxo4G1zafx9Hq7/mY232cWrf2tPr9DfyY
seR02SFf9fPvONLV5F20yz5EUV9rPj8nSFscSd4jf/sDV9ta88h4xHCL94nX
ryDzo707dhkKU6rI+mj94KlDacEiUh8aVwbR5vSJSf0oTLklxaGmmvwfch7Z
VJztUkP+Hw1befymENeQ/UG6GdVjcQm1ZP/QwvpEax5fQvYX5cjdtIKfScn+
Iz0P/vP05XXkfNAP2xc29T+oJ+eHDp/p2PNqcwM5X6S9LlrJ2tVIzh9ZMfRy
7VfKsNoHekHbEHVwapO6nnZkW2XlmFzUhNW+0AG/EIWxe7O6vk7UXLmK1dfU
jE1rAxRX7bqQZLvv85lr5ep6u9DX9JfWtnI5jrAT/MEs7UYFYf3+fJcWMh4z
jvnYH51bBn553Fb7D7XF4HfiLOGdE95C8MvbXyo5qyxExO+MjWatHWa3EPG7
bGtYvL4tHxG/IZMnO6yg8BHxO/R6JHmgrwARv/0TdUs6DQsQ8ZtAcWWwhvIQ
8dsefJ/WfOYmIn4TngT7v390DRG/uZ6sg/wMDiJ+p/dUFfXJMxDxG592NkVp
m4qIX0HSwLIXFDYifk9lF5eyplxCxK/SINCUHhCHiN9Wzs6uG6sTEfFbls3+
4k5AAvjdtSjf5u5nfuA3tloQb2PEAb879AIow7x88Pso9OE8834h+HUsuW38
6ko5+P0YYOSRTa0Cvzpb2mKWTxKBXztfPZV0gRj8vh6xztqWJwa/FqLhxXPN
qsHvlEpLj6GX1eB38Md61WxBDfh9dlRv+vyiWvBL9+sf3rRUCn5jX8e+aTW7
B347nHtP08fugd+x1F7X0of14HeKc7rW3twG8GvuNJSzYG0j+D02/nM6LaMR
/MZoGak6lI3g9zKvd1+Bvgz8Tl3k/pS9SQZ+k2rWBO75SwZ+OTbeqdxAPpkf
/yNOczs7WkjWxxsKfhEyaEJSHzZ5Edem2F8E+Wt/2KKHU14M+WsTOne02rIE
8rdyWtaHzV0lkL+Zw7PfTBi7Dfkr06MLVqSVQv5GuuyWLvG+DflryVBlcVcW
Qf4KdQeXlmsJIH+P5BSbrOzmQ/4epjvQzufnQ/5KTcZjfS/kQv6q2EEj73q4
kL8+7TnRF/dfh/ylCoxdc50yIX9lw/kUZhYb8ldoMet6efEZTPyGTRhwu+uV
AH4t3eI979YJwS9HyuxIFIrBr0q7xWBrhQT8jl7kuCMTKfgddZbV3hRJwO9b
L9WfVlES8OvFykyO8JKAX8rWY+7uf0vAb9/xpMqBcSn49VR91NkRUgd+dx9s
sqyi3we/c2y8y3XrGsAvzxp5OlU1gl8ule0/QSQDv4bBMwa+kjSB3xbmTEFU
ajP43ThaT8tiyMHv4p98qt+bt4DfbbKLBuZaCvD7bfjx1W/rFOCXYtgZmBDV
Cn5N9GMPiRhK8Nsw/8KBj51KrOkfNP2Dpn/Q9A+a/kHTP2j6B03/8H/7h38B
k2Pm5Q==
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[
         PolygonBox[{{89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 
          102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 
          115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 
          128, 129, 130, 131, 132, 88, 87, 86, 85, 84, 83, 82, 81, 80, 79, 78,
           77, 76, 75, 74, 73, 72, 71, 70, 69, 68, 67, 66, 65, 64, 63, 62, 61,
           60, 59, 58, 57, 56, 55, 54, 53, 52, 51, 50, 49, 48, 47, 46, 
          45}}]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large], 
        LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 
         18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
         35, 36, 37, 38, 39, 40, 41, 42, 43, 44}]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
        LineBox[{45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 
         60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 
         77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88}]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
        LineBox[{89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 
         103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116,
          117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 
         130, 131, 132}]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 72], 0.013888888888888888`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.822657810901305*^9, 3.8226578393531923`*^9}, 
   3.822657905278121*^9, {3.822659126573266*^9, 3.822659134675606*^9}, {
   3.8226591858307714`*^9, 3.8226592118073206`*^9}, 3.830500957546127*^9, 
   3.83050131687862*^9, 3.830502388377986*^9, 3.8305238562943497`*^9, 
   3.830524074892748*^9, 3.8307605300420055`*^9, 3.830760655726322*^9, 
   3.830760685884634*^9, {3.8317195048133144`*^9, 3.8317195136314898`*^9}, {
   3.831719546498517*^9, 3.831719570500474*^9}, 3.831968795406955*^9, 
   3.832066765184741*^9, {3.8320668141974382`*^9, 3.8320668393949966`*^9}, 
   3.8323202647233696`*^9, 3.8323203379502797`*^9, 3.8324040169710183`*^9, 
   3.8324040711180844`*^9, 3.8324042461165524`*^9, 3.8377566826459494`*^9, 
   3.8377613037727175`*^9},
 CellLabel->
  "Out[169]=",ExpressionUUID->"ecbf3146-c456-4fa7-9ad2-4443051ce532"],

Cell[BoxData["\<\"deltaWidth-vs-time-1200.pdf\"\>"], "Output",
 CellChangeTimes->{{3.822657810901305*^9, 3.8226578393531923`*^9}, 
   3.822657905278121*^9, {3.822659126573266*^9, 3.822659134675606*^9}, {
   3.8226591858307714`*^9, 3.8226592118073206`*^9}, 3.830500957546127*^9, 
   3.83050131687862*^9, 3.830502388377986*^9, 3.8305238562943497`*^9, 
   3.830524074892748*^9, 3.8307605300420055`*^9, 3.830760655726322*^9, 
   3.830760685884634*^9, {3.8317195048133144`*^9, 3.8317195136314898`*^9}, {
   3.831719546498517*^9, 3.831719570500474*^9}, 3.831968795406955*^9, 
   3.832066765184741*^9, {3.8320668141974382`*^9, 3.8320668393949966`*^9}, 
   3.8323202647233696`*^9, 3.8323203379502797`*^9, 3.8324040169710183`*^9, 
   3.8324040711180844`*^9, 3.8324042461165524`*^9, 3.8377566826459494`*^9, 
   3.8377613040360136`*^9},
 CellLabel->
  "Out[170]=",ExpressionUUID->"08ee6127-8377-4a26-9f04-9f7ea7f92fcb"],

Cell[BoxData["\<\"deltaLength-vs-time-1200.pdf\"\>"], "Output",
 CellChangeTimes->{{3.822657810901305*^9, 3.8226578393531923`*^9}, 
   3.822657905278121*^9, {3.822659126573266*^9, 3.822659134675606*^9}, {
   3.8226591858307714`*^9, 3.8226592118073206`*^9}, 3.830500957546127*^9, 
   3.83050131687862*^9, 3.830502388377986*^9, 3.8305238562943497`*^9, 
   3.830524074892748*^9, 3.8307605300420055`*^9, 3.830760655726322*^9, 
   3.830760685884634*^9, {3.8317195048133144`*^9, 3.8317195136314898`*^9}, {
   3.831719546498517*^9, 3.831719570500474*^9}, 3.831968795406955*^9, 
   3.832066765184741*^9, {3.8320668141974382`*^9, 3.8320668393949966`*^9}, 
   3.8323202647233696`*^9, 3.8323203379502797`*^9, 3.8324040169710183`*^9, 
   3.8324040711180844`*^9, 3.8324042461165524`*^9, 3.8377566826459494`*^9, 
   3.8377613042474484`*^9},
 CellLabel->
  "Out[171]=",ExpressionUUID->"7106f278-7d42-4c9e-891f-b404599fd96b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<Figure 2\>\""}], "}"}], "]"}], "]"}],
    "\[IndentingNewLine]", 
   RowBox[{"Export", "[", 
    RowBox[{"\"\<deltaLength-vs-time2.pdf\>\"", ",", 
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"plot\[Delta]Len", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Delta]L0", ",", "\[Delta]A0", ",", "Black"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Len", "[", 
        RowBox[{
        "zero", ",", " ", "0", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Delta]L0", ",", "\[Delta]A0", ",", "Orange"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Len", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "0", ",", " ", "0", ",", " ", 
         "\[Delta]L0", ",", "\[Delta]A0", ",", "Green"}], "]"}], ",", 
       "\[Delta]lengthConfidence", ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Export", "[", 
    RowBox[{"\"\<deltaWidth-vs-time2.pdf\>\"", ",", 
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"plot\[Delta]Wid", "[", 
        RowBox[{
        "g1", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
         "\[Delta]A0", ",", "Black"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Wid", "[", 
        RowBox[{
        "zero", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
         "\[Delta]A0", ",", "Orange"}], "]"}], ",", 
       RowBox[{"plot\[Delta]Wid", "[", " ", 
        RowBox[{
        "g1", ",", " ", "0", ",", " ", "\[Delta]L0", ",", "\[Delta]A0", ",", 
         "Green"}], "]"}], ",", "\[Delta]widthConfidence", ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.822655999934304*^9, 3.8226561477350793`*^9}, {
  3.822656184049941*^9, 3.822656194871003*^9}},
 CellLabel->
  "In[205]:=",ExpressionUUID->"7e23fa53-1bb4-4541-81a6-e90537d99c14"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Hidden Growth  - eLife\\\\Figures\\\\Figure 2\"\>"], "Output",
 CellChangeTimes->{
  3.8226560537404633`*^9, {3.8226561551173177`*^9, 3.822656214586277*^9}},
 CellLabel->
  "Out[205]=",ExpressionUUID->"0b76d45f-c513-405b-96d9-dfab5398efe5"],

Cell[BoxData["\<\"deltaLength-vs-time2.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.8226560537404633`*^9, {3.8226561551173177`*^9, 3.8226562147907305`*^9}},
 CellLabel->
  "Out[206]=",ExpressionUUID->"c8f09f97-7c6c-40fb-a461-cbfc63ab0760"],

Cell[BoxData["\<\"deltaWidth-vs-time2.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.8226560537404633`*^9, {3.8226561551173177`*^9, 3.822656215011141*^9}},
 CellLabel->
  "Out[207]=",ExpressionUUID->"5d570fcc-7be3-4aca-bb57-a50797e4ac22"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "compare", " ", "fit", " ", "with", " ", "data", " ", "given", " ", "a", 
    " ", "set", " ", "of", " ", "parameters", " ", "obtained", " ", "from", 
    " ", "minimization", " ", "or", " ", "otherwise"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
       RowBox[{"g2", "\[Rule]", "5.9646572643958535`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "0.22596007807663557`"}]}], 
      "}"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
       RowBox[{"g2", "\[Rule]", "6.9646572643958535`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "0.22596007807663557`"}]}], 
      "}"}]}], ";"}], 
   RowBox[{"(*", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"g1", "\[Rule]", "3.1222703395011506`"}], ",", 
      RowBox[{"g2", "\[Rule]", "6.188414869493781`"}], ",", 
      RowBox[{"\[CapitalSigma]", "\[Rule]", "0.00854796983106368`"}], ",", 
      RowBox[{"\[Epsilon]z", "\[Rule]", "0.07"}]}], "}"}], "*)"}], 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "2.869403642609392`"}], ",", 
       RowBox[{"g2", "\[Rule]", "6.763107950731276`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", 
        RowBox[{"-", "0.12219815117835163`"}]}]}], "}"}], ";"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g1", " ", "=", "  ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]A0", "=", 
     RowBox[{"filteredWidData", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";", "  ", 
    RowBox[{"\[Delta]L0", " ", "=", 
     RowBox[{"filteredLenData", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"g1", "=", "5.133415384573404`"}], ";", 
      RowBox[{"g2", "=", "5.010676553113143`"}], ";", 
      RowBox[{"\[CapitalSigma]", "=", "5.744056677218134`*^-9"}], ";"}], 
     "}"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{"GraphicsRow", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Show", "[", 
       RowBox[{
        RowBox[{"plot\[Delta]Wid", "[", 
         RowBox[{"g1", ",", " ", "\[CapitalSigma]", ",", " ", 
          RowBox[{"2", "\[Delta]L0"}], ",", 
          RowBox[{"2", "\[Delta]A0"}], ",", "Red"}], "]"}], ",", 
        RowBox[{"plot\[Delta]Wid", "[", 
         RowBox[{"g1", ",", " ", "\[CapitalSigma]", ",", 
          RowBox[{"0.5", " ", "\[Delta]L0"}], ",", 
          RowBox[{"0.5", "\[Delta]A0"}], ",", "Red"}], "]"}], ",", 
        RowBox[{"plot\[Delta]Wid", "[", 
         RowBox[{
         "g1", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
          "\[Delta]A0", ",", "Black"}], "]"}], ",", "\[Delta]widthConfidence",
         ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
      RowBox[{"Show", "[", 
       RowBox[{
        RowBox[{"plot\[Delta]Len", "[", " ", 
         RowBox[{"g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", 
          RowBox[{"2", " ", "\[Delta]L0"}], ",", 
          RowBox[{"2", "\[Delta]A0"}], ",", "Red"}], "]"}], ",", 
        RowBox[{"plot\[Delta]Len", "[", " ", 
         RowBox[{"g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", 
          RowBox[{"0.5", " ", "\[Delta]L0"}], ",", 
          RowBox[{"0.5", "\[Delta]A0"}], ",", "Red"}], "]"}], ",", 
        RowBox[{"plot\[Delta]Len", "[", " ", 
         RowBox[{
         "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
          "\[Delta]L0", ",", "\[Delta]A0", ",", "Black"}], "]"}], ",", 
        "\[Delta]lengthConfidence", ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", "}"}], "]"}],
    "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"GraphicsRow", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Show", "[", 
       RowBox[{
        RowBox[{"plotWid", "[", 
         RowBox[{
         "g1", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0", ",", 
          "\[Delta]A0", ",", "Black"}], "]"}], ",", "widthConfidence", ",", 
        " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
      RowBox[{"Show", "[", 
       RowBox[{
        RowBox[{"plotLen", "[", 
         RowBox[{
         "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Delta]L0",
           ",", "\[Delta]A0", ",", "Black"}], "]"}], ",", "lengthConfidence", 
        ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", "}"}], "]"}],
    "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], 
   "\[IndentingNewLine]", "\n"}]}]], "Input",
 CellChangeTimes->{
  3.806388064797692*^9, 3.8063897074363565`*^9, {3.8063899882757406`*^9, 
   3.80639001332151*^9}, {3.8063945233821197`*^9, 3.8063945263192654`*^9}, {
   3.8064773916893187`*^9, 3.806477392213917*^9}, {3.806477452830865*^9, 
   3.806477519969342*^9}, {3.8064778642098656`*^9, 3.806477891576666*^9}, {
   3.8064966356488075`*^9, 3.806496676426774*^9}, {3.8064967195913596`*^9, 
   3.8064967505565977`*^9}, {3.80649693248199*^9, 3.806497002327211*^9}, {
   3.8064974391769605`*^9, 3.806497461152204*^9}, {3.806499244130806*^9, 
   3.8064992854373417`*^9}, {3.8065006779200497`*^9, 3.806500678964241*^9}, {
   3.806500992673958*^9, 3.8065010081435966`*^9}, {3.8065631408933153`*^9, 
   3.8065631531794643`*^9}, {3.8065633096303587`*^9, 3.80656331748735*^9}, {
   3.806563350991765*^9, 3.8065633543537755`*^9}, {3.806563561955682*^9, 
   3.8065635707933035`*^9}, {3.80656375090871*^9, 3.806563777171487*^9}, {
   3.8065638092896085`*^9, 3.8065638326451597`*^9}, {3.806564362785903*^9, 
   3.80656436986697*^9}, 3.8065644457680483`*^9, {3.80656500443264*^9, 
   3.806565006747447*^9}, 3.8065652083714476`*^9, {3.806565895169504*^9, 
   3.8065659119137287`*^9}, {3.806566136553089*^9, 3.8065661397475147`*^9}, {
   3.806566178521865*^9, 3.806566214856106*^9}, {3.8065662587178535`*^9, 
   3.806566261694866*^9}, {3.8065663376368365`*^9, 3.806566350756729*^9}, {
   3.8065664956203876`*^9, 3.8065665131475224`*^9}, {3.8065665625713944`*^9, 
   3.80656657227343*^9}, 3.8065666735314894`*^9, {3.8065667281914496`*^9, 
   3.8065667300604515`*^9}, {3.8065667974435463`*^9, 
   3.8065668952011356`*^9}, {3.8065670013280106`*^9, 
   3.8065670036198606`*^9}, {3.8184326774449973`*^9, 3.81843271298545*^9}, {
   3.818432826997296*^9, 3.8184329015385647`*^9}, {3.819798970839884*^9, 
   3.8197989879271975`*^9}},
 CellLabel->
  "In[792]:=",ExpressionUUID->"0b39067f-b84b-4511-8116-c2e40d108680"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVx3081AccwPELdz3M4wmHVqTElYemJ9P62g7FCBdmURNJKbHptaNSWfgd
53LyVEryVDK0Wh6y6nu5rstzhmMu1CWhcDl+G9Jmf3xen9fbNDiSHapCoVA8
Fvr/9cw6WannL+CQfsn09PZWdI/3kAXYnQd/94joFOtW7Op+2atpkAC2LjEJ
+SatOJywuPdEfyIobph196m1otaAT49jRDLItze9LmtpwcoGTvgxZwGcXB4g
OR/Ugh/j6GFqITmgL6qNMuI1o7vSzNaorRDMWl00rJWNKOal6exfeQdYTTO4
uk2CehqH33qxa2GJe/vad/ZiNG15NmMQjFDi1H9VPFePZzcnqaUmiiD14dMY
e6kQF5/2nb3KkADlX45ky5pHyNmYfdztn0aI05AFdD6pQ2ea8SK5uBWkh/x2
qfTVoN+tIUeqZTu8vqpl1RZThfNJMcIwvQ5IK5Mog21+xx9NTGvorzoh++ji
3pcedzCz4d2Du0VSENPzL+/+7jauZ04sKkjtAaq/6zqHLeV4wWXpo26fXjCc
rTLWLbqFh4wC7weyXoDcaXzE1+omjs0/F0kt+uGU+aLPizVL0DEv0Pny2ABs
kjH4w55FqHZSW9X3/Us4zJ6Y5RQX4G7VT9fi219ByXwUq8fpOrKHib1dDXKw
82raHD2ah9ZdhXlFD19Dsihm1rn0CipWua7QLxiEPzQd/4xuvozHnvLqbue8
gdGcUjKXeglbG7/PHIsbAm3tThY3LRuXdNdOl/zwFlL2TcdVumXhxx33fk70
GYYdn7TXV+pmolTNwW6p/QiEiJLWtehmYLj5fq17tqNgqEN9HLHqIko96dF/
mb2DjvUy3oB7Olp0e9OLaO/h0zcHpYJ8AW6qs2rP+Pge6L0rS3OVaWg+l9lk
IR8DnoGq07D8AipYfI9tonHY4D+gRyP5eGLYdOJ4zQRYuqdfMdblY+S0yVCx
hwI6w5mFB/xTMX7N2cG1DQq4GFY3O1nCwySVIkrs9g/w02fy0a26POQcTAtK
rvgA6gV+8e0ZKeg85eplZTEJWfMp1YOGKUiza9xXlDsJQ+rdhdlVyVicz5gr
11eCm/bj8Q7fZLQW2LyIFihhqyjskq9qMv5qoy5TV5kCp5bE7ijkInW++oh9
3BRUfmUjSDrDRXbsOv1tiik4MknkrnblIi82iDYVNA3a9/PaREZcLLgZlsSS
TUOliTAncJzAsoRNa0I9SLB4w+Z3NBCo0V9TH+xJQoXhnMuXC47a6nAgyJuE
nSvy9xQ8I3Dz6NfXAnxJ0Bk3D42SECj09GSw95EwI/I+SBcT2GUUrg4RJNB8
WOWhQgIpd/KnGHwSslYqbHfVEBi8zCxDP40EjoF0qraaQHHIjY3L00nw9NlF
Yy44Rb/iuFYWCV8ILXU0qgjUO103TM0jwTtkd730LoHMnV0vJstJsO7piYip
JJB/3f+UopKEMy60v8cqCFTMyAzHfyPB+AmzKWTBVeVyv5F7JNSWVe/xKifQ
ka54PvCAhIFVka82lBFYeDQ6su8RCXGHRx4W3yKQKiY1ZEISGCcYgysW3MiZ
d5M+ISHs22l1zVICrdrPjXQ8JeEad48WcZNAAVON2/6MBNFRyV7KgifPE+Zt
jSTsD7GciL1BoG/fMnFzMwmBSu9mZQmB/wFlp4Z/
            "]]},
          Annotation[#, "Charting`Private`Tag$33300#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVx3081AccwHHhrod5PHluRUpceWh6Mq2v7VCMcDmzqIn089ChWE51lXnK
0zBJWchTybitXnnIqq+6LnlKN9yZC3VJR+Fy/DakZX98Xp/X2zQoihmirKSk
5LHY/39Ib5JUef4EDrmXTE/v5KF7gofE3y4R/NzZMenWPOwVv+jX0E8CWxdO
UokJD2VJS/tjB5NBfs1MPKDKQ80hnz5HdhpId7a/qu6sRV5rXPhR5xw4udK/
JTGwFj9waYRqcAHo8RujjTJq0F1hZmvUVQZmT13UrRXVKMjI1j64+iYw2mdx
bdd11FUPfePFbIRl7sL1b+0r0bTzyax+EEKl0+AVwXwZnt2aopqZzIfMe485
9qKruPQ0a+6KQQso/RfXsm1dMcZtvhjp9m8bcNUl/j2PCtGZarxEKngKoiO+
e5QHCtD3xogjxVIIr65oWnVx8nEhhdNM6HZDdnWLIsgmD4+ZmDbQXvbAxYil
/S88cvFC69u7t8pFIKCVXN77XTZupE8uKc3sA4qf6waHbZn4s8vy+2KffjCc
qzPWKU/DI0YBdwIYz0HqNDHKskrF8YVnfJHFIJwyX/J5hUYyOhYFOF8eH4It
EoMsmWciqp7UUmG9ewGhzMm5uIoE3KvysThB+BIqF6IZfU7nkClL3d/bKgU7
r/atMWNctO4tKyq/9wrS+Jw556pTKF/jukqvdBj+1HD8K6YjHo8+zmj6veA1
jBVUkYUUDj5t+/7COHcEtLR6GOezT+AyceNM5Q9vIP3ADJfn9iN+2HX7RLKP
DHZ91NrI04lFkaqD3XL7UQjmp2zo1InBcPODmrdtx8BQm/KAveY4ijxpMX+b
vYXujZKMIfdjaCH2ppVT38HHbw6LckqicUuTlTDvwzug9a+uKlREofn8hXYL
6Thk6Ks4yaSRKGdkeezgT8AmvyFdKsnGWJnpZGTDJFi65/5qrMPGqBmTkQoP
OfSE08sO+R3FhHVnh9e3yuEXomluqjICU5TLleJ3vofjn0nHtutEYNzh7MC0
2vegVuqbIMwLR+dpVy8riynIX0ivHzYMR6pd24HywikYUROXXawLw4oSg/ka
PQW4aT2Y6GaFoXWOzfOYHAVs5xOXWCph+JuNmkRNeRqcOpPF0RiKlIX6MHvu
NPC+sslJOROKzPgNejvk0xA2lVq41jUUM+IDqdOBM6B1p6iLbxSKpdeJFIZk
BngmzQUBEwRWJ21ZF+JBgsVrZlZ3K4Hqgw0PgzxJqDWcd/ly0dHbHQ4FepOw
e1XJvtInBG4d+7rYn0WC9oR5SHQLgc2engbMAyTM8r0P0wQE9hqFqwGbBKoP
oyakmUClmyXTBlkk5K+W2+5pIDBohVmeXjYJcfqi6cZ6AgXB1zavzCXB02cP
lb7odL3aSM18Er5ottRWryNQ93STjFJEgnfw3oeiWwTSd/c+n6ohwbqvj83h
EZh11e+UnEfCGRfqP+O1BMpnJYYTf5Bg/IjeHrzouhqp7+htEhqr6/d51RDo
SJM/G7pLwtCaqJebqgksi4iJGrhPAjd09F7FDQIpAlJd0kyCQazB8KpFt8Ut
uIkekUB8O6OmUUWglfDcaPdjEorP79NMvU5gDl31vPAJCfyIlv1Ki55KTDXv
aiPhYLDlZPw1AlkDKwQdHSQEKLw7FJUEfgJ1Dnzf
            "]]},
          Annotation[#, "Charting`Private`Tag$33347#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVx3081AccwPELdz3M4wmHVqTElYemJ9P62g7F6Lgwi5pISolNr/3Ow1Xy
TOZMUkY3TyXjVr3ykMVXXZc8JcMxF+qSULjc+W1Im/3xeX1eb9OgCE6ICoVC
8Vjq/z9k1kvL2RfAIfuKadzuRnSP95D62yWAn3t4VLp1I/b2vRjQNEgEWxdu
osCkEccSlw+cGUoC+XWzvkG1RtQa9u53DE8D2e62VxUdDShsIcJOOfMhZrV/
c0JgA37g0UPVgvNAX1QXaZRxH90VZrZGncVg9tRFw1pRj+KMLJ3Da28Dq20O
13fWop7G8TeenDpY4d618a19NZp2PJkzCEIocxoqEC/cwXPbk9UuJongYsNj
rr3kFi6P85kvYDQD5V+ieccGIRJbL592+6cVeBpS/55HFehMM14mEz8FyTHf
fSqDN9D35qgj1bILXhVoWXVyy3AxmdsUqtcNWRXNiiCbEvzexLSW/rIHLp9c
PvDCowgvtby9f6dEAmK64Or+bwS4mTm9rOhiP1D9XDc57CjAn1xWNvZ5D4Dh
fLWxbslVPGYUcC+A9RxkTlPjPlZ5OLn4TCSxGIJY82WflmrmomNhgPPVyWHY
JmVkjrFzUC1GW9Xn3Qs4zpmeJ0qzcb/qx2vxXS+hbDGS1e/ER85YysHeFhnY
ebZtj5rIROve4sKShleQJuLOO5dnoHyd6xr9ohH4Q9Pxz6j2NDz1OKP+97zX
MJFXTuZTU/Fp67eXJnmjoK3dw0rNSsYVfXWzZd+9gfRDszyhWxJ+2HP3xyTv
MdjzUXuzUDcRJWoOdivtxyFYlLypQzcBw8wPa921nQBDHeqD8HUXUMKmR/1l
9ha6N0szht3j0aLPi15Cewcfvzoq4QvO47Z6q66cD++APrC2PF9xDs0XLrVZ
yCYhw0DVaUx2FuWsTI9doinY4jesRyN5eGbMdPp07TRYumf/YqzLw4hZk9FS
Dzn0hDGLj/jFYfyGcyMbW+Twc2j9/ExZLCarlFCid7+HHz6RTezUjUXiaFZg
WtV7UC/yje/KiUFnpaunlcUM5C6m14wYxiDNrvVQSf4MjKr3FV+ujsZSAWOh
Ul8BbtoPprp9otGab/M8iq+AnaLQKz6q0fibjbpUXUUJTh1JfZHIRepizQl7
nhKEX9jwk89ykRO9SX+XXAknZlLy17tyMSM6kKYMnAXte4WdIiMuFt0ITWZJ
Z0Fo0pQXMEVgReK2DSEeJFi85mR2txCoMVT7MIhNQpXhgsvnS47c6XAk0IuE
vWsEB4qeELh94str/j4k6EyZh0Q2E9jEZjM4h0iYE3kdpYsJ7DUKU4dwEmje
rMqQJgIptwVKRiYJuWvltvtqCQxaZZajn0UCYSBR1tUQKA6+vnV1Ngls7300
5pLT9atOa+WS8FmTpY5GNYF6cfVj1EISvIL3P5TcIZC5t/f5TCUJ1v394Vwh
gZm/+sXKhSScdaH9PVlFoHxOajh1iwTjR8y24CVXV8p8x++SUFdRc8CzkkBH
uvzZ8H0ShtdFvNxSQWDxyaiIwUYSeMfHG0pvEkgVkxrSJhIYZxgja5bcSiy6
SR6REPr1rLpmOYFWXefHux+TcC31gFbKDQL5TLXUrickiE42H6QseSYhxbyz
lYTDwZbT0dcJ9BlcJW5vJyFA4dWuKCPwP+1Tga8=
            "]]},
          Annotation[#, "Charting`Private`Tag$33394#1"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJzt2vlbzF/YB/BIUoRCpJIWKi2WhGy3iKhIi6VVaUWkRYsWaZGikKREaW9m
apppX+e0E1kqSyLtKe0o30Qez9Wc8/z0/Afzk2suSzOfOee+va73W/K0o77N
bC4urnAeLq7//ZXXsfJXsq4/jKu5mXvvZKEbqdIe7u43IHWRxs4UtzI08/sR
YFC44tVr3TJUx++iFt4VBT8Wr3syqlTK/vOxUGE/72CIVilaK3nWhMHzGMwH
1zfv0C5l//1EsMs53Sk6WYz6Slc+iIlJhvcCIrypG0rY/14qqKx6IvRJkoWo
J583+ytRYGlIaWfyeBn736eBW53H5/WJJcjhh9dyh4pMGMnXKzuzuZj98xgQ
OH3vU0RCCVp+UJhGXceE1YZjn2x78c/Phs0P/lOW+F2C/rt3QSveNQc23DaS
MfhWxH4/uUAVNK0Izy9CzV21/XdZeaCQvkZrMxSz318+XNpY/dzvbgkq2igR
cn1eITRpuokqThWz328RzHvrbSTRWYgeXHGX89Evhk9RsgFLkwrZ778Evtft
uMAjVYS8Xrx64vSwFKqsBpbaNBewP08ZZO6pvRK5sBCZisrZ2faywHLgo6/E
m0L25yuHa2c2DnaGFKC4zXsClKLLQV/cw96jOo/9eSvAadFTkFYvQLdMBhtl
yyrgYEqmim5HAfvzV4LK8gSvxx556Ip/tJRUZyUcuPrxXsbeXPbzqIIN1c+E
t4nloYsUDWcx3mrg97UyN87OYz+fahh9vWVatCkPWbwerRBWrAHukL0rI8/m
sp9XDVxg2QxE5eYivZ8PBQX1auF1nyr//bpc9vOrhQ3GQDVxz0Hqqw5Zznd7
Aio7fOT823LZz/MpWJaJ7WwQzUWb9o8zeGKfQuXirpyOM9ns51sHqWfy310y
ykVSDglcXOV1cNliVc6+/Fz2834GG3W2K5z7mY2E7h4++qv7GTRwd6xO9M9h
P//nYLSltStyXw7iLp6M/8FXDxOsnNZOqWz291EP21JnOQcGMdH39pSRYeUX
ILNjlVfnHyb7+3kBz7ZaND8qy0bdvPrQb/ASil6GsU6vzmZ/Xy9h/p003tRa
BnqjPB3e5fEKPG880PuYzGR/f6+hSLonx+8nE3WuOzYyfOQ1RF2zD3xqzGR/
n6/B6+ZF0ePvmMhkt8Jyh47XYKa70kxlOov9/TaAw9Ya7p06dNSkNwv6XRrg
ntiz41mHGezvuwF63/FL7KEwkLbNe1vbuY3wyrrCdMyRzv7+G2FvxML7gyuy
UJVHZnhXdCMYPC5Uu5PMYJ+HRvBO4V0kZZuFdtwMyLdQaILFYYrTsY4Z7PPR
BI5cc/7zl6Ci3Hijz61lTZBdPs1nJE5hn5c3UL5SdiIxlIoUc9bPNTn6BkIp
Ye+pjjT2+XkDhqzGhfaxNJRcy6Pc3PkGZqu+ff0xhsI+T2/Bmleg3iSNisRa
Ph47dukttI/cneWznsI+X29Bdp+AlfPWdHRviOnTyPsO+vXdZFq0Kezz9g4c
nmp75w+nIYFZ11N0H7yDI6bNw1YKFPb5ewf54WfeyLdRUNBS8xf1iu9B/0PT
5DrdVPZ5fA+s6KbUGFYy+iO7efwQeg+ug6unItSS2OezGZzjVh+O3ZSILu3g
F3+i1ww2/C/3CdUnss9rM0y/3Jx1pyARDR9p19Do/vf6S6DZuZdJ7PP7Abr6
Nd5q/niMbE/nO1S4fYBPRt4/26Mfss/zB6hpy18SNu8R+nzpZuRuvhaQ/kMZ
4F0Wwz7fLXD5Kf/qcKVH6HjI6dKS2BbYsWJFrOyyOPZ5bwHmlgnJLfz30auH
27q3KX8EIzEho670e+zz/xF21x2p2L/lAdJkLFyQX/4R9k1cOrtdMJ59Hz5B
k8N4aGdCLEJV3SoqBp9gNp/ruSUV0ez78QkkJf9bVcKMQlvfF5swej6BwVO5
W62WEez70grrJI3buU2DUdbX2wFKHq3Q9IxBTRENZN+fVog65hG7em8wkpu2
pVH5PwPt0RxGikYo+z59hvTXQu7fJQPQY8FdTbKPPsOpAPrg/Of+7Pv1GVqS
ihymxwLQijVLppLXtwHlR8Dc2JhQ9n1rgyAK5dPbF0Ho9rZ+KanKNrhclDz0
y8GFff/aoVb+RYX0/eNoTuqpFN117ZA7S8nX4IMH+z62wyrxvsDb52+j8iwt
tXCXdpBdsSzpins4+362Q0Tvz8nx5ADkU6T6or60Haw7eH+eGrzJvq/tQLGw
dmAV30FqVast58/tgBFZ6bpF3M7s+9sB/vbHtIYe6aDx+vnjh3Q7wOCAnkmm
1kn2fe4A1tJq4ZIRO2C+m7h+PboDPFjt8pXb7WHmfnfA/RX2e797W6Hz7R1i
Tzo6YO+aIzaG6pfZ970TRPi+hxRMeSL5r/UMHoVOYMUs0JV28Gbf/05I0FvD
k+YSgHq+F2houHZCEpO2cud8H/Y86ITt9/YtmDjmhBL+JDb7l3XCV/E7iSsL
nNjzoROUldZcP3/bB5nxhjtUzO2C0uVj91Zv1GfPiy7ornfdwTtxFVYKenJx
He2CexmL3q3ZaA4z86MLynXnXx45rAvvVlpH7o7pAnshj3v1L+1hZp50wfd9
/BW7dCwhQkZXzqezC7gPrJd9vNSUPV+6AbnGbv8e5YOOKG8vLVHoBt6Yib5q
kavsedMNUW9FLyT1+CD+bWuO/nLtBsVgJ01PM3/2/OmGl/3DMt4X9aFWfXH3
NlY3TAx/ePzwojfMzKNuWH3p52vqxtPIX3vK3Z23BxZ825HQ7+LCnk89YPrr
aHCnvQvafax3fv7RHtj4sfah1VkX9rzqgVb38L5kZyv0y7wh/kdMD1TP1X4S
5m8AM/OrB+pvhjkv4naHAvtSFZWuHtgi/OO47U8XmJlnvRDwzCcotvMcuDin
PXFS7IXUZbsGLnmdh5n51guMOP5xLhNLWO8dYcK41At+9QahuxVOwsy86wW+
c9UKJfP3oIEgn5Fh1r/Xih/O854xZc+/XhgPYb7kb/dBabfsA5TmfYGiWbYd
+yMC2PPwC1wufwdq524hqxiD5Q56X0BUtOTwzRFP9nz8Asq1zEgVyUsgkbSb
Rn3wBTp9GuMXWx+AmXn5BYSjnrbL2hqhjxny0N/1BaIa/07lfbeDmfnZB1uP
6zu9WXUR7ucvbZJV6oMTJmLT6kdOsedpHyzkW3JvpdkpMCz/a2vr1gfpA853
BqsdYGa+9kGR9Ub9FekasPjZ11/JqA90i0KW64c6sOdtH4iqwfaxZwD1TW/D
u+b1w6VzlVN2HodgZv72g5P4oe+5y43hemu5lJR+P8yXVCyUjnaCmXncD4tk
18YKemshjS+0fIvYfjjiWW3nemUXzMznfph4tCUubtQFuMaitOK7++FbRMKI
7nkHmJnXX4ElYG7/IdADlf66+rlV6St8ztP9Ilqqzp7fX8HUdtfZtz9ugsec
885i7l9h1dQPJbnxQJiZ519BXGxVp6ZEAGxeeHKuSflXON7sv7Vl3VWYme9f
QSws7Hm08VUYW77vQQzfADy+pH0xjNcCZub9AMyKobQUBl1EmZLKys36AzC4
cJ/YYQ8XmJn/A5AwXKG043konFEQqRR+OADDXRfUHDVOw8w+GABNiahr7ZPu
sEZ1zvFjPQPw/cFAgY9BJMzsh0HI7QisP2x/Fzp2j/TfVR4EbQHDTo8d4TCz
LwYhHCzidB64wqODLT6N7oOQjPYN1Zcbs/fHIDgIB+7as90ZjPRrBAUrBuFP
+tnFCT6qMLNPBmG/WL/yBrfzaJkpI0WXfwiYS0J9WxUuwMx+GYLzSmnDhw+G
Q4NNrFq4wRAUVPqnbIy+CTP7Zujf/7c+yFift0Phjtde1D8cgs3iuvN8ePTZ
+2cI9Mz877jbOIOWp5Pl/N4h8GmpLo0btYSZfTQME2Ux/Bsig2FugOn4ofXD
8GDo65UzrCCY2U/DYKEsaGBnbQqVNzVDrnsMA2vPSi2VV7dhZl8Nw2+nTZk6
dbfBN2qT+JOKYTC/PcfsU/VNmNlfw+DDVJV2vBwJ2x+LM3nmj0BOnTrF41Iw
zOyzEVBeJ9myNMgCJijz9msYjsDcS08ujP69zt5vIyD9zHYks/gGys753uz/
aASK23yvpoQ9ZO+7Ebh3ZtOSkONx6ELZZ4eK3hFwnj50sG30Bnv/jYLPtj0r
eL2vw70uay6uFaOwpbfnUKLpDZjZh6MwYjW/aDo3AFzsjbXid47CL9Fa3bdP
omFmP47Ct8HSgeI3SaA3pBu523IUzHw/yD/6kQYz+3IUHm1/e8Zo9m1Y77z/
c2vQKLhvbdI1PKzD3p+jwGem+sZYPRwEfm6X86GOAtPSsb+3+y7M7NNRAJ9r
B05rR8Gg1wZnsVejMIR0I0LFr8PMfh0F8z/fvJweXoFnXGtLS76PguxV5V9C
3NdhZt+OwVeRzqTVZpGAPcuj29MpSGUSz1L9NJ/NfplNPHtya01o7lUm8ayK
iFTWfIF04tnRc9ER7erpxLO+E3LQkE4nnr374sqemopM4tkjNk92ysjTiGf9
xV1k9ZQZxLN06TTlLDUG8exF/4dXvOYyiGdrxLbM476bSTybc6hYUlmLTjwr
/2se3SGaQTzbcXDjmi3n0olnbUrq21i1icSzwmENqoJFqcSz3/oe7IqOoBDP
vvGbpyA9RSeetWcs8KH8+/nYs2d5eCN6NdOJZwviXgu5RFCJZ2tPHa51aaER
z3r1Nn1fPp9CPFt8MmKX6kUK8WzZygUHUWs68SxFqYxidCSFeDZqfM62LdNJ
xLOfeyc3262mEs+CdswKsb0ZxLMZxU5nl2QnEc/G3fIy3JD3iHg2Q+FB8TOz
JOLZ/Oo9aWa9acSzp3fKrWR5pBDP/t24cJGM0SPi2Yo7ejryc+OJZ30lbCtU
hh8Tzyq7NL4oOhhHPFt5boHIartk4lmjs8fi85YkEs/Knem58lDqEfHsNUa4
+bYjCcSzZsvmv7S3jSeeLdWcvHVRMY549nXIMfXLNx4Tz1be3DGkqv+YeHYy
eXAgoj6GeLY48W/whblRxLP3/oiXm1+8TzxbfuDHjkP7YohnF++0FXknEEM8
65N4es0VtUjiWYFu+1DnjZHEs2JhctHG8pHEsz/qMpy/d0UQz8a+dwzc4BRJ
PNu/y4bFzPQhnrXZmdY4udSdePaKZsHHppQI4tnfjPxXe+6EEs+KB9f/96bG
nng23lToZW7qVeJZLd13hw/2RhHPTrl7vhoMjyCeVexsGFVWvEI8e0vuRbRq
hyPxbO2BnxWHTzoTz+5WHpI9qRxKPCt/2vHc+PNg4lmzxYMdCUqexLPabfT3
d4KOEs+efDGyfgndm3g2aa9f5bP+y8SzfdLh0ztO2xLPih0U/xmywJR4Vkb1
TbjiymOAPRsKlX8bFE8Qz2ruWbintMEasGeNaLOq1X2cAXs2rbRw6RuaGWDP
fuOSYp1t8ATsWf64pu2rTwcB9qzOe/Hne3gCAXuWK0vr1p9d/oA927W4q3m2
gDHx7Lh4+zHanJuAPfv++MOFeYopgD1LK9S24e6JAuzZFTd37pUSvw3Ys9sj
I6frI+4D9uyNM97ngkMjAXu298X531UusYA9m50lWFmsGQ3Ys/vMrfm+eYQD
9izfJh16kEkYYM+KJF3uOn3jPmDPTnf9eY98owF7ts3w46YTTvcAezZWY2yx
aWMMYM9yd37endyVDNiz4ivGdlclpwL2bGf0HfPJomTAnvUWHbst15gC2LO7
nV+2xAenA/asS93yDbyBqYA9u8XvxI6uynTAnl2kl3hQ0CITsGcPaSZQrQPT
AXtWxU3M2MEuFbBnJZrtDywxpgH27L4duUbpf9MBe3Zl/BaBF5KJgD379LKU
T6htAmDP7pJYkOnUkArYs0JGe0Xk0iiAPVttnSRsKp0M2LPLrXzeX5anAvZs
GfWKC492FmDPSp/J5ttknQXYs7zVMTtCeZnEs79MNzEDDJjEs5u6GuR99mUA
9mxlQGp1/cdUwJ4tsosR2CqcDNiz6TlCF0pZKYA9K7OD21zrfBpgz2rZiYx4
7acA9qzAZ/PS/SuogD3LfUnINzuACtizF3cqWC/9Swfs2T6bGtvY5mzAnq1Z
JiVkQssmnqVeEmkxC80kno1UN7lRcohGPOudeXGqj59OPHu+0+wGI55OPPvq
YlW0mEwGYM/eF03mac2nAvbsBxMuq6u7MwB7du36a99chqiAPbuJqvTZrikd
sGcXJA7JK9zJJJ7d41cwd2RWJvGsN1/ty8/NaYA96xT1IzrjdzpgzwZ86db5
uZIG2LNbRG4Lr0mmAvZsgNXxtrOOmYA9+1jTOt1Lj048G+ZJjVYQZRLP9s5T
UXfyZRDPWvzi2nL6D5149rmHyZufcQzi2QhGSf54UCbx7HFjsbrswxnEs1zm
MlEyvzMAe9Y8KuxLvRkdsGfPiYlrFxinAfZs9srECr5RCmDPpt8J6ZtPyQbs
2dXx7z/cYTIBe3ZO47DdC5ks4lnKtlK5mAA68ezZVYeDFO5mAvbsQz+1uDtd
dOJZkehRF7mXDOLZZ+aBb1udGIA9Kzt0Xipnikk8e/CStlG9G4N4VnCspvGy
Go14VuI/GlPyNgWwZ7OO2rrL8WUSz3Llbk8Q96ARzz75pnH+VByNeLaz6njc
irEs4lkbrR+2GwMyAXu28aLx7+jBLOJZz83r9Gl9DOLZyckPpwX9aMSz0iWK
dR91KYA9O+t7hPkVp1zAnr2V0VuoN7uIePZOU7mU+b/7gj1L26Ajsl+EQTxr
EDN7IFKISTx75NE11SidbOLZarMHZ2U30YlnLeZncx3JpQD27O2p9PS89gzi
2YbbTz1gHYN41t09PDa4J5N4lh4YxGV5lEk8a7jA1bL8WTbxrGoCD2+TJ4N4
do7laIbwISbxrMND0aZSjxziWa3C6/otXjmAPft7yeau9Ols4lnanr+7Hu/M
Ip799G6Rb5IuA7Bnj/rVj3s5ZRPPTmonvB1XzSOeLaoObjOLyieenW3S02f+
775hzzKgNeB4EQ2wZ/MSAoZW2WYSz54wvNogdiaDeFbdSk5R5Uc28ewvE8dq
t8ls4tlwp2OusI1JPPtitCdJ2KGAeHZugy+3SFo+8ez2sdgfvswC4tnl0pM8
CyKKiGcdopIiyxwLiWdZBZ63fHuYxLNfW5mV6c3pgD2rHTZpzrs0E7BnJ81r
VlzloQH2rGm4J8VRgQ7YswY6ToblxVTAnk0X7aannMghns0/JIH0DQqJZwVc
3vPUS+USz24de4Q+TuYSz5pVOM1y4yomnl3Sck1K37eMeHZI4XDD8XM5xLNF
nkvi2rYyAXt24rr9ma9LC4hn/UYu0tKkiv/PswPSrL0nColn7/ot9GWq5BLP
3lhldzTRJo94VtFexdSyNId4ViF+v4WvTQHxrHME93kXuxriWT3d1e+TFlUT
z1LE8kMmwquJZymhlh8z19USz9YcPi0tuL2WeBbRba7zJlQTz84p3xtBvV5F
PBuw+ctPU9tq4lnXWwJXcvhriWfhp732i+Ya4lm4Tl31La6KeLZsvcZU+qtK
4tnlDrKGvP/eL/bsgveDQRseVBPP/tHMSNHrqCGePWZp65C0p4Z41ob+xUVr
XjXx7MgQa3t4SxXxrLrg7FmFb6qIZ4tFVUrVo6qIZ+lLpnLXvK4knlVydGG5
T1cQz852Tve2V6gknpU5O7E8/l4F8awf1XJDcHYF8Wx2d3NG1sNK4tmVqyqv
6mypJJ4dbHNr+VpdTjxbeC/Ema+onHjWUz9Y6enrcuLZkPQ5CaI3y4ln9Rfp
3Jj77zX27H41GfsajXLi2aKYtf1BToh49l1FhvugaznxbHWlRbQjKiee3Xbz
Y0VDUznx7JjFJxH+8HLi2cjl/B3XTRHxbPAeVw3XG4h4NrImPP2JEiKe3fGk
XlPsRhnxbGCZEPrCU048+/KPaYxbXTnxrPMBt03FVizi2dK9yyWDEYt4Vi9V
rGGhOYt4NsvQgSuhsYx4Fllx7z0fUkY82zWx+UCmBIt4tsesyvLMOkQ8e3Fh
5YTunzLiWQ/Pif2DvqXEs8OtD7iMd7GIZ5Vkyiuo3Szi2eyWNYqRv8uIZxdJ
1yyzuM0invWZUlE/Kc0ink2remA72FJKPHvILjW/f6yEeJb+fpXMSS4W8WwU
11RuJaWMeJZxQOfPsu5S4tmGjKlTt2+VEM/6asp/tK0sJp4dviCx6IN3MfHs
uvu7tD1XFxHPHtBpU3rzs4B49j9X+bH3GgXEs/vLJNYpuhUSzx75kzMaNq+Y
eDbQ0y2k5kQR8Ww4/8KYy58KiWfzB84da/crIJ6d17giwCKwgHj2aWvM77SP
hcSzIBKsLLGvkOSzugYfUhkvC4lni7nO5hcEFZN8lvfHEuG/bgUkn2V4rf15
UDWP5LMBC7jTKO9yST67WcjLsO1zLslnj9RsNCvWySP5bKvMKku9v7kkny02
kdTfaptDPJs4xLWn1TWX5LNGJxdwP+8sJPmsgLmyVfCuXJLP3pe0vlZ/h0Hy
We0Qqu5lr1ySz/qtPZeuqpRL8tmmcOHFC05nk3xW5LKAmUUvg+SzdqNNkupf
GSSfPX11zoDA5hySz64/ZTRdl5ND8lk/nyKaml82yWfrejaZquQxSD6bcDbh
/nztLJLPHp4MWt50kEHy2SqWDL+2EYPks2871r4LVGKQfFY+zzN312UmyWcP
Dik811nAJPms5HzHtWH9WSSfFZRv2TZmxiT5bPaabzaOx/NIPsuz0Ks+LY9J
8tmI5KBltL00ks8WU4P8g6oySD7L8AK1P6pZJJ8VM19UR9dkknz2QsBx2TV6
DJLP7uObc2zi32vs2U4ZK/6Mhbkkn83vDFAXGMkm+ayQUm3dbiqd5LOzFPov
/FrOIPlsNSvH8YIrg+Sz7jwmS8UFsxD27JpEOfGs+CyEPavRuypCNIdO8llh
gV+tkg6ZJJ/lWic8KnOPSvJZ4Za36jUfMkg+OzWmNRp+l0Hy2Q/ynZfXaDBI
PmtS5QhV5+kkn/UtzV/rOUYn+WzrvpVd9zfmkHw2Zdj1nMzZHJLPitaEXMs2
yUDYsx2XC72102gIe3bZl9BFOrpUhD2rTKuwXzSG+x5dMBazs0nOLQNhz663
2RJr25NJ8lkr7zVfdRYyST6r/KZsgGmTTfLZAxFz7S6oMEk+273l+x6hWUyS
z57PibOTPpuBsGevzrn6+UlPCsKelfyvW26pBJXksz8i9s1K+5BJ8lnRtUXD
68ezSD7L/briT5lvFsln/TbZe6PWLJLPqt4fea4vkomwZ7/cYhrevZSBsGfV
F1AG5/2lIezZxep6NQuv0hD2bPsR3QG/8EyEPVtqujL6njENYc+Gibu3Tz+j
IuzZk1f9Hf29M0k+Gx6pmqUsxCD57BffuumiRjrJZ5+GrTOK+sQk+ewT9Svb
WgKKST4bMPuWVcBILslnPS0q/f0+URD2bHFyWZLH60yEPVufZsQdLp9F8tmD
14o+r+yhIezZlAc3n8dGZiLs2RT1Sz26DkySz7YZ1hx+xsVE2LPiYfarpwwz
EfbsoM3mxdsjqQh7Vmv9ox/nJDNJPvvcwCf7d0gGwp5NfmxqaZxBRdizoxaL
V3X/piDs2bgSbcaiGzSEPRvr9eK74Ak6yWdHzEvWxbplIexZt4ra38pvMxD2
7MMnPdZ239IQ9mzkbg1pIacsks9+2LjhpWNhLslnJ/VPmIvVMBH2bKR8sLLc
JyrCntUyCFHvTUxF2LNetfuKS29REPbsItcDPO0DNIQ9Kzhyu1R1YwbCnn3s
ZLq19G0myWffbo22TJyN86YB0F/HMO4YTkTYs/89sMidfEhD2LNhV23aDiVm
IOzZHJ/f/Nx7ExD27MWKBQEM4ViEPWtdkt930TUJYc9ejtQFlx4Gwp7VfPet
qF0vl+SzyncCPloUMBD2LF9UWRGll46wZxPsp/3mymaTfFa4rUucFc5A2LNq
s0ZyqjVpCHtWWO7IYGI7HWHPqh0ozw+KZ5B81n/jaUP6v/mHPXuKX5qvoj4d
Yc/yFvVNzlOgIuzZa1+4DY6soiLsWTn1/qeFS2gIe1a0r1RN7BgDYc9+esz8
MzmPjrBnF294btQTmIGwZ6VeGLdq+jEQ9iwjsrQvnUJH2LNcMgZnT0VkI+xZ
0ZT36kqtDIQ9q1rP73M0I5vks8qexxWyPPJIPmskIXX4bl0JyWcnp46Z/97D
Ivls7Rrt3/eNckk+Kyia3qDpREXYs/KvUxTXeTMR9qzUZvmsFefoCHvWrfbS
+k6FBIQ9y9BrOj5Ij0bYs58v5HU2rY1C2LO7xWu2Gb5JRdiz92v1R5ZSmCSf
tbfKt5fly0LYs+m7i7Zs3oD36T/PGlWoSltREfassuR49qOTGQh7to3Vt3qp
MxNhz1bf0t2h5k5D2LMOMhSxT+epiNM35vSNOX1jTt+Y0zfm9I05fWNO35jT
N+b0jTl9Y07fmNM35vSNOX1jTt+Y0zfm9I05fWNO35jTN+b0jTl9Y07fmNM3
5vSNOX1jTt+Y0zfm9I05fWNO35jTN+b0jTl9Y07fmNM35vSNOX1jTt+Y0zfm
9I05fWNO3/j/6xv/D5wxPPw=
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1VOUGAYQBdDdjW1zY9u2ubGTjbmxbdu2bdusmbRJG7RJG9s3Jx935vd9
vDkTHBoW0i0oICAgkN+M37nODf7gT25yi7/4m9vc4S73+Id/uc8D/uN/HvKI
xzzhKc94zgte8orXvOEt73jPBz7y6UswAQMJIhzhiUBEIhGZKEQlGtGJQUxi
EZs4xCUe8UlAQhKRmCQkJRnJSUFKUpGaYNKQlnSkJwMZyURmspCVbGQnBznJ
RW7ykJd85KcABSlEYYpQlGIUpwQlKUVpylCWcpSnAhWpRGWqUJVqVKcGNalF
bUKoQ13qUZ8GNKQRjWlCU5rRnBa0pBWhtKYNbWlHezrQkU50pgtd+VKsMLrT
g570ojd96Es/+jOAgQxiMEMYyjCGM4KRjGI0YxjLOMYzgYlMYjJTmMo0pjOD
mcxiNnOYyzzms4CFLGIxS1jKMpazgpWsYjVrWMs61rOBjWxiM1vYyja2s4Od
7GI3e9jLPvZzgIMc4jBHOMoxjnOCk5ziNGc4y7mgr3f7K7/wMz/xIz/wPd/x
Ld9wjatc4TKXuMgFznOOs5zhNKc4yQmOc4yjHOEwhzjIAfazj73sYTe72MkO
trONrWxhM5vYyAbWs461rGE1q1jJCpazjKUsYTGLWMgC5jOPucxhNrOYyQym
M42pTGEyk5jIBMYzjrGMYTSjGMkIhjOMoQxhMIMYyAD604++9KE3vehJD7oT
Rje60oXOdKIjHWhPO9rShtaE0oqWtKA5zWhKExrTiIY0oD71qEsdQqhNLWpS
g+pUoypVqEwlKlKB8pSjLGUoTSlKUoLiFKMoRShMIQpSgPzkIy95yE0ucpKD
7GQjK1nITCYykoH0pCMtaQgmNalISQqSk4ykJCExiUhIAuITj7jEITaxiEkM
ohONqEQhMpGISATCE44gAgO/PslP1kc+8J53vOUNr3nFS17wnGc85QmPecRD
PgPZM+Oy
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 
             136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 
             149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 
             162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 
             175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 
             188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 
             201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 
             214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 
             227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0lNjFgAAQNFv2bbXsm23tZZbdi1z2dzCsm3btm3jP2S708N5vU83OCo6
clBQIBB4zRve8o73fOAjn/jMF77yje/84Ce/+M0f/hIQDCIe8UlAQhKRmCQk
JRnJSUFKUpGaNKQlHenJQEYykZksZCUb2clBTnKRmzwEk5cQ8pGfAhSkEIUp
QlGKUZwSlKQUpSlDWcpRngpUpBKVqUJVqlGdGtSkFrWpQ11CCaMe4dQnggY0
pBGNaUJTmtGcSFrQkla0pg1taUd7OtCRTnSmC13pRhTd6UFPetGbPvSlH/0Z
wED+jxDNYIYwlGEMZwQjGcVoxjCWcYxnAhOZxGSmEEMsU5nGdGYQx0xmMZs5
zGUe81nAQhaxmCUsZRnLWcFKVrGaNaxlHevZwEY2sZktbGUb29nBTnaxmz3s
ZR/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGbO9zl
Hvd5wEMe8ZgnPOUZz3nBS17xDwZKchA=
             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwVzlN7kAEAQOFvy7a5bNvLxrJrWVu2l23btu1+RDaX7beL93nO5QmLjI6I
CgmCIJZb4jZ3uMs97vOAhzziMU94yjOe84KXvOI1sbzhLe94zwc+8onPfOEr
3/jOD37yi9/84e//sdAgCCGUOMQlHvFJQEISkZgkJCUZyUlBSlKRmjSkJR3p
yUBGMpGZLGQlG9nJQU7CyEVu8pCXfOSnAAUpRGGKUJRiFKcEJSlFacpQlnKU
pwIVqURlqlCValSnBuHUpBa1qUNd6lGfBjSkEY1pQlOa0ZwWRNCSVrSmDW1p
R3s60JFOdKYLXelGdyLpQU960Zs+9KUf/RnAQAYRRTSDGcJQhjGcEYxkFKMZ
w1jGMZ4JTGQSk5nCVGKYxnRmMJNZzGYOc5nHfBawkEUsZglLWcZyVrCSVaxm
DWtZx3o2sJFNbGYLW9nGdnawk13sZg972cd+DnCQQxzmCEc5xnFOcJJTnOYM
ZznHeS5wkUtc5gpXucZ1bnCTfyTRdFM=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, 
            {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{43.999999999999986`, 5.000000000000057}, {
       23.00000000000003, 3.999999999999986}},
      LabelStyle->Directive[Bold, 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVznk41HkcwHG5inUs5YjdIi3S6apsts+UaCtHebA2RxYtSVEqrIjcOZpK
9ZQrd+MqpaUpfUQqg7CaIeM+xz1m5vt7ytFu+8f7ef371vYMsD8pLiYmZvOt
/60zYHIf2l0FLfMwDR+HJrSOsuG6GEeDzviOz6nnm5DdOdCtoBYDLx66y5XS
m5AXs7L7Ql8seBSIzTQ0N6Fiv0MX7Uwi+HaMaIUeaMbyxmA/f0s6RHTrdQ4a
tuBSuLKPpNddEGqd1ByQbEVroc4OjdZceFweGWlv1Y4NSdeV3NdVgPnw/ZXt
nz6iirzv+FH7amDcY29QnOhE7Zb3X9Q8Ec7rBxx/WtaNV0zjJJNj62G4scOd
E9SLKy87LmSov4OhoolYie5+DDa8c/bwZxZsCZThXN0wiJbSmiuGGj7AkLfe
kexfhtCJMUaT2tQOvpLlR7xNh3E5LqTWR6UDLHSNuryMRvCclnaV8uBHCDdf
CL2tNIppjVMvn+RxwOROvyhncBQ3G8ytyEnuggHtEwrM6jFMtZJ51enQDTcr
1azvh4zjnxquz10teiB4ak38OhoPZ5bb6jn6fRBRY5gfuMRDWqar5b2ZflDw
7ErdUDiBkn99L+E4PQAXS/QuhTlPoq3E16yo9kFgeqxN2LUwifa8+OPsxiGw
WB1bPZs/hdvYuZl5NcOw+N2LLZG/TiN//aEfVHNGIOZ5qtJU7zT6v01iPro7
Ckw12u6+yzP4gfV72kz4GPilq3JfKcziqs5qUnBiHNiNb6KK02dxaW/lpVgH
Hnjvz70WajSHHMk9xjJmExBuZW4QUTOHfrruipU7JsEoarPy/k185NgpB33S
mYKjIRWqZef4qN95TDlPehrGFiN2FlTy0YS5tf3W0jS8i17jUrXER93FtCb9
oRnIZ7c8SYB55Fuk2Oyun4Wv3LZ/iiLn8QJPe+5s1RxoMlhO82/nMYBojeXb
8OGiWTrDdJUAozZeGfmpkQ8PnHcyGbYCjBPPEws1nwf/2qkaY7oAg72veySW
zYNr5tO9tDYBWooOHd2qLwDOjzJRsSpClDZmueXdF0DggpVQzEmI+dnqi6Wq
Qnh2kKdVnS7EbfTtPUF0IVRn2G6XGhBiyXY5rpy4CHhx+way1otQavnvU2bh
InAOSbQN9Rahfaie6m6+CGQZ702K80WYFOohLfIgIJyMITHDIswp8omz4BJg
WAY/ytMjWBxjsvGkDQVrW7pvbvQhKN9XVedpRwGrLm0FzZdg4K49f3gco+CZ
m2WAyymCppP7slwcKUh5nXzw5mmCtXZ26vZuFLSO1E/9G0CQreEnB2coiK+2
k+CGEBSryBapp1CA8+Xn6dcIesrq3FK9TkGDpu3rkiSCDV6FhmtuUFBlTRTe
JRO8plp2VvE2BUo9bkXLqQRVLjN5UpkUjNoUNvvdImhwkN0jKKUgNyxh4kAG
wZQHzmH88m+/3mP6HpkE+V+4a2cfU7DtroNPWBbBZ6VDThOVFET3eQ1WPCBI
U+a39b+kYJW6K2tdAcHc00EBva8oyD5zWPznQoJSDZQ8t5YC+dU2Zo5FBFnB
y4c5byigH7mRn8QguLU9cqLjLQWyvR1dhcUE6QaSCe3vKdB9sUWuroSgIDpe
t5VFgb93xt7eUoKOvbINzc0UaP6mE/i5jOB/0AOjQw==
            "]]},
          Annotation[#, "Charting`Private`Tag$33441#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVznk41HkcwHG5inUs5YjdIi3S6apsts+UaCtHebA2RxYtSVEqrIic5Wgq
1VOu3I1BKS1N6SMax+SYMb5Dxk0aSY3r95SjPf54P69/37reQY7HJSUkJOz+
63/rjFjCBw6XQccyQsvPiYm2MXZCN9NY0Hu/7UvaWSaSrsEeJY04eP7AU6GU
zkRR3PKec/3x4FUoMcluYaLygFM37dQV8OeP6oTvK8Xy5tCAQGs6RPUYdA0Z
l+FipKqftM8dmNE5rj0o/RBtZ/S2abXnwaPy6GhHmwpkJ19T8VxTAZYj95bz
3laimqL/+8OO1cC4S9Ypj1ehbmvTVw1vhLOGQUeflLHwknmCdEp8PYw08z0F
ITW4/KLzfKZmIwwXj8dL9SCGGt8+ffALBzYFywkur3uF1rLay4bZbTDsa3Ao
55c6dGGM0WQ28MBfuvyQr3k9LiWE1fqp8cFK36Tbx+Q1ntHRrVId6oRIy/nw
WypsTG+eePE4XwBmtwdmc4fYuNHo87LclG4Y1D2mxKpuwDQbuZddTj1wo1LD
9l5YI/6p5f7M3aoXQidWJa6hNeHkErdeYNgPUTXGBcGLTUjLcre+OzkASt7d
aeuKmlH6r++lnD8OwnmmwYUIVw7aS33LjuENActrddKOeQ46ihKPkuZhsFoZ
X/2p4A1uIXlZ+TUjsPDd803Rv7ageO2BH9RzRyHuWZrKRF8LBjYksx7eeQcs
DdrO/out2Mb5PX0ycgwCMtSFL5XacEVX9VzhsfdAml/HlGS04eLuygvxTiLw
3Zt3NdykHQXSu0zlLMYh0sbSKKqmHQP0PZUrt30Ak5iNqns3cFHgoBryVm8C
DodVqJed4aJh1xHVfNmPMLYQtb2wkotmrM28m4sfoTF2lVvVIhf1F9LfGA5P
QgFpfZwEPBRbpdrtrP8E34TcjuJoHp4T6X4+XfUZtBkcl6kGHgbN6YwV2Inh
vEUGw3xFB8asvzT6U7MY7rtuZzHsOzBBMl8i3HIKAmsnakzpHRjqe83rStkU
uGc92U3jdqD17IHDmw2nQfCjXEy8Gh9lTTke+femIXjeZkbChY8FOZoLpeoz
8HS/SKc6g49b6Ft7Q+gzUJ1pv1VmkI/MrQpCBclZECXsGcxe24kyS3+fsIic
BdewK/bhvp3oGG6gvlM8C/KMJrOSgk5MDveSnfWag5kPcXNxI52YW+yXYCWc
A4Z16MN8A4IlcWbrj9tRsLq158Z6P4KK/VV13g4UcOrSl9H8CQbv2PWH1xEK
nnpYB7mdIGj+YU+2mzMFqa9S9t84SbDWwUHT0YOC9tH6iX+CCBKtAAU4RUFi
tYOUMIygREXOrGYqBThVfpZ+laC3vN5N9WsUsLXtXzGTCbJ9ioxXXaegynZO
qTGF4FX1stPKtyhQ6fUoXkojqHaRJZLJouCdXVFLwE2CRvtJ73QpBXkRSeP7
Mgmm3neNEJf/9+s7ZuiVRVD8Vbj60yMKttxx8ovIJvi0dNhlvJKC2H6foYr7
BGmqYu7ACwpWaLpz1hQSzDsZEtT3koKcUwclfy4iKMOmFIW1FCiutLNwLibI
CV06KHhNAf3Q9YJkBsHNvOhxfgMF8n387qISgnQj6SReEwX6zzcp1DEJTscm
6rdzKAj0zdzdV0rQuU+e3dJCgfZvesFfygj+C99qmaM=
            "]]},
          Annotation[#, "Charting`Private`Tag$33488#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVznk41AkYwPHJVaxjKUfsFmmRTldls71Toq0M5cHaHFm0JEWpsCJy52gq
1VOuMGhcpbQ00iuSzBKTZmjGMddPJDWu31OOdts/vs/n36+Rf5jrUTkKhUL7
1v+2mLMEd10ugqFdjH6QWyM6JdAEXlaJYPxuy+fs043I7RPy1XWToPGur2oV
vRFHk5byzwwlg18pZaKtsxE1ht36qSfSIbhXahi95wnWdESGhDrQIY5v2iey
aMKFWK0ghYCbMG141ECogOg0bbxFv7sY7tfEx7s6PsO2jMuavqtqwU5yeynn
7XPUVgt+d9C1AZi3uGs0xtrRqOvlF11/hNNmYYcfVrPxgk2KQmZyK0g6en15
EV249Lz7XJ5eO4jLx5Ll+d0YaXHj5P7PbNgQrsy7uIaDDkoGS8Rtr0AcaHqg
8JfX6MEcoSqu40CwQs2BQJteXEyJag7S7gV7E8v+AMs3eMrQqF5L9AZi7eai
r2tyMadj/MmDEh5Y3xieKRJxcb35pyVFmf0gNDqizmrgYbaj8tM+Nz5crdN1
uh3Vh3/qez/2th+AyPEVqauo/Tix2NPKMxuCuCYLRvhCP1LzvR1uTQyDun9/
9pqyt6jw1/fy7h+EcLbS9FyMJx+d5b8WJHBEwPJbmbZtjo+uo6mHuR1isF+e
3PCRIcBN3OL8kiYJzH/XuCH+1wGUrd73g06RFJIeZ2uODw5g6IsM1r2bBLB0
qduHzg/iK/bvOROxIxCSqyN4qj6Ey/oaZkuPvANux/OEitwhXNhZdy7ZbRQC
dxdfirYcRp7CDitl2zGIdbQzj2saxhATX426Le/BMmG91u51QuS5aEW8NR6H
g1G1OtWnhGjWd0irROkDjMzHbS2tE6I1ayPn2sIHaE9c4VW/IEST+Zx/zMQT
wOB2PUgDEcrss2jbWz/CV0HP6/J4EZ4ZNfp0sv4TGDDZHpMvRBg2azjCoMng
rG0u02aZGBPWXpD+1CGDO55bWUxnMabIlVCi7SYhtHm8yYouxsjAy37p1ZPg
nf9wJ7VHjA4z+w5uNJsC3o/KCcnaElSyYvuU3J6C8DnHaYqHBBmFevNVOtPw
aO+oYUOuBDfRNw9E0KehIc95s6JQgpWbVQWqcjMwmrJLWLBaioqLfx+zjZ0B
z6h05+hAKbpGm+psl82ACvOldQVDihnRfkozfrMw/T5pNkkixaLyoBR7wSww
HSLvlZgSWJFkvfYojYSVXfyra4MIVBuqb/F3IYHdkrOEGkxg+LYdf/gdIuGR
j0OY1zECbd7vKvByJyHrWebeq8cJbHZx0XP1IaFb2jr+bxiBXP0QVThBQmqD
i7wgikBKbeGMXhYJOFlzmn6JQH8V42s6l0loM3B+VplBYFtAmcWKKyTUO82q
t2cSeEmn+qTGdRI0B3zKF7MJ1D7PGlXMJ4GglXWGXCPQfC93YKqKhOKYtLE9
eQRm3fGMkdV8+w0cMfPLJ1D2RbDy430SNt10C4opIPBRldhjrI6ExKEAUe0d
Aqlasp7hJyQs0/NmryolsPh4RNjgUxIKT+yX+7mMQMU2Uk3QTILacpqtezmB
7MjF/bznJNAPXGFkMAncyIkf631Bgspgb39ZBYF0c4U0zksSTBo3qLZUEjiV
mGrSzSYhNDBv52AVge6DKm2dnSQY/GYc/rmawP8AV76ecw==
            "]]},
          Annotation[#, "Charting`Private`Tag$33535#1"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJzt2uk7VW/UB3BlKkIiJCpUUtFcVNwllBTJUFEhQ6iUoZIkaZJKA0lIKZQG
EamQbco8nHk+zsAxT4UUydNzPbv1e/X8B+eV61wbe+/7XvdaPpevzpGTe72n
SkhIxEpLSPzvV9mT5WPpdlEoc48wwcexCLuZqRd69uxNlGZfEzfaXYz93/X7
KLiYFRMhj2G1csEmsa0JSM+nibCnHMO/Pxl578zkP11bii3W8XfNkX6KbD56
Sm98W4r//DM05J4XQHIsxzqLNZMePUpH5GHyovh7Ffjvy0Sr07LznvtXYK/2
1zOiDLOQd/i2A85Slfjvf43CLdd0fGutwI4Pn1c/XvYWWRUhfYWQCvx+OShz
UnRNMrcCU9+h9vrV0lwk6X9P42R4JX7/96iBaOk0f3El9vNBwM4nIXnoWHZd
cX/4V/x58tGM8zYxDprVGKO1qiuu5ANKI5bbSomq8ecrQB6X4pSSXGqwz6vm
34ie9gnVZDsbOsfV4M/7Gd1ZxV9Cya3Gki6eXXJhbyEaamqfPTu7Gn/+IrTK
wjx+83ANdr6xuTowpRhd6XuZ5qpSi7/PF1Sp4vKyWLUWOzh3yVGf9hK03LtH
28q1Fn+/UoTVO28d2FOHpa7dctkwsRTJF/kqFOvV4+9bhlZxXnk/zqjH7rj2
kvS/lCFdQqLlN34d/v7lyFIUrqFbVItdjErU1RWWo51XB/1aW2vx9ahAyU4v
Whue1WGnsiyCtGQr0R7TxHaf9np8fSrRKoK0eW1xA+ZOGCxTW/4VFTrvuCJT
XI+v11e0WO9GNUW1HrMfTVFWtq9C1MUpXrNb6/H1q0IBDyovKcs3YlvnWXvI
n6lGn0rXG1SONOLrWYN+eDa/+MRrxFZbjuRIJ9eggrWePqLoRnx9a1HI/q+8
iqhGTPd4moREaS16dLNvn9zLRny969C3HcvT/eY2YbPidu8Za6tD1zseHC15
3ISvfz3KnSjf15bWhEkW/noyPL0BHUrtWkCkNuH70YByHdf6VF5pxob4GQP9
Ro2oJi70YNJMAr4/jUhr8l7mJSsC1ia7F3U5NKGwR4v1X8kR8P1qQktUbtBO
OhMwitGf2NbQZvRY99BGvioR3z8CGic3NXx0I2LCpU4D/bYEZPryuX7/QSK+
nwSU/XqGdswAAXM1W6Z+XEBAzK4bAQrZBHx/iei0eoJZ9N/rZPspqCuYiHY+
ed5mq0zE95uI7B9fU2SmEjEbb7qPjwwJzf5jnbKFTcT3n4Tiid4nUiaJWEXo
29jWRBIKU4z1Wb+dhNcDCW0sVUX3ZEnYpluXC9yXkdFKkn+tdQ0Rrw8yuk9Z
X+hZQMTynxxo4X4hI2LaE7+mUiJeLxS06uvwLreFJGx53goZ1z0UdCp9epdv
CAmvn7/Xn0tyrHJJWHqVtBFDSEHM2IFv15gkvJ6oyPgXJ+GAHBnTYrGdnE5T
kVou06ayl4TX19/rpsQND9kk7EFf7gWSLA1dEyzMGJ1KxuuNhjbQbrmHGpMx
hSnRGXZJNFThfowpcCfj9UdDm+UNJS9dIWNXVQ83NiynI/88tWnFL8h4PdJR
tLnXrOwRMjahv3bEGqOjhY3NyupTKHh9MtBdTkbNjwEydnqTnHa1PQMZUNEN
vSoyXq8M9JNwcJzGI2P9tnwLizYG2rvjzMYeYwpev0z0ZnCbknUmBfM5UnC8
7AwTyc3K3DAtlILXMxOFJrz7cTifjLWcvhVvNp2FPHJoT24aUPD6ZqGLbQGJ
qqupmPONI8VFySykmMuvpy6i4vXOQpG35OX02yhYc4pxm7ERGxX5JPey2BS8
/tloa0L5rdjNVGx7juKMglI26v3df33FMip+HjjoFn9yJEpEwbCKtjVrHDgo
c71CUf1WKn4+OGj3Mo5wOoGKbaAXuuaIOOiwYcyej+tp+HnhoklFM0cPVRr2
rvvuZcNQLspVMugfiabi54eLdmcvW/R2BxVb8sfn9Su5FjQj6/R2pUAqfp5a
kLqxg75UJhV7qmxK1n/cgoJ3z9KWXErDz1cLOjju+8uzhYZpLFIZT1/BQ5HL
wo+keNHx88ZDiqMsrdv9NOyucZeubjnvb32hyVluNPz88dGHkD/9aSE0TCrT
LcNuKR+9XWMysaebhp9HPlo9prPN3YWOlb7baRIbzEcj2cE5zw7Q8fPJR4fn
pCr//kTDLnxe19hQzEdPNPwZpq9p+Hnlo7GdBbXXzemYScUCD3kZASr+EtI2
fRUdP78CVGjbsP3yUzo20iA/Ym0nQGfiJ2WMrRn4eRagb8KZrEQVBpZL+xEd
nShAiftS6evz6fj5FqC97jyiciIdO8EXaFULBGhXng995jgdP+9CxNDy9O6R
YGAG3Q050suEyPbBpavjHXT8/AvRsoijtUPaDEw09NHCIkSI3OUc4nKOMvB+
IERyG3sK9+xnYGkTzxhRX4Roy/zvse5BDLw/CJHOi4dSZnJM7JBs7PEymVZ0
wbLdI24aE+8Xfz//0dL/qM/ANJXPSUjsaUXHHbQ3dJ1k4P2jFW1Rn1tHpDIw
mqZXvNmjVnTw0Oc+x1IG3k9akbyKtf99CgO7v9BuyQVhK0q+Z3nx3m0m3l/a
kIf9h9aEzUzM1mhjcdGyNpTX9Lb2wjAD7zdtSFBgnKtuz8TkjBftGQtpQ+5a
h3Xzghl4/2lDliqb1MfNGFjV1pltxiVt6LzskYOv3zPwftSGHONlPuYFM7Eo
m/GzZ2VF6P4L+4+9I0y8P4mQ+c7yhj8FTMzMqV2+YI8INUW2p24uYuL9SoSG
t9jOLPdiYWOHiU+GH4kQ4/KjiAtGLLx/iVCyac3V43VM7KNv8Zo1rSL0oc3M
techE+9n7WjcJOlXowQLCw56UR24vB1tvriEGHqMhfe3dmRI0MXWGbOwFeH3
XXNOt6NRiZDn151YeL9rR6HnvLTtzrGwnqsXBvpL2lH99nOxB7ez8P7Xjm53
plybX8XCXtzxvWw4rQMFOE69OTadjffDDjT8W8bvtQ4b83zkoH7c/u/nm+ou
78zYeH/sQMonNGqfM1jY/Odmr18ldSDzeeYyXm9ZeL/sQJTLhb/shSyM/cYA
dbV2oCrLP0f5uSy8f3aio5Ss3rw8FvawQJWsb9iJbBerRDZFsvF+2ona+HZq
zQ/ZmGPppI/PmU4UN66Y/rqahffXTiT7Sjoy+QAbm1nXPZaOdSJRmZTngnYO
3m87UdGplrvpfWysgUyNbZ3WhU7Nzk1QN2bj/bcLsW/nmbAesLFobqmu7t4u
JHQ0SLLpYOP9uAuZ3yFe/5bDxiw6Xhe4J3chCevvk/uH2Xh/7kI6q7udKD4c
TOJbws4nbV2If95xtvDv/f6vX3ej4lfzihI2cbDisUstXMNuFFZf7PnwAAfv
391ossp94tokGwuVOhGkdbYbTT+w7dWdWA7ez7uRVNK+kG7EwdYq7pdxLe1G
McXkxsEeNt7fu5FbuzItTJWDfVPflvRoeg9anSq9YlyOi/f7HmQvPKU+UMLF
3uoYGTH29qDBtWEzH7ty8f7fg3qd9z2Yb83F/JbNKVdL6UEhvuwS+WguPg96
0IfdGrv0TLnYonVSzk6iHrR8R1HnB4yLz4dedHqwN3ntTy4mMBvoijPqRWc/
3zTQec3F50Uv6r75Mzyxjos93sG6QDrbi1KmL9doj+Di86MXSU2pmYhp4GIH
9n5VVi7rReEqP1reBLXg86QXrVTua7a934LNPpiTYSfXh0yLKsyKhVx8vvSh
GXteayWdbcGI3skmsQ59SG3+l0IVbR4+b/rQhs2T7p8teFjsyWuNDSl96PhW
4wrfYh4+f/pQX2pgCXMHH9t5LtBDvr0P9QelVH8a5+HzqB+Nhwszuw/xMJnL
B0esV/Sj4acTTtN1+fh86kdHy1QOHbnPx8pvbb8RHdqPlh508Dpwno/Pq36U
/0Y5dNZFPhaRsFq7uqwfVUz2LXtqw8fnVz/6FcZy//33+san2rnS8gPoK6vt
8a19AnyeDaAJVW26Qb4A+5E1zdLCcQCV22rN0MoR4PNtAN0r7HVSthNg7/OG
GFGPB9Duk8wh3VgBPu8GUOd9jUpjGyEW8KXleFn7ANoQlzhbe6UQn3+DiB9l
QcjWE2APWr0kJDQG0T3FmddPTfDxeTiIJjunbp0yV4AF+7rsfLJ5EG1O1Ltx
faUAn4+DyN7gfeRgIR+z77OLN/MYRGiJ9h9RDh+fl4NIp938UZaqAFsRZNnC
vfr3unXfl4hNAnx+DiK7xF9+ETcFmMLoxiUXXg2i9IAZsVoOAnyeDqJUncwj
Kvf4WO/5lUFazYPofe36Id8RPj5fBxFneQrPXSDA6iQWFxcN/X3ekxw9x/VC
fN5+Q19UPl8N+ynA/nk2/rjG4UqJfPDsF7cytspQPnj2cetrz5vEXPDsS5kb
65xnvAPPvjkhOLQrKQs8K3cuLb9gaTZ4dtezLwMq3Pfg2Sk3rP5E7MsBz+rq
7lrTwHsLnu2ceneqCzMXPFupXrIw7mgBeDaSbB4UuSUfPOulHvLCUvAWPBuu
3VQ8T+ENeDZOU5WUJ/cUPKt+csXyK1F5/3mWGOLtuKsIPMsqe9r8uf4zeLb+
985y9sRn8Oz8N+vndbgWg2dXfZs4qOVSAp79Xm+8sKu0BDzb+dKzTkm+FDzb
4f3KObiwFDwb2TMQ/fFcKXj2p836xO5ODDxr/qvc86AdBp7tX6u/frlqKXjW
cWj+x0vNpeDZbw9tddIzysCz0cu5s/6UloFnFWZIoUfzy8GzqbtIPTnvy8Gz
ot1KBBvncvDsJqvw08EXysGzdcld/cZLKsCzEdaHR2aRy8GzEpFZx159rQDP
KoVLB++/UgmedTe/7cJ9XwmeVViY/nbTm0rw7KC7xNE4/lfwbND3dwGKSVXg
2dEneVVzQqvAswEDDo6Kb6rAs1cs9G5cLq4Cz04fwaQ3NlWBZ92mXHEqH6sC
z6YpOFUad1WDZ00y1h0tolaDZ+OO5x2Oq64CzzqNyqwsW10Dni2J+bk0fkkt
eJZGrFlkVVkDnu2sTw2yrKgBz1rs9oitVqkFz0ZG+t1nW9SBZ/0qsizv8urA
sz3XrH8Q8urBs7WeSV7JbQ3g2ROLlijdH6oDz66/NjemRasOPGunah5aO1oH
nu3I1A985VoPnj12xdP8QngDeDZ9zjddqymN4NmJ8CSd06cbwLNWEnJb3HPq
wbONauVrtNY2gmfX5cvMQ6WN4Nk5X+tTdQMawLMSO2VO5xTWg2fHqbTqHQkN
4NnAr+r54XubwLMP555wDiY3gWebOS9ytn9qAs8+OZZymP69CTx7NdExyzCo
GTy7IFMvPeVZM3h2b1DJMUFvM3j2WtCFNSMpzeDZ8cNRs3NozeDZs9cYs6dn
NINn5zgr7LiuTgDPxgUofzSIIoBna6xvG2x6RADP/gjTjHa52wyeTX1I0B5I
bgbPFgxEdN9pJ4Bnv8TOis8zIYBnZeI3SsvaN4NnN1cEnyfNIIBnGy7FhG4/
RwDPVs8cUlYeJ4BndYbiIhy2EMGzK9ar5Nj6EcGz+yoFSeE0AnhWNNgtyU0k
gGf7RxkjNFkieDaz/HSLymIieJbDvVZ8fgURPLs7Xi/4xQUiePbHbqNjtnOJ
4Fmq76LNXnJE8Oy+Zb4NfTFE8OzXeWcLTK1I4NkwssTn84lE8GxBr1TBIw0i
eFb6wJTQF01E8OxPU++lIk0SeLbct/1hlxEJPKubwk15Z08Cz874ccqhIYAE
nj3nUnkxJJEEnr26YrFIdg0ZPOskFxkWWUEGz7YO25iTjMjgWcHdAUXWGRJ4
9oHtaNJSdxJ41tlRwk757/3+edb/46+PX/1I4FnJXfZLl4eSwLM+WMysySoS
eFZpdr6N8yYyeHbTsOPeomgyePb7YtVCvytk8OxTV0OvdXlk8Cx5xubACi8y
eDYmy+fnV1syePbMsVXbbULI4Nl85267LUMk8Cz1U6R60wQJPLtaVaIxYYIM
nn18ppCv30EGz/KmJUYlZ5LBs3kbz4d0VZLBs9bdx+dnUMngWUu1YKuEm2Tw
rLREhVm2AQU8q6C7rsX1MQU8+5Dz4sb+vRTw7LT3Wielxijg2SkWMYfcayjg
2QNmIraZFwU8exlLObL7NgU8m7x+9yCRQwHPWviwLMI1qeBZLdKAaU06BTy7
9cQJ/1A1Cnj27sqGY+ZXKeBZDXrRwuFSCnj2QV/HYTsCBTx7iPwm8WQ9BTxr
vSliPz+FAp7VP2KSEPX3+j/PJmqXjrVupoJnd1Tvcbl4jAqeXRYx8vH+KAU8
q1e802rGMwp4Ntu5aNseKyp4NkdJunPqYSp4tuyyh+rtjVTwLGFRzGOj+1Tw
7Le35Tcjx6ng2azBBIHWdyp4VqJ2QkK3hQqeXcKL8G8qo4JnLZV0ltKUaeDZ
wYzSH/U2NPCs9swzqvvW0sCzJdv8SYfyqODZ6QUH10RsooJno3ovl8tmUMGz
XucP75eeTgPPjlbLmgU/ooFnj/aneo5N0MCzEwKjMK1XNPBsqy6Duf0SDTyb
3FNIKztHA8825HNvvbxJA89uLtr3dLiRBp5dscrFKmeABp69sCpH+nwUDTzr
XxkYbneCBp71orzwsrajgWf9/kiolhpSwbNzfuqd1rxFBc9axRv5Cepp4Fks
s39SWZ4Onl3rWzh1FkYDz1q/iwnrOU8Dz25c8o69ZjcNPOti+P7l5ts08OyZ
/f19R27SwbNLzniOtmfTwbODDw2t+Qp08OyXdRTN3NU08KzO4Zid96qp4Nlv
vw+eFJTQwLOvbxctur2fDp5d2oAMs87QwbP96TX7Ci3o4NngKIWROmM6eDZR
J3ADNZYOnhWpFM9ZSqaDZ93KrgscVjPAs7+9HQxL9zPAs48nA7XenqKDZwOy
j7t5IDp4VkXfLNc7gw6e9fQzHfLbTAfPBr3a9bP7Mh0825sTknfAkAGeZcpL
/l6pzADPen18es//Jx08q6OfPsT9xADPOhKZjNdVTPCs5OXp9wufscCz6msK
Rm1kWeDZBoL0ltyVLPBs9U979mcJNnh2fOrVKN0uFnj2IE/hdPVxJnj2VuOf
jXrdjP88e+TLvZN1TPCsQYJ+03kJFni2f/mqe1o/GODZw895LeZsBnhWj3K+
kOjBBM8Or3rd/cOBCZ6VPp/f0nSECZ4NUj3bFP/3ff951kFKetHHo0zw7PMc
wfR3X5jgWc+oryVRxSzw7O1plsXrHrDBs3SP67v6s9ngWVdN2lEpxzLwbFla
R8aJwHLwbHqdFPOTbhV49tzC49s2TVaDZ91MKFnZU+vAsw4znxyqaq4Fz5YM
XhdpbqoHz+pnXGnwHW0Cz3JMYlwcDzWDZx1HzXIn5zaDZ1Uvym7WjG8AzzbM
ODybVd0Ang3+1f/8Q1czeNYhc3RL/RgBPHvOVpJds5AEnk0nleTuTiGAZ+us
+k+ZbSeAZ5elsVizg4jg2RXlEvP12ETwbKlkrffBcCJ41vzDU+Xdcwng2f4N
uY8+jDeDZ4tPznyX308Az94tdPihU0AAz0rPE7by6QTwrCGJe1begwieDVDw
WaJxgQSejVvg9D1jDhk8e02oGcMxJYNnl175tna+Igk8O8VOUek5iwCeNb8Y
UKdGIYBnd64oORFiTQTPHkq4+2dLEQk8q/p2+3WlCDJ4lhpNntGtTwLPev9h
7rJ5Tfzv/7M+1UZbJEjgWR/61h2iGhJ49tr8wfNOKWTw7KD9BCHpBhk8ayrV
+j7579+T/zxr6nbiZfE6Eng2tSguZOIYCTy7yX5q2JGvJPCshaXU83BEBs8u
l2x1rN5IBs++faz/4+R+MnhW0DhdasldMnh22NFZet96Cni2f3vdYxMDKnjW
+qN1wdA4GTw7yH/w8IEGBTxrx6F6PP7bz/95dqq5Lb/hEA08S89Si/65ggae
nf+w7VRmMQU8++ebWeHeXjJ49uwx2alLpCng2ewZY2p7csjg2V79c7O7Kqjg
WSWTa0PKL2ngWYlHr+Y5XqaBZy9bR8c/5NPAs6hklNNKoIJn76gfujSoRAXP
vvB/2jpjNRU8G7ltY97xLCp49lfEtMicbCp4tqZfadv7aTTwLM0zzTd8GR08
+/6na9YHKh08G3i9qTa2lg6eDb74wnRnDg08m9F7rDLk7/z959l0ykhgfRbt
P8+eqVe+OkoDz247vbzlzTQ6eNZ/2478vA108OxbQ1sX2QN08Gxt/fSbAi0G
eLbOv0WDpsYAz7aedpPxU2CAZzc5BtVhIXTwrNual+iKKR08y7Vys0lm0MGz
3OdhLK8rTPDsDoYnX0OXCZ7dYMqfahRFA8/KkJJee85hgGfHIrZkZxSxwLO8
1N1aTDMWeHbtw1vJMnZM8Oy74m3V6cUM8OwRk29JtcZM8GxWRZ3bzD4GeLbs
t7b9jWEGeNYvfEVQYTcTPPv6MK95cyILPDs7MbXcZTsbPKu3ZaTH6hcLPKt+
08jPIp4Jns1UNODJn2GCZ827vu4tpDPBsywLsyjNMiZ4dn7428s1CizwrKke
0WTXQg54dqf/kOKTHC54Vu1BflmQIgc8+4k3h7LlOQs8+zJSzcqlkAWeNa6P
P/Q9ig2ePfCHtHrYkgOePSWpJyBocsCzGyTVzAb/rvc/z3Yudlw/fp8JnlVJ
W2Bv6swGzyZ0//ps0sMGz/Jt04bZfA54NoHyp+TwwhbwbKjikt/HvnDBs4ae
PVe2DnLAs2ZT1t5b6McBz8bYz/GsL+SAZ89YBobOPccBz76VHNhz24YDni14
mmb0PpoDnh2Q9f/w2J8Lnr1Zd/IC24MLnpUjv6edPsUFz94dtfi8SYcHnl1E
snmzX4UHnq3tNLlEt+eAZzeujLz96icHPPt0UaryNOkW8KxM5KhPaREXPNu0
adGHi2QueHZohsanW3d44Nkvz15EX7RrAc8eOL/4wxMbLnh2+b1aBu3v9X+e
/XTtCdWjjw2evSnsITz4wAbPphBaOOpTuODZxX6n5DVdWsCz1zScI2SVeODZ
LUavHC85tIBnL63gTuYQW8CzjjHq7KsH+OBZHbrPvU90Hnh2bjqlvY3cAp6l
sh/su+7WAp599PS6y/L1PPDsQ4+u9GnafPCssdmMzs50HnjWoU1/17IAHng2
a1kof951Hnj2hPKE1+KHPPBsWMxZzzmn+eBZ9ayFfiQfPnhW67TUSFYQHzyr
Utfe7JvGB8/quziE3VLig2fvxJZFbnfjgWcn1VqUr5N44Nm75X+aUq/ywLNZ
tZSARxk88Oyb1KnHWs/ywbN9twc0uwL54NlpHS/WSLjywLNLowkJvRf54FmB
j7O1xw4heDYsLOXdgrkC8GwJ/VJ3/Bo+eFaQ9S5pgTUfPPuOe8DX1pcPnt02
r3BnqysfPHtng4zKhzw+eNah+Jb/kIEAPBuWJmpSeMkHz85r/O6fQuGDZ4Xv
72zBBHzwLMqODrMu4YNnKWfkejv2CcCzxHeS5ZYaAvCssym5YqaTADy7t/ti
8glbAXhWyTEgTC5DAJ4dij2n7mMiBM/SJbSVVH8LwLPbJ5UZBvJC8OwBiiQx
0EMInp22ARu98kMAnh2cWxkoNSYAzx5Zt2lB2QIheDayb1hq1UIheFYhMHYA
5QrBs7dY7UHayULw7O2oOVaaJ4Tg2Re7NHb5VAnBs5rLdpuM0YTg2Rpf3iy3
LULwLDF24bO1bCF4dles1Pwsp1bwrMVqHceFrq3g2WL3EJLZ81bwLCfGxMfB
uw08Oz/Y0+TItjbwbMWi5aMmJa3gWTejg2S3wDbw7Pym6NI710Tg2Tmekbu+
rBWBZ4ck/NRCO9rAsynnWMwXsW3g2W1JbaEVkiLw7O+00a2v9raDZ+23NpZN
XGn/z7OcNc0sxXbw7EPXP+/Ck0Tg2fU/3m3vk2wHzx43iE5SVesAzw6k93e9
7GkHz85Wm9r+664IPHuo4Omp5qsi8OzFBfqf6/aIwLOe3muWEd1F4FmD4vpP
pLE28GxzRN2tpcNt4NnVwu1O/qEi8Oy1X1dkpjaKwLNaQ4leD7zbwbOKDtz8
/nIReHZWWe1qm4A28OysonCPMXkRePZ6ItUt0qsdPPvJNcFP4Vk7ePbOGSPR
hTntmDhvLM4bi/PG4ryxOG8szhuL88bivLE4byzOG4vzxuK8sThvLM4bi/PG
4ryxOG8szhuL88bivLE4byzOG4vzxuK8sThvLM4bi/PG4ryxOG8szhuL88bi
vLE4byzOG4vzxuK8sThvLM4bi/PG4ryxOG8szhuL88bivPH/lzf+H0a+o1I=

         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1VOUGAYQBdDdjW1zY9u2ubGTjbmxbdu2bdusmbRJG7RJG9s3Jx935vd9
vDkTHBoW0i0oICAgkN+M37nODf7gT25yi7/4m9vc4S73+Id/uc8D/uN/HvKI
xzzhKc94zgte8orXvOEt73jPBz7y6UswAQMJIhzhiUBEIhGZKEQlGtGJQUxi
EZs4xCUe8UlAQhKRmCQkJRnJSUFKUpGaYNKQlnSkJwMZyURmspCVbGQnBznJ
RW7ykJd85KcABSlEYYpQlGIUpwQlKUVpylCWcpSnAhWpRGWqUJVqVKcGNalF
bUKoQ13qUZ8GNKQRjWlCU5rRnBa0pBWhtKYNbWlHezrQkU50pgtd+VKsMLrT
g570ojd96Es/+jOAgQxiMEMYyjCGM4KRjGI0YxjLOMYzgYlMYjJTmMo0pjOD
mcxiNnOYyzzms4CFLGIxS1jKMpazgpWsYjVrWMs61rOBjWxiM1vYyja2s4Od
7GI3e9jLPvZzgIMc4jBHOMoxjnOCk5ziNGc4y7mgr3f7K7/wMz/xIz/wPd/x
Ld9wjatc4TKXuMgFznOOs5zhNKc4yQmOc4yjHOEwhzjIAfazj73sYTe72MkO
trONrWxhM5vYyAbWs461rGE1q1jJCpazjKUsYTGLWMgC5jOPucxhNrOYyQym
M42pTGEyk5jIBMYzjrGMYTSjGMkIhjOMoQxhMIMYyAD604++9KE3vehJD7oT
Rje60oXOdKIjHWhPO9rShtaE0oqWtKA5zWhKExrTiIY0oD71qEsdQqhNLWpS
g+pUoypVqEwlKlKB8pSjLGUoTSlKUoLiFKMoRShMIQpSgPzkIy95yE0ucpKD
7GQjK1nITCYykoH0pCMtaQgmNalISQqSk4ykJCExiUhIAuITj7jEITaxiEkM
ohONqEQhMpGISATCE44gAgO/PslP1kc+8J53vOUNr3nFS17wnGc85QmPecRD
PgPZM+Oy
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 
             136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 
             149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 
             162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 
             175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 
             188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 
             201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 
             214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 
             227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0lNjFgAAQNFv2bbXsm23tZZbdi1z2dzCsm3btm3jP2S708N5vU83OCo6
clBQIBB4zRve8o73fOAjn/jMF77yje/84Ce/+M0f/hIQDCIe8UlAQhKRmCQk
JRnJSUFKUpGaNKQlHenJQEYykZksZCUb2clBTnKRmzwEk5cQ8pGfAhSkEIUp
QlGKUZwSlKQUpSlDWcpRngpUpBKVqUJVqlGdGtSkFrWpQ11CCaMe4dQnggY0
pBGNaUJTmtGcSFrQkla0pg1taUd7OtCRTnSmC13pRhTd6UFPetGbPvSlH/0Z
wED+jxDNYIYwlGEMZwQjGcVoxjCWcYxnAhOZxGSmEEMsU5nGdGYQx0xmMZs5
zGUe81nAQhaxmCUsZRnLWcFKVrGaNaxlHevZwEY2sZktbGUb29nBTnaxmz3s
ZR/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGbO9zl
Hvd5wEMe8ZgnPOUZz3nBS17xDwZKchA=
             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwVzlN7kAEAQOFvy7a5bNvLxrJrWVu2l23btu1+RDaX7beL93nO5QmLjI6I
CgmCIJZb4jZ3uMs97vOAhzziMU94yjOe84KXvOI1sbzhLe94zwc+8onPfOEr
3/jOD37yi9/84e//sdAgCCGUOMQlHvFJQEISkZgkJCUZyUlBSlKRmjSkJR3p
yUBGMpGZLGQlG9nJQU7CyEVu8pCXfOSnAAUpRGGKUJRiFKcEJSlFacpQlnKU
pwIVqURlqlCValSnBuHUpBa1qUNd6lGfBjSkEY1pQlOa0ZwWRNCSVrSmDW1p
R3s60JFOdKYLXelGdyLpQU960Zs+9KUf/RnAQAYRRTSDGcJQhjGcEYxkFKMZ
w1jGMZ4JTGQSk5nCVGKYxnRmMJNZzGYOc5nHfBawkEUsZglLWcZyVrCSVaxm
DWtZx3o2sJFNbGYLW9nGdnawk13sZg972cd+DnCQQxzmCEc5xnFOcJJTnOYM
ZznHeS5wkUtc5gpXucZ1bnCTfyTRdFM=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-1.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{43.999999999999986`, 5.000000000000057}, {
       23.00000000000003, 3.999999999999986}},
      LabelStyle->Directive[Bold, 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.806497439946908*^9, 3.8064974616588507`*^9}, {
   3.806499250502756*^9, 3.8064992862701187`*^9}, 3.806500679551652*^9, {
   3.806501009226698*^9, 3.806501041262042*^9}, 3.806563157256562*^9, 
   3.8065631955980434`*^9, 3.8065632889715967`*^9, 3.806563319445115*^9, 
   3.8065633554029703`*^9, 3.806563466984619*^9, 3.806563590097687*^9, 
   3.8065638336863756`*^9, 3.8065638786222243`*^9, 3.80656394668324*^9, 
   3.806564087490744*^9, 3.806564137368206*^9, 3.8065642821363115`*^9, {
   3.8065644171635046`*^9, 3.8065644470705376`*^9}, 3.806564962074894*^9, 
   3.8065650072251697`*^9, 3.8065654227881327`*^9, 3.8065655776390233`*^9, 
   3.8065656259947286`*^9, 3.806565811161101*^9, 3.8065658491505475`*^9, {
   3.806565899604643*^9, 3.8065659339518013`*^9}, 3.8065659716978755`*^9, {
   3.806566140659077*^9, 3.806566158216154*^9}, {3.806566189112535*^9, 
   3.8065662160090446`*^9}, 3.806566262889699*^9, {3.8065663308679304`*^9, 
   3.8065663514040203`*^9}, {3.8065664985226545`*^9, 3.806566513850643*^9}, {
   3.806566563748225*^9, 3.8065665729646044`*^9}, {3.806566731011936*^9, 
   3.806566735016223*^9}, 3.806566804294233*^9, 3.8065668380020986`*^9, {
   3.806566869662449*^9, 3.806566895931183*^9}, 3.8065670042601748`*^9, 
   3.8065670842643642`*^9, {3.806649542941402*^9, 3.8066495688685603`*^9}, 
   3.806915386828247*^9, 3.818431094095024*^9, 3.8184315556680484`*^9, 
   3.818431606147826*^9, {3.8184319714243526`*^9, 3.8184319904422674`*^9}, 
   3.8184323543045616`*^9, 3.8184324606423335`*^9, {3.8184324985885887`*^9, 
   3.8184325213941817`*^9}, 3.8184325579436507`*^9, 3.8184326652369986`*^9, 
   3.8184327139511833`*^9, 3.8184327624436197`*^9, 3.8184328115222034`*^9, {
   3.8184328467012773`*^9, 3.8184328710772047`*^9}, 3.818432902092268*^9, 
   3.818432965420371*^9, 3.818490896248736*^9, 3.818674489436151*^9, {
   3.8194553576212244`*^9, 3.8194553704301944`*^9}, 3.819793882545122*^9, 
   3.8197940144182644`*^9, 3.819798989174862*^9},
 CellLabel->
  "Out[795]=",ExpressionUUID->"ab73f5ae-51e9-4136-8ec9-1fb9732fa90d"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwV0ns01GkYB3BUZBVjULSILtNtq6OsS2Xex7C6GJ1RrWyaknaPtValxr2T
dhFJxLoMoxq/ZvImykbUZLuRSzTatMK0rEWX7WfeJkOZpP354z3P+fzxfM9z
nud1DDm47QcDPT09P+ZN1axsjoeeVASuAtOEQ240ehy+cLrhFRH8w2ObTVtH
I7aPQ6tJnQjErMCR3PU0ytXZfDe3SwQbJ1QVNVwaiffPjlrFioKHnxxGNN40
or7Wlu8+HgVlneb6m/xpdL37nu3N4Gho7g92FYXRSOUonIh0jIXJgMwv/i6g
0Sfdg6pgdQLsOHHMx0lLI9c/Cum/4hNhvFW5kO05jNY1/JtdF/8LPHDJkJ9P
HkbeyuxLbcIkaExdb2zZOIx6+GP6UocUWNK5SCOeGEYqcqTTyTgVQn5t2uPn
pEbCAruynldpYC2u1GzZq0Y/Vx297YPTgXq7pqw4RY1ejGi3Rp7OAA/zvl3X
y9SIxgsc9m7LhPRWw87CFjVyd+J+cDI6A0E1WQ/vDqrRGmnMOYsPZ8C0SJBq
8VmNIltMhjq7skGzxXm+vhVBL5LLw+LacuD9N7c7XJYTJOENRJTe+g32WPZa
KTYQlK8QsWuLcmFFVY/fEj5BTQ3sUXlGHnTnzM61DiKIe9IkNvpAPmjMV6ak
hxL0po/lztlfAIZJy8OyjxDU5VYet2+7GPz9l0vNjhFkwqd2HVtbCDkdAsmj
EwSJNLK4eE4RbOy4cNgri6CF/gbugcYSaPz+GdmaTxC7ajTm3ksJ5FY4P04s
Jsi1dFRr3F0Mj1b0NidSBFHfCtjOirNw2aVjbWIpQV75tREeV87BZ8mY745y
ghZ1V296cvY8HP1o8/JUJUGccMMQGVcK7W7CWLNqgp5eu8Ftr5VC3WaPpOha
guQ7xW/+W1oCG7V2b3wVBBV84gW2FZRA0Hh/ZksdQTJ6ZL8di4IhF6Jae4fp
d3uC9h6noLf2+TuXewTZK2sULB0FnoFF3svqCTp1t3lGVfgFGFvqtLq5gSCb
ajnrS9UFiOnZd8e5kaD7b9MU77bLwHL+Zk1eE0GZ6YXOtxpkoCSD9nXNzH4i
Kv1GuHLor/8Y29VCUIJ/DkdTIwe/rJN5jx8y8+aUtPdxLkKAxQu/860Evbat
ncuVXoSUCr3Q0DaCBNN1q0+bl8LlMJOZpo+Ye9BGM6njpRD/2jReyjjB3jaR
M14KXvzWA6uUBHlWCBslYRiqOkevyBjv+tWLzg7H0JxsR11kfHjnMnZaBAZR
sH8uZkzpjwpFkRjqjvZFlTM2CMgY5cdhSPWkVlYzvj+pWDSZhuGSwbJD9Yx5
AuukYIwhbijUu38qf/EkDijDMK3yvc3AVL5uQMkvx6CwpdSDU/myq/PcKzFQ
xZvyXk3lj/tcM7+BQRf26hlhXF8S1X+/CcPvi5+umWT8PDrI6GYLhhsOPN1n
xlpfz5VXWzHYyf+8q9/O/IexWXGSdgwxEwG+Mxgnb5GxRM8wGN8yDJjFuHh+
ustP3RisujLmmDKu1h7cHazCMKvXtdOM8eC59Zjfh0EsmNxmwXjiiKOS149B
kjOPZcXYcrOR1m0AQ8iPwrY5jL+yH7ZZPYRhwYamVGvG3iNP0OKXGFQxgbx5
jP8HL8J7ZQ==
            "]]},
          Annotation[#, "Charting`Private`Tag$33671#1"]& ], 
         TagBox[
          {GrayLevel[0.5], Thickness[0.003], Opacity[1.], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQ3T9RzZZhQYkDAxh8sN9686DMzoQyOP+2YuyfQsUK
OP/vr6ObE95Vw/nme2e+uVpVD+dbHXk0cU9VI5zvcm7iyjOxzXD+LZ9vjAsU
WhHmvy++ZsjZDufHTpdddetFB5yfs7lmn9uKLjj/2ecvfoW9PXD+mxVKCvFB
fXC+paHdD0P2CXC+0YLyecI/EPzCk9xPr92YiDCvZU1m5ZlJcP5sp8e5y3dP
hvOn7SoR2j5rCpx//IjQ16U9U+F8u07uirK8aXD+6/sClmrJ0+H8GxZrKhOD
Z8D53D6LouqMZ8L5JR+XVFapzYLzlQOZLCM4Z8P5Qpu/lh98juCbL//6hfPm
HDh/UWiAkMmuuXC+87Ttubbr5sH5Kje3eFyaOx/OV8tmS1pitwDOv7Jph935
7Qj+0vAZr19pLITzp/91ijgzHcFf8uZzsqzAIoR+i0v28Q0Ivty5bbsEfiH4
3QdOsG7OXgznS25ZKiB9G8E/9KFj16fgJXB+X9dMk91HEPyS3A2+n+2WwvnV
gZPUPm5D8JdOWnj+vtoyOP+lzHZxuwUIfgDLL/1eweWI+HjDzrGoAcGvlpOp
V/uJ4DuujT02O3MFnO8UINGcsALBd/l8yV71OYIPAEmLDCY=
            "]]},
          Annotation[#, "Charting`Private`Tag$33671#2"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJztmvk7Vlv7wDUJZSgkkiTiGKIQRblLKjnUcVBCSZTEQZmHknn2mKcHjyGc
Uzp1ogwpokEIpShDjiZTpmRo/K73fdd9zv/wvR6/uD7XfvZe69732nutz173
WhtnY7v5HBwcsYs4OP7z/79/LDeo0dzo5qI5ovNfBnfgPud5SOEXyn3u8GlA
/N0iM8oBHtBXLfZ+hw9lSU94N/n9+RUPyjWe4Db/c3AasrUXJPx+PaibRZnD
G/R6xXWG0ymzvEFTvMi/Xgvb94Ge34qPG+zA9n2g9Z3KwsoobN8XJBtMH56p
wPb9QBmcCprxeI0f+D47Jq16HNv3h/IRSTG/AGz/HMw1u2WW1WL756DBv112
QwO2fx7m9lV5iJZj++ehxTvsXVwMHg+ARRrxfhkYDyMALO1ahW69xt8HgDRv
pnPWMGWVC1ATqml8pwv7fwFCEm2sPi788D9uvQCDGotdlL5jPIGQGCgt4PeW
sksgtDzxzqvjo7+vCQTTr+OTLnsoCwSBwHfOtC4RytZBYGIQKfp8AeWrQSDS
EzU+fIAyRzA8i9vl9Icn5QPB4F20/puXJWVWMGxjqJaW6lMeD4Y+mS0BTD3K
EAK9V276lZyhzAiBjXsTpZxOUe4Lgdc7KySaT1BWCYVKofJIoXjKAaGQdmi8
kt8W4w8FY3u/zhA/ypJh8DYrqKHuL8ouYdC46Se9NjeMPwzGVJkRGtieQDh4
30jLWJ6L8YdD8KvXVZfiMP5wUDMPPh6TivFHgGS4fkF+FcYfARqNd1z3t2D8
EZCpybyqW4PxRwDn3MddPxdj/JEgu3tD8Uc8nxEJPbxLdBTeY/yRwLjSlGzb
iPFHQZhF0CB/LcYfBYpjZ8YK2zH+KHAejddWv4fxRwOXxYZH4hyjNP5oCL9c
p6O9inJNNDjdWi+8bxrjjwGpixJfO4Yw/hj4a1B1iEOU/v5qDHStiNvsykeZ
IxY+DT/sdBrG+GOhKIT/VRY3Pc6KhQ0aq4FzC+XxWJi9c7518RHKEAcfBa2d
5X+jzIgD49isVtODlPvi4KRMmPEifcorGSDWvvy8/m48nwF/Xp7caXOCsj0D
IpR1dCNN8XoMmF/7TpnLiXI5AxoVWl6E++H1GdCWUW618zRlrnjw0tVKE7pA
WSUetvosr9XH8w/Fg+DJChteG8oB8XDqrs0B3kzKxfHgej/BbkUp5dZ40Jgw
bD3RRHk2HlZOKxk876YsmQCH1tR1bX9KeW8C8F9f+ja0HfOVAOevye4TraOc
lgDHrl0KrBrH/CWA8upds5qrxv7HAwnwY69NapUIZYFEWHE1r+agBmXNRKj+
/Uds4grK1omwTUe2zoyfcngi6BuNG13ZQ/lqIog7a7wtN6bcmQhlEZ/aDDdQ
5kgCgwOXFT0WU5ZLgjST4uFxKcoHkqD8aIHtzBbKXkkws51L9sw+yqwkuFUR
KjjhSPlhEviknhuPy6M8ngRPtU1Pxf9JeWUyFEsk+M/gcUiG8A86pz6kULZP
hqrSdZu8rlNmJMOEnmHr01LK5cnwm6ghp+ZVyn3JoDT+NjE9mTJXCpibxxQ/
LKaskgKRN6R51r+gfCgFHETX/FY6RTkgBb5eXGBu+JhycQqI3On0TfSj3JoC
OZfOzpMKpTybAnaSK+Ucr1GWTAWvvnUBRtGU96bC527mUvkzlF1S4WqFU99c
F+W0VCh0KAnunKVckwpWB41/f/kR858KPDZRPTNLxmn+0+DouNCx1Uspa6bB
u9TqpUEjmP80KD2uftC/EfOfBh9ERxhcTZj/NGh8d6xC9gHmPw3KHYaPb/wL
858OzOJHYYP3MP/p0O71XtCkB/OfDrU9lY/iuzH/6VBYNib9qh7znw5nF5c5
v5/G/KdD+qAH38g62t/xdBgOctePXkx5ZQac2jFWPbiAMmQA9619J05ifPYZ
sDakT6KQizIjAyzsR/78NIH5zwDhhkjRJ9h+XwZkyliOpFVh/jPB5OG6CjU8
rpIJ/Vv6xSJvYP4zoUKLew1zIb1+QCaMvmAxXcQpF2dCJJey6eMPmP9MEAuv
VlyJ42c2E5Ycmdi6AVmSCXvP3NdUQN7LhFBXEYsYzI8LE2qfuOb3YXtpTIiJ
OcO/QIRyDRNWTJmdmBGkPMCEN7fvGk7wYv6zICL7U2U1H+Y/C4xCfAJK8P5Y
Z8FkUl4LDyfl8Czo51Nf9u0L5j8LTgnq+zXi/evMgg9MmyEdvD8c2TBz0mfg
Bo5nuWz4UsCx6tdAzH82PIywfS+J48krG+5dS1JdK0zbY2XD/s+CgU3zKT/M
htJM/pGfcTyPZ8PAj28v53A8r8wBM2PXdgkBzH8OtE1wvDo0js9/DtzddXF3
B44XRg64V+z1sMH4y3NAcTfPgmRsry8HdD0GStxf0/MXsuBjvuCfX+dheyww
9PqxVBnHmyIL9jzR/hCC9wtYIKlYvi5tGWUTFrhtTv9iPYf9Ib/32z3Tgdfz
Y0HW5uzsccwXgwUNrTNFm7F/BSx4q6tsOI3vk3IWCCpyzjEwH00saPRp/2Nw
C/afBZ8GLQ4M/UR5igUa2vVx29dT5sqFq4ucS02lKIvngtiq1I1lyCq5UClT
fn8BjoddudB0eV/sVC+O91zg0xU39ML+OuZCd5CFR4o6jv9cOHOTqSHFTTkp
F9akhPbN4fgszoXTV15NG/5C+VYuhAlu0sg1pNyaC6uK6yc8tCm/yQUd6+yf
M4Qoz+bC6iMR6TmTtD9L82BF8DbYupwel8yDPziXvTyI91ctD/pXtLVE9OPz
lAfcendGhfnpccs8sDDqyWRgey55ELLI4LgK3s/gPHBb35WZMIDv2zxw7vTd
8Q3fT5fz4EhgvKcdtl+TB042R/bP4v1rzwMfVWFrOWV8HvOg69mPJ34KlL/m
gUF9u6gojk+BfJh/Sq5ZW5eydD48bCjdJIOsmQ+S3JXlEdi/n/Ph3vPoW4N4
P63zISHIeGJoA2W3fEgScIrcif0JzweF/l3bOZi0/8x86LTduVc4Hp/vfJjH
PfU0AdcP9fnwl+OJmwa8+Lznw8LO3kBtBuWRfHAJUOGbVaHX5yiApsbEXRWb
KQsVwIMVZ76dkqUsVwAuK3VM1xynrF0AJ95bdVzMpnygACYbjQYL7lC2LYBB
kyI7bqDsVQDKS0b+GMH5LroAKhyKywIxf6wCCKm+mJm4n3JpAUyJikUomeP7
pADO50gLa2F/uwvg26SvK3MNzi8FMN9qSoYTjy+8CCfD4wLd8P4Sn5Uwy6+r
foTrdXcY5L9ZqFOI63N3WG5e9FsDrveJz57u5dVTPo/rO08A7+fTf/vies0T
Ulx4R84IUyY+K7Ng9tLrdbie9oZLEaq3nAxx/ewNRsxlXeqfsX0fiFilIPZo
Ftv3gWvOSxkqP7B9X9iU7dfSsh7b9wMbizerrf5Z7/tBZd92h8kRXN/7g8vw
5ayfvbH9c6CvtmB5Eq5Hic9ueJ838lsSrrfPg8sv6/2e43qb+OyE5/5mQwE8
HgCzasr297B94rPFca9SLmD8xGcFp5887jTD9fUFWCCfWXdoJ66nL0BK7d0A
I2dcP1+Asy/XX/5qj/EEwq/bzy+RPoPr40CQVrK1E7uE8QVC4dXzTPEaysRn
449djZ6zwvsdBAanPbb3aqHPBMGvbw419NZj/MEQuM7S32w5zl/BoGtlZrLu
Ed6PYCj9GCWTgX5AfFbTz0rCrRjjD4HfYsNebRbG9WcInDmbVfYY18fEZ7mz
B+vEJzD+ULBzjN9Yic8b8VndLc7fYyow/lA4/DtPYX0vxh8GZe0c4sO4fic+
Oy0k4iM+jPGHgUlRXEXTQlz/h0OteoAvkw/Xe+FwrGjIYu8Mxh8OqnsUc7s/
Y/wR0JHBss/ciPFHwOD8mqim/bheiwBBgR/c/rtwfo6ABivJG2/VcT0eCWse
q+2PR98gPjs01M6pdgTjj4S+8sun3ZCJz6ZUbVcoQyY++2e6g22fPa6fokD3
QrevhyWul6IhUD2IWYDrD+KzodcOL33ehuvhaKjTkzrW5oDxx4CWTO3XSlzf
E5/1Ul2ssPU9vv9iIObGA0W7ClzPxEKIYXx1816MPxZ01ILTw09j/LGgZSmR
V1SL8cfCs00nH0n0Yfxx4LrMz3Y/rteJz+4xsM7ZnYrxx4HHTmP5Vhb6DAN6
ZLVvFTTj+QyIkRPSqJ7B9QMDjkuyXuTfx+sxwOeHj4PiI1wfMKDLdV591iBe
nwGWrgur5nC9RnyWt2xd1O5FON/HQ58ER+op9Bfis5KLJXvteXA+j4c/5tXv
8Mf5jfjshg2LPjngfEV8lkPqtkObKM7P8aBV5A718jgfJ0CJVsoFHjnKxGet
kiW++ErjfJsAnrGJ5+ZwPic+q11zyYxbE+fTBLjR71Zs9zvOnwnwekMyb5IF
zpeJoDLJFeGG8wPx2V+MP6saHMH5MBEKJ0pWyxvj/JcIm29O8Lc4USY+W72b
a1jiGGXis7ceLn8zgfMJ8dnjaZZLbm7F+SsJYoZiopTw+sRnGTNHf3zG84nP
Gjs1Wt4zxfkiCZbf03XRP4nzTxLwz0yvXV2E800S1IbPiK4vw/VlMtyPnnrU
chHXk8nQHR62K/4K+kwyJJx9/l27HteLyWBwO2CLZCmuZ5Nh3q2XoiL3cT1I
fHi5XiTHMK7/UmALj6nMOjyf+Oy11602WtcpE5+t2a2a0foS858CL3Kbd357
gPlPgdnSU/Z88Zj/FHgmOPirWhTmnxy3to+JuoH5T4UHyx/BlmbMfyrIrCrr
E8vF/KeC6HDVc4M29JlUMP2WqXDoM+Y/FfQTDRlrv2D+UwGYFfleAhM0/2nQ
IiOopSlMmfisaJzR4Kp+zH8aSKjJnOjF/hCf3dboWH6NhflPg6xkl9efSjD/
adApOm7sUIX5T4etjV6vFB5h/tNhYrpf6W4r5j8dihLHE1e3Y/7T4bX52vzZ
Gcx/Ohw1c7wRoUT7R3zWYq3UtTJ5ysRnSxpbR41H/vXZpS8Pdxvi/Sc+6xjS
tefg+L8+Kzh2OPjb1L8+G7Lq/hvJvzH/GdAtqTRw4xnmPwN65q9cMoXHic96
bkzKOd2B+c8k43VieyaOF+KzAk77zSOwP8Rn591S9+If+Ndn96l4TN+/jfnP
hOsFD2zf4vggPqste7KyoxPzz4SGgFK5tdgf4rPi1z+b+eJ4JD67TUq3J2oS
88+EtKLIir+W0ftDfDZWRVDo/WLKxGefLL66bBjvL/HZ6Jt6/mPcmP8sCO4p
K1HG/hOffdK/N8UJxwPx2TGpa9J/v8f8Z8F1R+2To9g+8dnXA4cqn1Vi/rPh
mQCvUUAL5j8bxNLDbzMwf8Rnx72zVouuokx8luGhc3r9HOY/G+r/1msQx3wR
n520l7dMx/4Rn13YNBEtjvEQn73ArRPWv5Rej/jsB71DPasxfuKzT3rXb6pa
Q5n4rMnNpHuOeJz4bLhyyvPGF5j/HKg9GsN7oQnXsywI3lSlq4/5JD6b84z7
Q00XZeKzybIOXya7cfyxYM2NyfrwH5SJzxrnaUSJYv+Jz4Y97X9gi8eJz+7J
lyqL5MP+saClZUUUB16P+GynnX7vOXyeiM8qKw9+EtlDf098tsEhdpUMgzLx
WU1exf5/nhfiszx1Sb8kzaNMfDb5p6tGP+F4IT7bfurQ8QZpysRnR5+YaMVP
/OuzhxmLXPLwfUR8tmuPXskiHA/EZ5dGRM/kz6fnE5+tOtutrTj2r8/uO8Ql
wInvG+Kz90CE87IiZeKzyw+7qGRhPojPLuNscYgXokx89n7FxuYoDcrEZ0Oi
5C5WIxOf1dmhGjukTJn47MLPY/Pe4ngiPuv0rU/j80J6nPjsooeWd0RkKROf
vSN02Oror5SJzxr4zfbYnaJMfLZDfs9M5D/PWx58G5QofdRDmfgs32rHGRV8
PonP5vNEv9v7+l+fVQu9u0kX+0d89van3Y6pyMRnVx7UmwkSxPdzPiw5ut2h
1oMy8Vn+DxoMVwd8XvNB8I7+mIgvZeKzKglHayTTKROfPbFl34svoZSJz/pl
zgwclKBMfHYsVnj3PXx/EZ91aJrZysLxTXx2Wv4+lyK+j4jPnmky8LfA8UB8
1iYyf/5zfD8Rn63cMXrYR51en/hsxtSEgnoIZeKzyp5WNYo7KROfFXw1V5W1
nzLx2RXiItaLWfh+KIA8Jzmptx2Uic/efiLkVLYZ3xcFkKnx95w/3i/is7Hh
KYVGrpSJz87w3fSRz6NMfPb69n4FN+wP8VnugT4RLV3KxGcHXDllDpvh/FIA
gZvrhO9rUSY+O2m+8N1BzAfxWZtVd6TXFQ7R590dFEY0eES+UiY+2+6VYLWz
mzLxWdMs2QgTd8rEZ2MdZW/6ulImPmuU9G717Q7KxGe/73e2eLZ6mN5Pb+jZ
xHnX/h09TnxWiqkt+as/tu8DKndlSpoisH0fGLMy9dJdSc8nPiswtaFW+GfK
xGc/S0/Lb8f+Ep/d9ii49+wLbN8f5o0mpVwKo0x89veT76Q7/sT2z4GdEOfx
D9+w/fMQtOuAqyU3vT7x2Su+d3608VAmPiuw5SPDWYwy8VlBrdqEaQP8fQCo
Sh8XsAmgTHz2/OtnfTLu2P8L4GE3f2taBmXis0eS36seScR4AqHtfoNQ+yHK
xGe9veJeOZ6hTHx2wV4b/XuPKROfZWRY5Ve3USY+a62QPdXcSJn4bNez2yJz
3Xj/g0Hhq6LVd2TisyUT0xcfj1ImPtug2LWzZRndHyY+G9ki1F/fj/GHgGHL
e1HpVow/BMbFI+KWYHvEZ2vfh3v74/WJzy6t7n39mxDuT4fCqKerZzwfZeKz
hrKjPHvEcH86DFae5PRkGuH+dBhkH9ASCP2O8YdBZE2xeV4zxh8OGzWuVYSr
4n58OBSJ9Kzil6P8n/3Z090y29Vwfz4CHNwnX13So0x8NjTxzsEn2B7xWalj
Ww7yaGP8EbAj6cHTv7B/xGdVbsvOMwPcn4+ENpUdnlIuuD8fCTsKRu6YYL0D
8VnvLw+KHNZh/FFQvMvXxwnPJz6bZbHn20cljD8a4gJezCRhvQLx2cgixbN5
tlh/EA0rVBUa7l6gTHyWS8bvy5QOxh8DIznWvz/Yh/HHgJynGfhjvQLxWbtI
jineWIw/Fvg6MqSvF2H8sbB2uXiv7VWMPxbEDNOej2N9AfFZjxW7fBbNw/3p
ODja9nKeHdYHEJ8147rls3WC/p74rGnA4I7R23g+Ax6rtBktfkaZ+OyV7b2X
Xd7g/WRAeKDxp9f89HrEZ6vfMsfOIhOf3VPvyBGFvyc++1xcWYw5g/c7HpKe
SQ//9I4y8dn3dzZx6/+J9z8e/C9sWy25jF6P+Gy4yqq/zcxxvzwenLPXNMrb
USY+W57lIiyN9QTEZ00fmJfam1EmPntcq/upsDXWEyRAWHuV8JZEysRnDfp/
HLR1xfqCBPjolp1TiPUcxGe3qWUI7vfC/fZEaPZVdb7/gTLx2edXeG4wXPD7
XCIoZ07uM/ehTHxWZsM3/9vXsR6B+OuBI1OqrykTn/144V7XzX6sT0iCp845
O8+lUyY+K9quVhMagfv1SWDUGv5o9k/KxGd35XsnmQ9i/UISmA6G7N6/hH4f
Ij77HPiz3mK9APHZ9fZV2c+nKBOfvbdOy27/P98rk+Fwg4t+eStl4rOmgRkn
PHpxPCWDIX+60sl5uD9P/LfyTecOrGcgPrunaofgJlPKxGd1sl04DRqwHiIF
Si8WGT0zwP35FDC52FH0QBW/J6bALi5HRdZS3J9PAS2h3vU8HZj/FEhQFrbo
+oT5J3577qh6LTLxWdvM6+fkz2H+U6EwqOWgRB7mPxUUs44LWuL3XOKz2S+l
/uL4hvlPBdlw7k1nJigTny3aX7lhFOsniM92uyvxLeKkTHyWuax392Mh/F6Z
BhuOSvZv+4ky8VnrrO9XS/D7KfHZI3n9l45vokx89nbu9NpYHE/EZ+sr8w/4
zmD+06FhAXfTOqznID6rkZTkNIDfb4nPBt1kLmjG8UJ89ieb+DNVCZSJz145
ntqxayt+/0yHA15qe6P0sD4jA2J/WayzxAK/h2aA4duz3GMHsD4jA45ubjqT
pYnfhzPgcvrPKb+vxfxnwNkDVTabcXwQn/XWC7+rj+Od+GyZ0hrVhBeY/0yQ
Sv/7Zs8rysRnHwqFNlhhvQnx2RtjIoH5uZj/TPC/6lrNh/UnxGdb7w/H2Ulh
fUYmMJ2E5pVgvQzx2e/96ySFuLA+gwkdflu4pOfj92cmRHHueOqwAfPPhB/v
Sh8VYnzEZ7c6q7vyA2Xis6PDfwiO7cH8Z8GyJQYTIrKY/yxQO3yu0Gwf5j8L
1sfOLjvwK+Y/CwY7Fr/QkMP8Z4GToah8JY434rMC9oLW7cvxe2427L7yUs2p
HvOfDfdFxsuD8f1IfPbKmthEfht8/rNh9sXTGQ2sbyE+e12m3n0W7w/x2UC7
R2tO8mL+syHjpJDxlR2Yf+Knm/fo3sDv/8RnGw/+ssDjCT7/OWBjuufGO8wX
8VklzznDq/KY/xzIrfh65BaOb+KzPEo3YFCJMvHZOvlONWsNbI8Fn9SHzLdi
vQ/x2dE5idsbrbF9Fuze9WXhfrzfxGf15Or6YsVwPLKAf5+JYQrml/jsQKKq
QAk+T8RnQ/KvRbwIoEx8dsWtxp5R/D3x2bq5LZyT9jQe4rMsYXU3ywc4fllg
FyPiv82Y/p747COH95ltyVhvlAtpdRZqC09SJj57O+3Sjx14P4nP8k1sLhjR
pkx89q1mpHYB5oP4bKDfuxfPcL+J+OzhbyZDy9pw/OeC0XSFrQrWSxGffVfE
bdOljs9DLkhrHmh5hfsHxGc/pr/33SeL399zQT/JbaL8IT1OfNaFd0XaLzjf
EJ9Vv1g7UOdOmfhsZ0zcG0GcP4jP5qy3tU1eRs8nPju0qU95Dda7EZ8VD9bV
lhulTHx2hL+2NAjf58Rn/VdrtX3C84nPbpmR1efH/Svis++7K8TsMF/EZ81b
nMZUz+LzlwfObsdc9uP+D/HZ8NoWsVX4/BOfHTnterbeiDLx2S82D70s8f1P
fHbirbS1yxp6nPjs95+P/3ENxx/x2cOFJgtnxujvic+WbXZztftnfy8fzmeW
LS8toceJz1ouuXfw8Bucz/PBq/DIuPsflP+zP6uSLDaE9ZXEZ4VuWaQ0h9Ln
lfjseVB369OgTHx2d6YHRzPWMxKfNTz3NnD4ED7/BTCnd7rSB+df4rPVjrzu
Rvj+Jz6bms/Vs+MDZeKzrnb6WeFbcf+jAMJNhqwbjCgTn1W4cvZWZQLOFwWg
VCRs04P7o8RnH6a7RTjx4/ujAOQ75bzn5uhx4rOOQ/lNzeb4PimAkZJWaQ+c
T4jPrhvo961uw/VFASxcbOAYvRef/4tQ7qS+XQrPZ9cbs+uN2fXG7Hpjdr0x
zQe73phdb8yuN2bXG7Prjf+Xf3a9MbvemF1vzK43xvoddr0xu96YXW/Mrjdm
1xv/73x2vTG73phdb8yuN/7XZ9n1xux6Y3a9Mbve+L/Mrjdm1xuz643Z9cbs
emMaP7vemF1vzK43Ztcb4/48u96YXW/Mrjdm1xtj++x6Y3a9Mbve+P9jvfH/
AdUEQH0=
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1VOUGAYQBdDdjW1zY9u2ubGTjbmxbdu2bdusmbRJG7RJG9s3Jx935vd9
vDkTHBoW0i0oICAgkN+M37nODf7gT25yi7/4m9vc4S73+Id/uc8D/uN/HvKI
xzzhKc94zgte8orXvOEt73jPBz7y6UswAQMJIhzhiUBEIhGZKEQlGtGJQUxi
EZs4xCUe8UlAQhKRmCQkJRnJSUFKUpGaYNKQlnSkJwMZyURmspCVbGQnBznJ
RW7ykJd85KcABSlEYYpQlGIUpwQlKUVpylCWcpSnAhWpRGWqUJVqVKcGNalF
bUKoQ13qUZ8GNKQRjWlCU5rRnBa0pBWhtKYNbWlHezrQkU50pgtd+VKsMLrT
g570ojd96Es/+jOAgQxiMEMYyjCGM4KRjGI0YxjLOMYzgYlMYjJTmMo0pjOD
mcxiNnOYyzzms4CFLGIxS1jKMpazgpWsYjVrWMs61rOBjWxiM1vYyja2s4Od
7GI3e9jLPvZzgIMc4jBHOMoxjnOCk5ziNGc4y7mgr3f7K7/wMz/xIz/wPd/x
Ld9wjatc4TKXuMgFznOOs5zhNKc4yQmOc4yjHOEwhzjIAfazj73sYTe72MkO
trONrWxhM5vYyAbWs461rGE1q1jJCpazjKUsYTGLWMgC5jOPucxhNrOYyQym
M42pTGEyk5jIBMYzjrGMYTSjGMkIhjOMoQxhMIMYyAD604++9KE3vehJD7oT
Rje60oXOdKIjHWhPO9rShtaE0oqWtKA5zWhKExrTiIY0oD71qEsdQqhNLWpS
g+pUoypVqEwlKlKB8pSjLGUoTSlKUoLiFKMoRShMIQpSgPzkIy95yE0ucpKD
7GQjK1nITCYykoH0pCMtaQgmNalISQqSk4ykJCExiUhIAuITj7jEITaxiEkM
ohONqEQhMpGISATCE44gAgO/PslP1kc+8J53vOUNr3nFS17wnGc85QmPecRD
PgPZM+Oy
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 
             136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 
             149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 
             162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 
             175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 
             188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 
             201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 
             214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 
             227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0lNjFgAAQNFv2bbXsm23tZZbdi1z2dzCsm3btm3jP2S708N5vU83OCo6
clBQIBB4zRve8o73fOAjn/jMF77yje/84Ce/+M0f/hIQDCIe8UlAQhKRmCQk
JRnJSUFKUpGaNKQlHenJQEYykZksZCUb2clBTnKRmzwEk5cQ8pGfAhSkEIUp
QlGKUZwSlKQUpSlDWcpRngpUpBKVqUJVqlGdGtSkFrWpQ11CCaMe4dQnggY0
pBGNaUJTmtGcSFrQkla0pg1taUd7OtCRTnSmC13pRhTd6UFPetGbPvSlH/0Z
wED+jxDNYIYwlGEMZwQjGcVoxjCWcYxnAhOZxGSmEEMsU5nGdGYQx0xmMZs5
zGUe81nAQhaxmCUsZRnLWcFKVrGaNaxlHevZwEY2sZktbGUb29nBTnaxmz3s
ZR/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGbO9zl
Hvd5wEMe8ZgnPOUZz3nBS17xDwZKchA=
             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwVzlN7kAEAQOFvy7a5bNvLxrJrWVu2l23btu1+RDaX7beL93nO5QmLjI6I
CgmCIJZb4jZ3uMs97vOAhzziMU94yjOe84KXvOI1sbzhLe94zwc+8onPfOEr
3/jOD37yi9/84e//sdAgCCGUOMQlHvFJQEISkZgkJCUZyUlBSlKRmjSkJR3p
yUBGMpGZLGQlG9nJQU7CyEVu8pCXfOSnAAUpRGGKUJRiFKcEJSlFacpQlnKU
pwIVqURlqlCValSnBuHUpBa1qUNd6lGfBjSkEY1pQlOa0ZwWRNCSVrSmDW1p
R3s60JFOdKYLXelGdyLpQU960Zs+9KUf/RnAQAYRRTSDGcJQhjGcEYxkFKMZ
w1jGMZ4JTGQSk5nCVGKYxnRmMJNZzGYOc5nHfBawkEUsZglLWcZyVrCSVaxm
DWtZx3o2sJFNbGYLW9nGdnawk13sZg972cd+DnCQQxzmCEc5xnFOcJJTnOYM
ZznHeS5wkUtc5gpXucZ1bnCTfyTRdFM=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.81, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.82, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.83, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.84, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.86, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.87, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.88, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.89, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.91, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.92, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.93, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.94, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.96, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.97, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.98, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.99, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.11, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.13, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {3000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{34., 5.000000000000057}, {23.00000000000003, 
       4.000000000000142}},
      LabelStyle->Directive[Bold, 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwV1mk4VG0YB3CUEBUiilBZS6FFVDx3UkkqopJsocXSYgnDMGfGNpZEZGlK
GMtBZQ0pKkkLCVF6K0uS4sgyQynpffow11y/D/PMnDP3+f/vFS7nDp4QEhAQ
GMKvf++XEtWNBDL9oMPu5WrfKxRq9Vw1d95tP+CKah0YSqaQ9C6VJvH7frCz
NkPDBTv519Kjcl1+MPWTx7NOolCa64IL6yQvQPm0OB8lUih7E/+mPXEB/uQ7
OxtepNCdd48U7zr7Q3RCm3NJBIWmyuv66876g5OmIccI2yD+XmED3R8UOPdY
TeEUqjG5Y9Ca5g83Pm+y/RZGoboi0maw1R/elgjLrWVR6FnIpTjZ7QEQ402r
6Ail0PsVDjPeKwJhgBs2mR1IIXiypSpXNxDmaZYnGWHnnJb3eYcCYZ+752RX
AIXOFr8eBMdA6BT0EJLGFjAyf72IEwjW9Qe2XrxAIVXbzYW3ZGhg8Cn2e74P
hdi/ZU70raKB4B3xvP3YIxkTyrIbaPDV6rvilDeFKgduXaFb0aA4tXP3bmwz
X1Xm3ngaqC0Rjp04RyGveCnbbyJBcPz1z4teZ/D91RuVXi4XBHuHlixXxt7U
2fzSUj0IqE72qXYvCs0qsHdUmwZBdMSptVuxEwpm10Uxg+AIV9Jf1pNCFQ3D
wmq/g8Crz+ExdZpC8qefP7SdHwxVwh3fCrFDxPOD45YGg2Jo7lN37F0HXcZ5
m4NBz9KJ/HaKQl09XR/q/YLhZ/ihH+MnKfTn15Ny5+/BcPBHU7LqCQrNMy9g
X54JBvXWlsJxNwotTI9zaJhPh89O+x0eYKtsthbR1KDDw7TfKfbYpr69dqNO
dDh7K/1IhiuF9tU/1llxlg7zxRZYnMc+LJU/15pOB8vCs+9NsE8Xn7ldmUaH
1dX6L765UChu+JdgaBsdbtr7fjLGvrKl+01xDx32tY6TstgZ0Y+K+kbooKXc
ITpynEIlGuxDO+eHQJ+ZQPJ17NeusgUSO0LASSmjXRh72QcdS05FCOjudmyc
cKLQqjWL1V7Wh8CiOBOJ19jaQVPTs60hkFXH/FqObSxfy3UZCYFzbyxdA7CP
25j/0FIPheCrfHthbA/u2uZjG0NhV4GP5ZAjhXwmJLMumoTCaYmXXa+wwxPe
mo87hkI5aZt/DZtsdsuoTg0F1QiOvhF2qYKZ71BuKBxb0tykjl3jscZMsSIU
+rY58iWxm0UnxhmtofBcYnj2iwOFOo90NpZ2h8Lt2qjeduzuvGpOPxUKXdIv
bB5gj5kydu4WY0CvUzg/HXs6yWUZTY4BzK4MZTa2UP/O0UI1BvRPcT/4Y8sw
JdIXmjDgdHO5+GHszbXpVGcQA8qqOwwUsN28/GkP2QyYUYvRWYidoGA9ryiF
AV83K5QKYg/RJFSIMgZ4+q60GbKnkJzWt5seDxlg3LH9Qg+2adcTw0MtDFhp
dkmlEztDn2G9eogB58+KyNZjNw0c65X5yYCiJ+8d7mLTza9V/hUiIJmmp1uK
LZ09/w9fjIDi0I+xBdgF04E7hiQJWPa24nw2NlgNRvfIERB5Oa6bg/2GPNTa
oUTAlhbDzivYXgINS16oESB6J9EmAXuO7XqHB9oEmDPc7WOxrxZncis2ENDr
k0JFYuuKLBoq2ELAqv6RuWHYjY4huje2EzCquzOXge1QOeyfbEZA3Avvl3Rs
/gK72ugDBNxdsyckCDvmxLM5jMMEZH3MrAjEVqnVN/dzIKDdf79vAHaVTG6C
uxsBJhyNu/7Y+70Wv3X0JGD7jGDkP39+zFxu40NAsG35u38OUhhz3UMjYCxY
quLf56V8HQuNCQLG0YQMDZt80Ty2IYoA+dg1M/++33jl1s1a8fj6rJLcQ7A7
aAUhSlcIuJX0157A9myTa1h8jYBs511v/l2fkFbkfDEuAU9fG3VGYacRfMvZ
AgKGZe8fjcNe1+WSyishQMoh1TURu0Gn7ePXKgJcqNyJFGy7KKTaXUfABpm6
edexx7tvebx+QsCMXuUNLrZSfMyP2tcEvJyX6VSGXTHw06j8PwJ21hhH1mDv
NToVTvYRQNjL6T3GDqR2SCWNElA72Sr9BnuhadkR9hQBbCunPb3YuRyVjJA/
BNw4wZozjN1u/mf1aXEmyCz6JCiE5/F0tqe3gzQTRLybd/6b17/T76oOLmWC
q2q+xL951i6oNDXSYAI7L3qlPna9gFrs+nVMUC5A3qbYR22T2jQ2MaHYzcTE
GjtS5Lyj9A4mcH/HePhgKzp154iYMyHEm/GIhV1eaTE8Y8mELZ3LryZh957Q
Chx0ZMJzjcpXldhbGj4l3g9igp3E191z8PPsQmxvN2MxQWPJvVNLsWO2ZUp3
RjNht2SWki72fxUOSSNpTBB72WXphB2c25WsVMWE/hmnRw3YOcc3dxbWMWEj
d31yz798WJ4iu7mRCetGGDO/sBVTrFMOdDJB/NKDuA04n+5HtqQSPCbseWye
V4T92WRtl8RvJlQ0uis3YUv8jZVPF2JBvs857WFsh4A96aVSLBgVPym41hn3
zamGq590WPCWF5lYhY321Fw39WIB5+Zc5a84T08LL+1u9WXBZN2aB5I4jxMe
BSg5BLNgh6nSmCF2r+GmGxdiWPBXLWtOPDaxuiQzj2RBtX398Dac9/XieVzR
ARY0JT+/cgf3xdDTuZ+TKRYAVb9mEFs63FV1BZ8FPO2QA0tx/7jMqOQazgmD
YGE/xMCeM8LJ81gRBgd719y3wn1l2pJY0OwQBpP5f2clcb8ZO/Om3rqFQeqA
ufdubMMJG9N+zzBomg2wD8Vet0S+Z5oWBvSM7msj2HKOGTIaKWGwSKfkUZs7
/j0jhQxmSxjMf6ASVIL79dKChkP6KBzmarMzGnF/x9xQ427fFQ7FE4/6xc/j
vNeLGrPYFw5OC9Zct8IOPGQe63osHNr+/PDsxna53vowISAc3NiBF/7gfWDj
2o9rhovDwfixnLyVH/7/LaYEM1Ui4EefccY+GoVO7jDbY6IZAfsMBNVJ7AnD
qwmfdSJAWfmL7pwgCs3XMFbWQhGQcNL1VQ32FsHIbWUOEZBJbl+tS8f5dkc2
oOFqBMz2eeluYODnVWkT9VUmEjST483S8X71ftT3jZ5YFCRtLdL8gPe1oJR6
WolkFJTpyQ1Y431O3khquY58FOg9pMs2Y9vE3HbV1oiCsVepbbV4H2xW/Tam
vjMKLhU0luWl4nk76iiuyIwCQ+Ln1EUOha49NoN501EwFdIcWMrF85W6vPC/
r2wYzHulYHqHQi2Lz9l1jbIhZ5Z77yW2ccLD+W+m2FBopVt9pBLnR7SrZ9vc
aPgc9rvRqwr3XVCB9jOVaOgz0jTg3KWQs+Om4ju20VAzaHtArA73ldq+ioRn
0eCY/zJS6ynO/3J63S4yBp4EV/T7/kehLzz+fu+LcRDkDMntoiOIIleqOB2M
B/tQc8EjhiPIUM/4p55IArzxOdvhfmYErc8MyFj8MwGKir3cLhWOIO/n4gNv
uhJh0YvDN24MjqAv4Tfdac2XIafugHfr2u+IY9J/Jv9eEjhl7k7z9P+OUmr8
pKuuJoNipqioWu139LRBejI37gps/DWr/1ZiFBlHiwf6n02BcCsTg8ajo2i4
R9JQ3TUVRBoKHnCLR1GXwU3aces0iHOsFVWYM4bELbLtQjekQ6oM+56r9hjy
G8+hBalfBQ/3vy1z7cbQKishQ1sxDiz0THtwKGIMSZdPBjwa5ACXk1vkXDKG
NudP8sXeXYO7ZpuiMnrGUPYhS+mNNddBlfejSEViHO1IqTpjdDsDmq7lHqrZ
No5U31WYtV+/Ae89BW3ueI0jdc95LjnGmeAWdkToevo46iirNn5VlQlhCzRP
urwYR7lH0oaHNLPg2tIV1gM/xlHqHxPb5tQs6LX689RDdQLlUDzX5ZLZQKTv
ymDbTKAOg3bkRGQDKAjFajEnkFJLZY3kr2wQSdCp0iydQLEPnwmXe3LhSlcg
EfVxAi2tyJVUeM8FwftjzyNFeah+jF0zYZ0DnT6d35j6PBQfk77xXkMOXB7I
uVXpzEN+Z0r28YxzoTSLtj7pIg8FW11WH6/MBXPNHwKZ1TyUeznrVY96HoQk
Wuo39/DQN8UqOePMPBB4d/vEEjE+spz7S+eiVD4If1op6bmOj7ooEdFsIh+E
RtUXNlrxUbCSIkN9Oh+Uq+zdM/35aPsth0aOOwlPOEy3kFQ+smPtoBI9SbB3
+n5dIo2PfI5oSbPPkBBjf6+Kg50tOOng503C9PH9cXfT+UjocNykBY2EdR9M
qnkcPqqfrVGdZZPg0lMm7ZLJRyaW8mHOJAnyPc2x6gX4fLVZ8nAhCZr8idpS
bJ9f/S0WN0lgeRq+2laIz88pXmZYQoLaqr/xB4vw+dO7yqSqSWC3HWTRb/HR
46wLffVPSRhahnRelPLRB/9jInefkyC99dZ+6zI+4u/dvra4iYSNaekWH7BV
pyRonFckOOxt6B8p56Nw8xxJv7ck7FxoGrqoko+uKcfoe7wjoTk9MiEVu4J/
zt75PQlv6yYJ5So++pyxlbToIaHzi+7Mumo+mvFd0WLSR0LB2a+Rldgye0T4
Bv0kNKRzR43u8pG20shSnQES6tVt9Z9gm/LakdogCXXtv+0savjofyEmPp8=

            "]]},
          Annotation[#, "Charting`Private`Tag$33721#1"]& ], 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVjX0w1HkAh3fXW9v+7sZLnSO0W+zUjcuRIzX5fkqnrlbnpRcqQ+kqIUOr
Qh1FJVGWSl5vLZtfDdnobJQusqlL1E7nJd0YRETdYtfLZnXuj8888/zzfHj7
In1/ZTEYDK+5/c/LIv5ahliIBVe+GDIYKvIybKm+4W0hJposVblMFTH15D7n
PBCibvwIy0VPRa5oLQLMO4QwfaiUhBuqyPWQr2JWGMegmzWj7KJURPKjumxP
YgzMlDHqegsV+aOz3qom+Bim07kB5StVpIsXOBPFOwGF75ks5iEV0WkVVcGf
4tHUyWH/2aUirnU5I3/HJcBfu1h2Z/MoWd3YK3oQdxq6d4r+NbWjZEOL6GZz
YBKc2qQHD7mMkTeCCaaYexal/fLbu8vHSNe/R9sc2edh843audJxnARmW996
M5iCAYM1wyvk4yS86uRDTzoViot3PCdd1GRgXL01Kj0N+bJwpYNCTUboJdwg
30s47vC4Kt5LQ9wc3accjTLQHsF1PtWmIU7i44VmUxnQuxN9nh05QaKecfrb
OkRQcU5zecxJMpBcFhrbnIn2q/4bZMWTJG99X0Tp/Sx4L6GlxRunyLVaoak8
9wpO1mQVpL6bIk2Nphpp2lVUB6VonLKmifsFzoljR65B/Goo7MJqLRnuNnbj
h2RD7fpLj0ytJR2rymL3+l2HnYHsaazsM+EIJLt+W5mD1vmDIx77Z4hwtCQ2
jp8LEUv0MMBeR5b6sNz82XnIYFe84I3oiGmV5nj9+zxsHakK+Vg2S1xLNWp2
Zz4ucw5XZCZ9IZLt3qbOtQVIfmuZcXUZAx7X5BFrbxdiGdPMR5PLgG3n3U3K
gt/xg9B/zOdrJvhhhvtK3MVwfbqzsO4kE68r77m3ysUQyU1spJNMSHdeH/6w
rAjDG22HDkewkK1b79+cXYSbiq+XNPexUDIyHmJtLAHLSudZcFAPr1cpSVCi
BAJFHau9Xw82LdW1xloJaiKVi7yi9XHx0VODqrBiVIdZJKin9GFxV2q8qKsY
jf+oerclGqBBlVI75leCxIF0f7a5IS6l5jjfbyzB/sHT9qGlhhBGyLzG3aUw
bDP3NdpkhHifTP5otRS6sK1yzgcjSDOLWrv5N2BeS9vxz87DkJXc3F0859GK
IwpHNrz1tQ7pJqUwmWyLc2lno2PEaJ4ksRRHdR5bzp6aj3gbqwT+dCl4uY/s
ZC4crCsPfJIXSkOzcH6N0SAHu854jIjCaGxhvGhYPsxB9M7lpikRNJbW5/IF
nziQMDWBwigafS4JMyI1B6wdaRpBLI22n8738pgUGmZrbWdTaOzwjBb7WlJY
7/1tUjBN455v73dTAgq77GbpHbdoWBmXXbDzphCt7WsRlNGI2/bEw8+PgqSk
wtJNNtcXLvyrIoACa9qz0uQejeRDa7kRByg8LorpaWiiUZ1U+XkqgcLbY7uN
ap7RwMHtC+yTKKi3rPu+4jkN+b6PKUHnKNhOULF5rXN/n+zONaVRSN5cYixs
pyGVvXmVl0Mhf3Gqy+FOGt7Sjc9f5VO4q47cE9xF40ToDHeemMK7wjW0oJuG
tfJAT8wNCjNHeS3re2hEOjkKym9SWPCzkXpVH42hznCz/jIK9jYfLRz6aQQt
t3W1llHYMK4kdu9pvDyzV769isJ/RoVIrQ==
            "]]},
          Annotation[#, "Charting`Private`Tag$33721#2"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJztmvlfjd33uCtRykMyNJEiKZIMmZKWoUQkY6SoiCQ00ahJo+b5NJ1Odcwh
klJJUuqRISJDhkSlAaWkEJ/9fVvr+Se+xy9e12vvfe97nX3uzrrWvZStD2+0
ERESEoocKiT0//7/3z+eC1zmCpfaPuvU+x/DEahSWVyRV4HceARmfA1a5chD
9j0K6sqOXl/OIiu5QkDGCAurfOQyV/Aa1bVMowDZ0g00BpfdmW6HLOQOstXQ
ylmIzHOHkY2v1kvvpv09INil6tfsHbS/ByTm/NmwL4D29wRN7abrN8tpfy/Q
qFs8bHMd7e8FowwundEspf2Pge0TryU7+mh/bwjo4B+vL6L9vSG4o6S55wDt
7wOjQkREDmyh/X0gcL+2ZwEx+ELh10DR/L3I0b5w2/7ypsxKmu8LR20UXMxa
kbX8YHa96bfHF+j+/aB6gZbs1DvItX4QFnhWJL+F4vGH5WGunI4eZAd/2G+4
YLHnQ4rPH7SiROdGXUWWOg4N/de6zXMp3uPwRvhp49fhn/5y7nHIcTv/860P
slAArD2Um3M/AdkkADqteXHavsi8AFg6JaJl/QrkrgCIMvVtnqCKDIEwfjAj
0ykOOToQCmV6b+a0IDcGwo+2iZJhNchaQSA5qlFPh/bzDQJxe6M9Nx2Qa4PA
0mLWo5XJyErBwF1Vpu7yFNkhGD4KPcwNHkAuC4aMFLuC41KfMf4QeHXMTjdg
FLJlCGx9mmT3bDhybgjctfshMW4GslAoPNF+umy/LrJJKBy4K511SB2ZFwoG
UiadDfLIXaEwsqptircCMpyAXU9maIrvQY4+AT9mbD5pvhW58QR03Hru7f2H
4g+Dzjd22R3dFH8Y5Ot4BEqPx/m1YTCQC9/SfZCVwkHT7cDGH/eQHcJhWk9i
YHwlclk46F2b/fX8Y4o/AkzDv/4I5VD8EWA3M2tffRzFHwEH99wJ8edS/JHA
P+Hh/yyG4o+E2302c6vfUvyRsPfzTavSmV8w/kjY/0Zc8aoFMkRBhaShhK8H
cnQUqAeZTfY3Q26MgrxVV4wjViHLRsOMw/+EH1lG66NB7ECIgdVqZNto8PFY
KGlsRNeLhu2cs4o/jiMXRkP+/KXlMlfp+tFwKUXX8XQJsngMFKrKv9coRtaK
gbUdkzRrypG3xYCh5YO39+8j+8aA7aWXbS3Pkc/EwDbfHN/5lci1MfAyXLjV
+R1yfwxIhH5W1hvehecTC8E2DzZ1TUc2jIWXX7vv/56L7BALV19+jM2fisyJ
hV2vp8ZfHIVcFgtj2ica+tH8j7FQ4lyUMT8KWSoOlG42f2o9grwwDmZNqhin
QdezjIM6SVkRpyXIIXGg/uiR2RBb5Fw2PnB01ddjyM/jwKRKS+byAWSheIg4
9JmzOxBZLR5WOf0qXJqHbBIP4vnN3/dnIbvFwzPOmtpWuh4vHuo6FfQDab/q
eLjmJXVqIAS5Kx46qsxmadUhyybAZvl+j/4/yJAA1T7SRduHdOP5J4Dluqmb
OMLI0Qkwdm5ETN1bnF+YAOf0lWokzyE3JsAI6BfmBSGLJ8LLs3fafv2LrJUI
zio/NSVl8XrbEqFXKcU9dzKybyIs3SP2Pn4o8plEUA1f4+7WjutrE8Hgyuk5
Rr+R+xPBzFPJasMWnK+UBD3dj98VH0I2TALrJc/O31iO7JAEVjN2ecntROYk
wa0R3+wUaLwsCQrW9y3g/oP8MQk2Sy+YsHshshQHTr7hizoeQV7IgblDvFO5
CciWHPBdfU3b2xs5hAOrxkafnRiNnMuBfSH3xOdeQn7OgfJzBTn+55GFkuE9
h9szJANZLRlMiyaum16EbJIMVmO9dS+XI7slQ+6ePynOsci8ZBgprJl+5TRy
dTK4yOwOmzX5K55/MjRWdcWVjEOWTYG6GWbvG37ifEiBC8pNYp7yOG6bAruc
2uflTEWOTgFuuUGo1QecX5gCxg/WjZs4CccbUyB2ffWpzVuQxVPhiUtk0Iel
yFqpoFJiFfWuBHlbKtjqGEfN6ED2TYXtqqeecf9FPpMKinwbVRt/5NpUaCr5
MLF3G3J/KqSs96zLCEdWSgO7162rwzOQDdMg1Pl52QRrZIc0uKU0WUUsFpmT
Bmay+0RSniOXpUGJhab4YrEePP80MJFRWZL7Ecel0oGzw8ZEh+5vYTrMXCj8
JaYf2TIdHFbNt932BzkkHdpOmc5cMASvl5sOZVt67czmID9PhxIDZ0tH2k+I
C/tX333B/YHr1bggmjg3ebgojptwYbCoOaNFAtmNC/v4/o+6tiDzuOAW2a4Q
7o9czYXtOdz06ceQu9j6+VPnLb2ALJsBt7YHHE4rR4YM+F4zIVPCHtk2A/xr
HpSbH0WOzoAtbndWhv9CLswAkSVjcoZVIDdmgP0/hhsM6X5FeaBvqaf9IJP2
40H70o0SwxV6/7IGD3Zzx8uk/6b9eTDFY1xm2UfkzTyI/uO19eFEnG/LA96w
h2/ERyF78SBq553+LS10fzzY3/plkfIyHOfzwEfPrWiaBnIhDyKMRt+5PQf5
Hg9mr3Ze2OiF3MiDHDGlysTlyL08uLmvQN0wGFk8E/aNXxso+xB5QiYMmmYK
2xNrZYLVfWEjrinyykwYc+h65OhhyNsyYcVqs6PHaNw+EwodJ4dYuiP7ZsLo
ZQv31R1Ajs+EoT6D3x5eQj6TCTKX6kM0aX5JJry9/TFY7TBybSYs4vaOf3UV
+UMmlHy3WcS9jtyfCbbn07YE/0EekQXvWk0Xfm5FVsoCy7rgmw3JyPOyYHDK
gOcOLrJhFnj8m2dxYfK3v2yeBc0dXiKtr3HcIQve3NdemheJHJAFRrywVocI
ZE4WTPRTvb5gO3JOFgQEfrSPbMPzK8uCD0lVZestcfxJFnRec+eqvUL+mAUV
IVP4fbuQf2Wxv8cF6s/p/KWywUjzg/Bx+n6pZIPlWsso3kzkhdlQdSNln0UI
8tps2C/puCXADNmSjauoSWTR8+SSDYN1j0dt6KbnORs4vK7s1BE4npYNK/R1
/1nOp+c7G4p/qA4LtEGuyIaizXP5GV64/nk2DFwe8jqwALkzGz4rXy8esxj3
F+JD788D8f8EIo/lQ8nsHdXyLshqfDAybTQWPYS8hA83dNa1X1XD8zDhw80/
h6uNjJH38EF2vOaSoAac78aHoZ2Gl76UIIfzITt3qmbCbmQeH0TebNc9V4N8
lQ8N309LOH/H61Xz4cCYipF7fZFfMS5+rBNkgPO7+LBNpWVP+gd6/k/CzKoZ
oXdN6PouYG7X23fmNvnKEZhr7iG/vYr85Aica8o5tW895rvMZ9N9TErgBuXf
rjD5dOF7qcWY/zGfjdg03GG0NDLz2bjPTmsuFVI+7Q7fvzwr1dDCceaz7uKO
Paf8Kd/1APl7iy5Ur6T81QPcNxieuvWA9veEpjzlsW90cJz5bPWjeTlfKd9k
PtvDE4411qD87xgIDxts/nyS8jlvOLBtxoL1H2h/b0hS8I4b9ot8xQfyvilL
F2yi/X1AN3P64gwHuj9f+PJ+IHUf5efMZ/1a6tcMnUTzfeFMq9Rn73mUX/vB
j6lvNc6pUT7tBwXK+f3uCpQ/M/5dkG29geLxBw1/ryfNKcjMZ4NmdBx5/oQ+
X39QGOM4wfklMvPZdNcGob3/0ud9HMIiRNptc5GZz1qN4ub03kNmPhtet0/i
9VNk5rPa0Xa/Tj+kzyMAzpwcu4IvRvlpAKxUHrpGZSzlo4Gg9ejRTb9/kJnP
BoiODgygz5v5rOPtZ9ub5Cm/DIJHYv3unVLIzGfzI+319k6g/DEIpim873k2
i3whGKRPL/+RNob8IBhetFYu6v3vfINhx+lV+n7KlP+HwNDiF96i/513CMS7
CtVKUL7PfLayx9LgkxGdfyj8OusUdM6U8vdQuPX5dvoofcrXQ+HG4wsOg2YU
fyjc0SuNBg7FfwK+GldMSnKk+E+A/TaOfagFxX8Cwubaua7zpfjD4NqwpyLW
cRR/GCSXmHy3TKb4w+DXnvP+PR4UfziIJJq3PnSh+MNBO99i9d09FH841C1/
r5ZH98t8duLUCykBlO8zn009YRLX2kjxR8D8jYNbuh9S/JFwN6W51v8xxR8J
71W3zNLPp/gjwcj8yjS5KxR/JCi+lDeUeE3xR4HWkvb1D0aTf0TBn6Qp9741
UfxR4GAwJ8P/DflMNNTcLJXU0KB8NhpKs4xzmyjfZz57t7PC2WstXS8aat/w
+delKZ+NBp03PbMqRiEznzXb/OO9vBoy81nd/EmaZrORmc82H3YyOqJJPhMD
v8rvSrgvIp+JgcpdIf9265HPxIBe2hA5JWtk5rOPv/6I5BxAZj772Ptn/qkQ
8plYUOh9tNzpOPlMLJw+N9PP0oF8JhYCvE3G9XmSz8TCiWPffbNek8/EwpDx
Eh8jvpDPxIKnlmehVSr5TBzkqxR21HSRz8TBozlO3XU6lM/GwQ0LHe2q6fT7
Fwdt09pjN41HZj57bcj4SK8B8pk4+FpZdc2zh3wmHpxCQiZu6CefiQetw1ll
n/RxPfPZyRZFtRedkJnP+j6xj3E2R2Y+q5l9rr/KBpn57MJrUpeHupLPxMNN
sZ07Nxwkn0kAm1ea386dRWY+e7Hy24LSSvKZBNAPfGoTcpp8JgF2GTR9cnVE
Zj6r/bTc0+Q++UwCyHxykkwcj79nzGcNXpkOHdFEPpMIqcPab4WTPzCffTo/
btuLZvKZRDiorFeo9Il8hvlsoZxlSR/5TCLc7J1aI/WTfCYRXJY/vlb9kHwm
CdTDXzZFnCGfSQLjiC8akwbJZ5LA28Vmr6QV3h/zWZFaM4cOX8qnkmDesXdv
dsSQzyRBadDu+xfOUr7EAaPiaSp915GZz75uNXqz4iIy81npN9OmddN65rOp
ns/VjwdRvsOBA5FVu8u45DMc4EjfmBHEI59JhmlPxPNGv0RmPrsubvYzjx/k
M8xfV0eK8oUoP0mG3rr02r4NlC8kQ3dE1RGlPcjMZwfKTovMEaN8Ixn8Hk5s
OaOGzHx2yaeG3pUWyMxnjbxqGzh7yR9S4F7Eno5dR5GZzy7Ojd5onEt+kAJX
7v6UfHqMfCAFioUuhtpRvsl8tiqoW3WA8mPmszvF6utGWFN+nwpufo5B1jGU
z6eCwak/QlnPKX9PhdS5yeKPKZ9lPjv16eN1Ox9Qfp4KPvevjLaupnw8DRTd
VFyvy2G+xXxWaPaeUkNXZOazp7/P07Hdjsx8Nt/EP5K7GZn57MCnHgsbG2Tm
s/aXBq87Uv7GfHaG7Nb2nbnIzGd/S+86XHQZmfnsDrl1uw7GIDOfrf6hvpgb
i8x8lnu8v+BECzLz2WDJh7mKM/rw/LmwOD36hEoXjjOfXaN/233rIOWrXFD/
Oa6lVg3nM59VOlXeGTAWmfms8hy5nOY+yj+5wNEbbig5DseZz3arfLzXsRCZ
+aziJdHQ3VbIzGeL5kwK3GmCzHz2vNQn47FGyMxnlT2OH9Z1RGY+W66QsSK/
Fpn57MmLhgnZM77/ZeazXYvujMkbgcx8dlvFtKLkLpzPfFbp6prKw8W0Pw9W
Vd6oXsFFZj6bPJh6PL+F7ocHCruG6STK4PWYz+73tc7fOB+Z+az0n/l1DQbI
zGe3VDgbyS9BZj5beq6j9+YKZOazarXqEblpyMxnVSabLwi7jcx8NunM8m0H
upCZzxbffDOu+0r/X2Y+G7ByZLwIB5n5bOyEC3t3/MD5zGd5slKPJ3cjM59V
GDbvruYinM98tnqDlFuwFzLz2RRj+2e7riIzny0OqKswO4fMfHbtn7jtFzWR
mc8+r1leaK+NzHx2SOjDMUvp/pjPFnFrLodsGsDnJRO6fAovHryMzHx2TORF
2aQFyMxn38fdOnyoD9czn70R2rrUVQjHmc9mKe66M30JMvPZk3HmNXsskZnP
lo1b63F1FTLz2arqL16Ni5CZz5qfWjcyWR6Z+ez5s9dDTCYhM59dOPqqglAt
MvNZ8Tl22xNH/MDnMQt8hm+RWd6G48xnP8z/bPBoDY4zn+022bMVFiMzn5Ub
aOfrteN85rPK7x138+VxnPnsHecNWfGGyMxn632kF1a24nzms0Pezs85sRGZ
+ewIfaliv9f4+TCfzVu26Z6yNY4zn33QmVbaScx8Vmhz1tryHpzPfHb4wb7A
B0o4znyW525xKBNwf+azsumd/7oUIDOflfEv7uzVQWY+W7x+3NHN2sjMZzOf
aDR9l/yJfx/4cEVx8NNMXWTms/2xOXkhv3E+89lWvk7WkWk4znxWepXw6Sod
ZOazuaqvQ6PHIjOffXl458lVrsjMZ1e1GRf2bkNmPjtL/k3ewVt4feazgyVH
DWbpIzOf1bGznrbZCJn5rFjdyEC1jg583o+A+aeBgyPLkZnP5gpbffTobsfn
4Sjkl8cs4SYiM59tTrKsv6yFzHz2UE39mFXmyMxnKyRHLz+lgMx8Vod3dtTQ
ZW24vztkFxjmHFuBzHy2Z8KWtamOyMxn88QKBkcspv09wfNa1q7M1bS/F1SK
jLhaHovzmc8uXLNjZtkUZOaztWl/cp7zPuL+3pDmrVhrEUP7e4N78c8F7xpo
fx+wlX/frWhK+/vAvdlQ8nAxjfuCv7D0QZFwZOazYj1h5rr2eD/MZ5e9n/pD
OwWZ+ey+oNobP+fQ/fvBy3XnF9Q6IDOftRiRaiXmRfH4g2m8k3n3WmTmsyY2
x39PvEvx+YOBJGf1+Uhk5rNyHrFNm5Io3uMw++jpZ167cT3z2d53hWtq5uB5
Mp8dMXzAuHQLMvNZvnb99NtayMxnp//sMjB1xfXMZ1Ps++Z3T0FmPnvfNO32
O0mcz3zWTvXOERMX+r4Ewuh14dYbrJCZzzqMrA1LF0dmPnu66MbqK2co/iBw
CeAUvXhM8QfDuGU/d148jvOZz06YI/1Z9S0y89nQFv0Pom+Qmc9eCFQ+9ucO
MvPZwGJN7eRUZOazIz7PCV1fSvGHwmWZyqPHaij+UNhckC5eWk3xh8IYz5Xf
S3yQmc/GjjRV9RxGz8cJaJB4OKHpA8V/AhRPuzqe6qb4T0D5hNcjrX/T+YeB
fe6MZWNu0PmHwaLfGyfsHqD4mc8mTW/ePJzez4ez3+OJ9ZvpfTvz2RZPJ7f4
W/R+PhxetqTFdsthvYn5rNODE2USryj+CMjQzz7z2obijwAHlVibyekUfyRc
eau++6w3xR8JRRnK4sOo/4D57BwVBZc135GZzyaJvzq/SZjqXVGgllHssvsR
9SdEwcZXB3Nkv1B/QhQEigjtGvcYmfls6c50objp1N8QDTHRzhqDT3B/5rO2
Cq2a2YP0eUbDWOfhvb5NOJ/57EBuvMppQ6qvRUNOeJC8nDoy89m+pt79J8fQ
+/AYuNdnVnleDZn5bPpisXNniZnPGmTwoX02MvPZudUbHmr81y8RA6Pn/ZN7
rQOZ+Wyg6m2FS3R95rOtFxL+fcVHZj6rcNRee/EX6ieIhfsHRZTbucjMZ209
zhgfOU7nFwsrvXabtH1GZj7782DPPzLDqD4VB+PzVBvF+nA981lFGQ0X8YnU
fxEHj53b0helITOffdTrpL/Xmfox4uDd20vCtaJYn2M+axEz98s9qk8yn11/
9oxapwqOM58tas+xnrSM3tfHQ4Pc5KVrKD7ms9uLTBQLl1L/Rjx02ctPCazH
/ZnP7g9Smt+gTf0czI+lLgkpOuH1mM+G5voLh+dQvTABKp13urX7ITOf/Ta9
3dekgPodEiBWz8FuZxoy89mV9j/nRf5D558AQ1R/dm36hN8X5rMvPtulNeym
80+EhADZhWMu4Xrms1PHL9cedZPqoYmgaJyhIL0EmfnsurI+lf0l1C+SCGlv
N86THILjzGd9bF+Pv5pP9cYkKDGtaWybR+/nk6C7/tiWQimqPyZBcMVllfXX
cD3z2d+xijWJw6i/IglcV46ffIu+T8xnn+mMq9eKpOeZA3+GrLz7zArnM58d
pWt5+esA9V9woH5/aMj4emTmsx+2R210mEv1Sw5UiGbvMPJBZj77LHDPjt/2
VM9MBt1iW9vOKjr/ZLhdPiYor4fOPxmmljZ0eg3H+cxnX7Tfutt4ks4/GbZ/
VAsNrUdmPtt9UHHsTF2qfyUDlN1eVitC9awUqHuSm91M9V3ms4qRrfuK0qg/
IwWaLzT+6jpL9eEUED034NOmReefAi+y9XTv+lK9OAVsuU23l1J9kvnsrcqt
9zKqqH6cCu0On9Zck6F6Vips/zad07uS6lmpcPDU2oupRbie+Wz22Dkr+6dR
fTEVYPWnhjF0PeazBY9WJLw2oXpjGhQuPz9hF/VLMJ9Vtk8OepdM/TRpUBKn
KL82AdcznxVqNDqaYE71yDTwvW97ZeRZ6s9IA22fNaWf6frMZ8WXttnPqsD1
zGd3WGQf2q9H9Urmp0cmOa44SP0Z6SCxKVCp1pnql+nwdlrXxOne1J+RDh+G
zFIKoXiYzyZ/G6IuN5T6M7hQ2pJdWCJB9U0uZH6zy+t/QefPhUtZy6+ZJ1G9
kwuP2ovD5oyk9/NcUJCb17O6mc6fC5KrrVOjlXGc+ayNqOjWp1OonpkBc23k
b1wLxvnMZ82CcuefzKT6cAaEHR0u3xBM9cwMWGkePHZbAdVLM2Df80j5l9fx
+8d8NjWocGvbfPq+8cD9upeZmz6uZz57NqTJ9u4y2p8Hg5oH3XXnIjOfDRHe
qd62meqrPFC9mOTvOQyZ+Wz+kulLtifS/fGg/OEZ3l4dHGc+e7bIS117At0v
D3Z2zk+qoviZzy4qL3k/yoLqsTyY9+n9xqxbeD3ms82qGj9VFKk+mwnjDl7v
1evAceazRw7MO/yU7of5rJb31lnvruI489mQ29ZGQgrIzGftw30n36P+Huaz
52PmcRYdpXp6JgTPFf1uMAWZ+exG92nT/qtnM599t1Ou8OJtZOazLcWRph/O
0PORCQ55cvIedB7MZ2+YCN3Km0T9LJnwqt73F28dMvPZi8uEt+nT+wDms2+l
jUetpr8XzGd1SiWu69H7B+azJi7i32YNx3iZz05dmb5o/w6q72fBd0k90T3n
8fvJfJb7xZgvQv1YzGdvFPyuypmFzHz2erlmFmcf9fdlgYrutZql75CZz3Jd
pauOmOJ85rNjpT5Ybb2A48xnH4wYIlc6lPLNbDCQqTYLG0BmPrtW73yPCOUr
zGfrtYKfaXTieuazsgbKoz8+p9/vbHCK8ywcDMJ8nfns55jXLZpKyMxnDfsz
5Q5Q/s18lhdjnFZxj/K5bFg/2jp1cS2OM59tOxfyfUAC/Yb5bN0nZVuPNGTm
s27x6tIj9lF/Kh94+fU31p5EZj57q/zbKr9teL/MZ6/e2Lredh0y89k8/YYP
70/Q7wMfOLcq9etKkZnPOs7ZFSrmSPkCH1buzXGr4+P1mc/azIu3qxxP+TUf
+NMvvAseivOZz7726T7MdaV+Lz5M8XS6e3E9ngfz2bXXI4N1kygf58NemfPD
ZMgnmM+CYftTvxzKXwX9xoJ+Y0G/saDfWNBv/Pc8BP3Ggn5jQb+xoN9Y0G/8
9/wF/caCfmNBv7Gg31jQb/z3/AT9xoJ+Y0G/saDfWNBv/Pf8BP3Ggn5jQb+x
oN9Y0G/89/wF/caCfmNBv7Gg31jQb/x3f0G/saDfWNBvLOg3FvQb/z1vQb+x
oN9Y0G8s6DcW9Bv/jwX9xoJ+Y0G/8f8X/cb/BzHGc6E=
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1VOUGAYQBdDdjW1zY9u2ubGTjbmxbdu2bdusmbRJG7RJG9s3Jx935vd9
vDkTHBoW0i0oICAgkN+M37nODf7gT25yi7/4m9vc4S73+Id/uc8D/uN/HvKI
xzzhKc94zgte8orXvOEt73jPBz7y6UswAQMJIhzhiUBEIhGZKEQlGtGJQUxi
EZs4xCUe8UlAQhKRmCQkJRnJSUFKUpGaYNKQlnSkJwMZyURmspCVbGQnBznJ
RW7ykJd85KcABSlEYYpQlGIUpwQlKUVpylCWcpSnAhWpRGWqUJVqVKcGNalF
bUKoQ13qUZ8GNKQRjWlCU5rRnBa0pBWhtKYNbWlHezrQkU50pgtd+VKsMLrT
g570ojd96Es/+jOAgQxiMEMYyjCGM4KRjGI0YxjLOMYzgYlMYjJTmMo0pjOD
mcxiNnOYyzzms4CFLGIxS1jKMpazgpWsYjVrWMs61rOBjWxiM1vYyja2s4Od
7GI3e9jLPvZzgIMc4jBHOMoxjnOCk5ziNGc4y7mgr3f7K7/wMz/xIz/wPd/x
Ld9wjatc4TKXuMgFznOOs5zhNKc4yQmOc4yjHOEwhzjIAfazj73sYTe72MkO
trONrWxhM5vYyAbWs461rGE1q1jJCpazjKUsYTGLWMgC5jOPucxhNrOYyQym
M42pTGEyk5jIBMYzjrGMYTSjGMkIhjOMoQxhMIMYyAD604++9KE3vehJD7oT
Rje60oXOdKIjHWhPO9rShtaE0oqWtKA5zWhKExrTiIY0oD71qEsdQqhNLWpS
g+pUoypVqEwlKlKB8pSjLGUoTSlKUoLiFKMoRShMIQpSgPzkIy95yE0ucpKD
7GQjK1nITCYykoH0pCMtaQgmNalISQqSk4ykJCExiUhIAuITj7jEITaxiEkM
ohONqEQhMpGISATCE44gAgO/PslP1kc+8J53vOUNr3nFS17wnGc85QmPecRD
PgPZM+Oy
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 
             136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 
             149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 161, 
             162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 
             175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 
             188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200, 
             201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211, 212, 213, 
             214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 
             227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0lNjFgAAQNFv2bbXsm23tZZbdi1z2dzCsm3btm3jP2S708N5vU83OCo6
clBQIBB4zRve8o73fOAjn/jMF77yje/84Ce/+M0f/hIQDCIe8UlAQhKRmCQk
JRnJSUFKUpGaNKQlHenJQEYykZksZCUb2clBTnKRmzwEk5cQ8pGfAhSkEIUp
QlGKUZwSlKQUpSlDWcpRngpUpBKVqUJVqlGdGtSkFrWpQ11CCaMe4dQnggY0
pBGNaUJTmtGcSFrQkla0pg1taUd7OtCRTnSmC13pRhTd6UFPetGbPvSlH/0Z
wED+jxDNYIYwlGEMZwQjGcVoxjCWcYxnAhOZxGSmEEMsU5nGdGYQx0xmMZs5
zGUe81nAQhaxmCUsZRnLWcFKVrGaNaxlHevZwEY2sZktbGUb29nBTnaxmz3s
ZR/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGbO9zl
Hvd5wEMe8ZgnPOUZz3nBS17xDwZKchA=
             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwVzlN7kAEAQOFvy7a5bNvLxrJrWVu2l23btu1+RDaX7beL93nO5QmLjI6I
CgmCIJZb4jZ3uMs97vOAhzziMU94yjOe84KXvOI1sbzhLe94zwc+8onPfOEr
3/jOD37yi9/84e//sdAgCCGUOMQlHvFJQEISkZgkJCUZyUlBSlKRmjSkJR3p
yUBGMpGZLGQlG9nJQU7CyEVu8pCXfOSnAAUpRGGKUJRiFKcEJSlFacpQlnKU
pwIVqURlqlCValSnBuHUpBa1qUNd6lGfBjSkEY1pQlOa0ZwWRNCSVrSmDW1p
R3s60JFOdKYLXelGdyLpQU960Zs+9KUf/RnAQAYRRTSDGcJQhjGcEYxkFKMZ
w1jGMZ4JTGQSk5nCVGKYxnRmMJNZzGYOc5nHfBawkEUsZglLWcZyVrCSVaxm
DWtZx3o2sJFNbGYLW9nGdnawk13sZg972cd+DnCQQxzmCEc5xnFOcJJTnOYM
ZznHeS5wkUtc5gpXucZ1bnCTfyTRdFM=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {3., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {3.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {4., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {2500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {3000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {3500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{34., 5.000000000000057}, {23.00000000000003, 
       4.000000000000142}},
      LabelStyle->Directive[Bold, 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.806497439946908*^9, 3.8064974616588507`*^9}, {
   3.806499250502756*^9, 3.8064992862701187`*^9}, 3.806500679551652*^9, {
   3.806501009226698*^9, 3.806501041262042*^9}, 3.806563157256562*^9, 
   3.8065631955980434`*^9, 3.8065632889715967`*^9, 3.806563319445115*^9, 
   3.8065633554029703`*^9, 3.806563466984619*^9, 3.806563590097687*^9, 
   3.8065638336863756`*^9, 3.8065638786222243`*^9, 3.80656394668324*^9, 
   3.806564087490744*^9, 3.806564137368206*^9, 3.8065642821363115`*^9, {
   3.8065644171635046`*^9, 3.8065644470705376`*^9}, 3.806564962074894*^9, 
   3.8065650072251697`*^9, 3.8065654227881327`*^9, 3.8065655776390233`*^9, 
   3.8065656259947286`*^9, 3.806565811161101*^9, 3.8065658491505475`*^9, {
   3.806565899604643*^9, 3.8065659339518013`*^9}, 3.8065659716978755`*^9, {
   3.806566140659077*^9, 3.806566158216154*^9}, {3.806566189112535*^9, 
   3.8065662160090446`*^9}, 3.806566262889699*^9, {3.8065663308679304`*^9, 
   3.8065663514040203`*^9}, {3.8065664985226545`*^9, 3.806566513850643*^9}, {
   3.806566563748225*^9, 3.8065665729646044`*^9}, {3.806566731011936*^9, 
   3.806566735016223*^9}, 3.806566804294233*^9, 3.8065668380020986`*^9, {
   3.806566869662449*^9, 3.806566895931183*^9}, 3.8065670042601748`*^9, 
   3.8065670842643642`*^9, {3.806649542941402*^9, 3.8066495688685603`*^9}, 
   3.806915386828247*^9, 3.818431094095024*^9, 3.8184315556680484`*^9, 
   3.818431606147826*^9, {3.8184319714243526`*^9, 3.8184319904422674`*^9}, 
   3.8184323543045616`*^9, 3.8184324606423335`*^9, {3.8184324985885887`*^9, 
   3.8184325213941817`*^9}, 3.8184325579436507`*^9, 3.8184326652369986`*^9, 
   3.8184327139511833`*^9, 3.8184327624436197`*^9, 3.8184328115222034`*^9, {
   3.8184328467012773`*^9, 3.8184328710772047`*^9}, 3.818432902092268*^9, 
   3.818432965420371*^9, 3.818490896248736*^9, 3.818674489436151*^9, {
   3.8194553576212244`*^9, 3.8194553704301944`*^9}, 3.819793882545122*^9, 
   3.8197940144182644`*^9, 3.8197989895737963`*^9},
 CellLabel->
  "Out[796]=",ExpressionUUID->"ad44d07c-7987-48fc-9742-dbd0ea3b5cfc"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"f", " ", "=", " ", 
    RowBox[{"Fit", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"200", ",", " ", "0.038"}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"400", ",", " ", "0.069"}], "}"}], ",", 
        RowBox[{"(*", " ", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"800", ",", " ", "0.096"}], "}"}], ","}], "*)"}], 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"1", ",", "x"}], "}"}], ",", "x"}], "]"}]}], ";", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Show", "[", 
    RowBox[{
     RowBox[{"ListPlot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"200", ",", " ", "0.038"}], "}"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"400", ",", " ", "0.069"}], "}"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"800", ",", " ", "0.096"}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Blue", ",", 
          RowBox[{"PointSize", "[", "0.015", "]"}]}], "}"}]}], ",", " ", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}], ",", 
     RowBox[{"Plot", "[", 
      RowBox[{"f", ",", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", "0", ",", " ", "800"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", "Green", "}"}]}]}], "]"}]}], "]"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.806477973516572*^9, 3.806478018593045*^9}, {
   3.806478114977357*^9, 3.806478136267758*^9}, {3.8064784440335407`*^9, 
   3.8064784891848135`*^9}, {3.806478611613933*^9, 3.806478671146758*^9}, {
   3.8064787269684706`*^9, 3.806478729199506*^9}, 3.806478759202307*^9, 
   3.818431156983945*^9},ExpressionUUID->"252dd3f5-bd7a-431a-9f8c-\
2149a91dc803"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8225525774849205`*^9, 3.8225525826361446`*^9}, {
  3.8225526786609178`*^9, 
  3.822552699490213*^9}},ExpressionUUID->"07a4982c-395e-4dd2-a22c-\
04f995a26c96"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8225524657827983`*^9, 3.8225525098617477`*^9}, 
   3.8225526874444275`*^9},ExpressionUUID->"bff3a31e-6192-425d-8ffc-\
0eafab9427db"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8009441930066175`*^9, 
  3.8009441930175858`*^9}},ExpressionUUID->"0b3f2afa-771e-41a8-9344-\
84229373a9e0"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Repeating", " ", "the", " ", "above", " ", "with", " ", "stored", " ", 
   "growth"}], "*)"}]], "Input",
 CellChangeTimes->{{3.8008696011149487`*^9, 3.8008696133212876`*^9}, {
  3.8008891394910793`*^9, 3.800889157051093*^9}, {3.800971824648305*^9, 
  3.8009718310751314`*^9}, {3.822656568319273*^9, 3.8226565688947577`*^9}, {
  3.831882078699827*^9, 3.831882080385769*^9}},
 FontSize->72,ExpressionUUID->"d2a0a857-43ca-4de7-974e-74d3faf9ac34"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{
     RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", 
     "\"\<Data 2018\>\""}], "]"}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"importing", " ", "the", " ", "time"}], ",", " ", 
    RowBox[{
    "lengthm", " ", "width", " ", "and", " ", "thier", " ", "standard", " ", 
     "deviation"}]}], "*)"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"runIndx", " ", "=", "2"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Alpha]S", " ", "=", "1"}], ";"}], " ", 
  RowBox[{"(*", 
   RowBox[{
   "when", " ", "there", " ", "is", " ", "partial", " ", "stored", " ", 
    RowBox[{"growth", "."}]}], "*)"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dir", " ", "=", " ", "\"\<Data 2018\>\""}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Switch", "[", 
    RowBox[{"runIndx", ",", "1", ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "200"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "0.5"}], ";", " ", 
       RowBox[{"lastInd", " ", "=", " ", 
        RowBox[{"-", "1"}]}], ";"}], " ", "}"}], ",", " ", "2", ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", " ", "400"}], ";", " ", 
       RowBox[{"endTime", " ", "=", "0.46"}], ";", " ", 
       RowBox[{"lastInd", " ", "=", " ", 
        RowBox[{"-", "18"}]}], ";"}], "}"}], ",", "\[IndentingNewLine]", "3", 
     ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", "600"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "1"}], ";", "  ", 
       RowBox[{"lastInd", " ", "=", " ", 
        RowBox[{"-", "1"}]}], ";", " ", 
       RowBox[{"dir", " ", "=", " ", "\"\<Data 8-3-2021\>\""}]}], "}"}], ",", 
     "4", ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"shockMagnitude", " ", "=", "800"}], ";", " ", 
       RowBox[{"endTime", " ", "=", " ", "1"}], ";", "  ", 
       RowBox[{"lastInd", " ", "=", " ", 
        RowBox[{"-", "1"}]}], ";"}], "}"}]}], "]"}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{"I", "'"}], "ve", " ", "removed", " ", "the", " ", "last", " ", 
     "bit", " ", "of", " ", "data", " ", "in", " ", "the", " ", "400", " ", 
     "mM", " ", "shock", " ", "since", " ", "there", " ", "seems", " ", "to", 
     " ", "be", " ", "a", " ", "drop", " ", "that", " ", "happens", " ", "in",
      " ", "both", " ", "length", " ", "and", " ", "width", " ", 
     RowBox[{"simultaneously", ".", " ", "\[IndentingNewLine]", "Not"}], " ", 
     "sure", " ", "what", " ", "the", " ", "cause", " ", "is"}], ",", " ", 
    RowBox[{
    "could", " ", "be", " ", "a", " ", "drop", " ", "in", " ", "external", 
     " ", "pressure", " ", "somehow", " ", "or", " ", "cell", " ", 
     RowBox[{"crowding", ".", " ", "In"}], " ", "any", " ", "case"}], ",", 
    " ", 
    RowBox[{
     RowBox[{
     "the", " ", "long", " ", "term", " ", "average", " ", "growth", " ", 
      "rate", " ", "in", " ", "the", " ", "400", " ", "shock", 
      "\[IndentingNewLine]", "seems", " ", "to", " ", "be", " ", "recovered", 
      " ", "\[Delta]\[Lambda]"}], " ", "=", " ", 
     RowBox[{
     "0", " ", "as", " ", "shown", " ", "in", " ", "the", " ", "SI", " ", 
      "figure", " ", "that", " ", "calculates", " ", 
      RowBox[{"that", "."}]}]}]}], "  ", "*)"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{
     RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", "dir"}], "]"}], 
   ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"time", " ", "=", " ", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"Import", "[", 
       RowBox[{"\"\<time_LBto\>\"", " ", "<>", " ", 
        RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
        "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}], "[", 
    RowBox[{"[", 
     RowBox[{";;", "lastInd"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"avgLength", " ", "=", 
   RowBox[{
    RowBox[{"(", " ", 
     RowBox[{
      RowBox[{"Import", "[", 
       RowBox[{"\"\<avgLength_LBto\>\"", " ", "<>", " ", 
        RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
        "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}], "[", 
    RowBox[{"[", 
     RowBox[{";;", "lastInd"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"stdLength", " ", "=", " ", 
   RowBox[{
    RowBox[{"(", " ", 
     RowBox[{
      RowBox[{"Import", "[", 
       RowBox[{"\"\<stdLength_LBto\>\"", " ", "<>", " ", 
        RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
        "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}], "[", 
    RowBox[{"[", 
     RowBox[{";;", "lastInd"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"avgWidth", "=", 
   RowBox[{
    RowBox[{"(", " ", 
     RowBox[{
      RowBox[{"Import", "[", 
       RowBox[{"\"\<avgWidth_LBto\>\"", " ", "<>", " ", 
        RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
        "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}], "[", 
    RowBox[{"[", 
     RowBox[{";;", "lastInd"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"stdWidth", "=", " ", 
    RowBox[{
     RowBox[{"(", " ", 
      RowBox[{
       RowBox[{"Import", "[", 
        RowBox[{"\"\<stdWidth_LBto\>\"", " ", "<>", " ", 
         RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
         "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}], "[", 
     RowBox[{"[", 
      RowBox[{";;", "lastInd"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]",
   "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"indexOfShock", " ", "=", " ", "32"}], ";"}], " ", 
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "index", " ", "where", " ", "the", " ", "shock", " ", "is", 
    " ", "applied"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "parameter", " ", "for", " ", "the", " ", "low", " ", "pass", " ", 
     "filter"}], ",", " ", 
    RowBox[{"level", " ", "of", " ", "smoothing"}]}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filterSize", " ", "=", " ", "1"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredLength", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{"avgLength", ",", " ", "filterSize"}], "]"}]}], "}"}], " ", "//",
     "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredLSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"avgLength", " ", "+", " ", "stdLength"}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"time", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"avgLength", " ", "-", " ", "stdLength"}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredWidth", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{"avgWidth", ",", " ", "filterSize"}], "]"}]}], "}"}], " ", "//",
     "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"filteredWSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"avgWidth", " ", "+", " ", "stdWidth"}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredWSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"time", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"avgWidth", " ", "-", " ", "stdWidth"}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "plotting", " ", "the", " ", "filtered", " ", "data", " ", "with", " ", 
    "condience", " ", "intervals", " ", "for", " ", "width", " ", "and", " ", 
    "length"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"p1", " ", "=", " ", 
   RowBox[{"ListLinePlot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"filteredLength", ",", "filteredLSTD1", ",", "filteredLSTD2"}], 
      "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
        " ", "None"}], "}"}]}], ",", " ", 
     RowBox[{"Filling", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"3", "\[Rule]", 
        RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
     RowBox[{"FillingStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}]}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"p2", " ", "=", " ", 
   RowBox[{"ListLinePlot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"filteredWidth", ",", "filteredWSTD1", ",", "filteredWSTD2"}], 
      "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
        " ", "None"}], "}"}]}], ",", " ", 
     RowBox[{"Filling", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"3", "\[Rule]", 
        RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
     RowBox[{"FillingStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}]}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"GraphicsRow", "[", 
   RowBox[{"{", 
    RowBox[{"p1", ",", "p2"}], "}"}], "]"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "Solving", " ", "for", " ", "the", " ", "initial", " ", "growth", " ", 
    "rate"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"lengthvsTime", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"time", ",", " ", "avgLength"}], "}"}], "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"p1", " ", "=", " ", 
   RowBox[{"ListLinePlot", "[", 
    RowBox[{
     RowBox[{"lengthvsTime", "[", 
      RowBox[{"[", 
       RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", "Red", "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"form", " ", "=", "  ", 
   RowBox[{"LL0", " ", 
    RowBox[{"Exp", "[", 
     RowBox[{"RR0", " ", 
      FractionBox[
       RowBox[{"t", " ", "-", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], 
       RowBox[{
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "1", "]"}], "]"}]}]]}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"fit", " ", "=", " ", 
   RowBox[{"FindFit", "[", 
    RowBox[{
     RowBox[{"lengthvsTime", "[", 
      RowBox[{"[", 
       RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", "form", ",", " ", 
     RowBox[{"{", 
      RowBox[{"LL0", ",", " ", "RR0"}], "}"}], ",", " ", "t", ",", " ", 
     RowBox[{"PrecisionGoal", "\[Rule]", "Infinity"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"R0", " ", "=", " ", 
   FractionBox[
    RowBox[{"fit", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "2"}], "]"}], "]"}], 
    RowBox[{
     RowBox[{"time", "[", 
      RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
     RowBox[{"time", "[", 
      RowBox[{"[", "1", "]"}], "]"}]}]]}], " ", ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"p2", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"form", " ", "/.", "fit"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"time", "[", 
         RowBox[{"[", "1", "]"}], "]"}], ",", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "}"}]}], "]"}]}], ";"}],
   "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"p2", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"Fit", "[", 
         RowBox[{
          RowBox[{"lengthvsTime", "[", 
           RowBox[{"[", 
            RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"1", ",", "y"}], "}"}], ",", "y"}], "]"}], "/.", 
        RowBox[{"y", "\[Rule]", "x"}]}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", 
         RowBox[{"time", "[", 
          RowBox[{"[", "1", "]"}], "]"}], ",", 
         RowBox[{"time", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "}"}]}], "]"}]}], 
    ";"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Show", "[", 
    RowBox[{"p1", ",", " ", "p2", ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Nondimensionalzing", " ", "the", " ", "width"}], ",", " ", 
    RowBox[{"length", " ", "and", " ", 
     RowBox[{"time", ".", " ", "The"}], " ", "normalized", " ", "quantities", 
     " ", "correspond", " ", "to", " ", "\[Delta]L", 
     RowBox[{"(", "t", ")"}], " ", "and", " ", "\[Delta]A", 
     RowBox[{"(", "t", ")"}]}]}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"normalizedTime", " ", "=", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"time", " ", "-", " ", 
       RowBox[{"time", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}]}], 
   ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"normalizedLength", " ", "=", " ", 
    FractionBox[
     RowBox[{"avgLength", " ", "-", " ", 
      RowBox[{"Exp", "[", "normalizedTime", "]"}]}], 
     RowBox[{"Exp", "[", "normalizedTime", "]"}]]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{"widFit", "[", "n_", "]"}], ":=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"widForm", " ", "=", 
          RowBox[{"W0", " ", 
           RowBox[{"Exp", "[", "G0", "]"}]}]}], ";", "\[IndentingNewLine]", 
         RowBox[{
          RowBox[{"widForm", "/.", " ", 
           RowBox[{"FindFit", "[", 
            RowBox[{
             RowBox[{"avgWidth", "[", 
              RowBox[{"[", 
               RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", "widForm", 
             ",", 
             RowBox[{"{", 
              RowBox[{"W0", ",", " ", "G0"}], "}"}], ",", "x"}], "]"}]}], "/.", 
          RowBox[{"x", "\[Rule]", "n"}]}]}], ")"}], "\[IndentingNewLine]", 
       "\[IndentingNewLine]", "normalizedWidth"}], " ", "=", " ", 
      RowBox[{"avgWidth", " ", "-", 
       RowBox[{"1", 
        RowBox[{"widFit", " ", "/@", 
         RowBox[{"Range", "[", 
          RowBox[{"time", "//", "Length"}], "]"}]}]}]}]}]}], ";"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"widFit", "[", "n_", "]"}], ":=", " ", 
  RowBox[{
   RowBox[{"Fit", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"LowpassFilter", "[", 
       RowBox[{"avgWidth", ",", "filterSize"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{
        RowBox[{"indexOfShock", "-", "20"}], ";;", "indexOfShock"}], " ", 
       "]"}], "]"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"1", ",", "x"}], "}"}], ",", "x"}], "]"}], "/.", 
   RowBox[{"x", "\[Rule]", "n"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"normalizedWidth", " ", "=", " ", 
    FractionBox[
     RowBox[{"avgWidth", "  ", "-", " ", 
      RowBox[{"widFit", " ", "/@", 
       RowBox[{"Range", "[", 
        RowBox[{"time", "//", "Length"}], "]"}]}]}], 
     RowBox[{"widFit", " ", "/@", 
      RowBox[{"Range", "[", 
       RowBox[{"time", "//", "Length"}], "]"}]}]]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"normalizedLenData", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", "normalizedLength"}], "}"}], "//", 
    "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLenData", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{"normalizedLength", ",", "filterSize"}], "]"}]}], "}"}], "//",
      "Transpose"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nFilteredLSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"normalizedLength", " ", "+", " ", 
         FractionBox["stdLength", 
          RowBox[{"Exp", "[", "normalizedTime", "]"}]]}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"nFilteredLSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"normalizedLength", " ", "-", " ", 
          FractionBox["stdLength", 
           RowBox[{"Exp", "[", "normalizedTime", "]"}]]}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"normalizedWidData", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", "normalizedWidth"}], "}"}], "//", 
    "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredWidData", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{"normalizedWidth", ",", "filterSize"}], "]"}]}], "}"}], "//", 
     "Transpose"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"nFilteredWSTD1", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"normalizedTime", ",", " ", 
      RowBox[{"LowpassFilter", "[", 
       RowBox[{
        RowBox[{"normalizedWidth", " ", "+", " ", "stdWidth"}], ",", " ", 
        "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"nFilteredWSTD2", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"normalizedTime", ",", " ", 
       RowBox[{"LowpassFilter", "[", 
        RowBox[{
         RowBox[{"normalizedWidth", " ", "-", " ", "stdWidth"}], ",", " ", 
         "filterSize"}], "]"}]}], "}"}], " ", "//", "Transpose"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"GraphicsRow", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ListLinePlot", "[", 
       RowBox[{"filteredLenData", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{"indexOfShock", "-", "5"}], ";;"}], "]"}], "]"}], "]"}], 
      ",", 
      RowBox[{"ListLinePlot", "[", 
       RowBox[{"filteredWidData", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{"indexOfShock", "-", "20"}], ";;"}], "]"}], "]"}], "]"}]}], 
     "}"}], "]"}], "*)"}]}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.800801514797951*^9, 3.8008015520210733`*^9}, {
   3.8008023889325933`*^9, 3.8008024129714265`*^9}, {3.8008024649324017`*^9, 
   3.800802510997134*^9}, 3.800802592901041*^9, {3.800802650460576*^9, 
   3.8008026597636595`*^9}, {3.8008026938768077`*^9, 3.800802697602808*^9}, {
   3.800802743100297*^9, 3.800802779293481*^9}, {3.8008042219531345`*^9, 
   3.8008042273835807`*^9}, {3.8008042618655777`*^9, 3.800804269504449*^9}, {
   3.800808164466332*^9, 3.800808177720869*^9}, {3.8008580592101793`*^9, 
   3.800858180087551*^9}, {3.8008590019840713`*^9, 3.8008590067672796`*^9}, {
   3.8008590612564807`*^9, 3.800859065638748*^9}, {3.8008606220527287`*^9, 
   3.8008606590756645`*^9}, {3.800862043331088*^9, 3.800862047793149*^9}, {
   3.800863139759828*^9, 3.800863144127164*^9}, {3.800866917754052*^9, 
   3.80086698783954*^9}, {3.800868893363325*^9, 3.8008689271319456`*^9}, {
   3.8008695287316594`*^9, 3.800869529852652*^9}, 3.800869595587738*^9, {
   3.8008747092971497`*^9, 3.8008747566334925`*^9}, {3.800874797035385*^9, 
   3.800874821361271*^9}, {3.8008748635374436`*^9, 3.800874901689356*^9}, {
   3.8008749937770905`*^9, 3.800875046599905*^9}, 3.800875123963922*^9, {
   3.8008754244670787`*^9, 3.8008754598404083`*^9}, {3.8008834335690565`*^9, 
   3.800883438744207*^9}, {3.8008835871622095`*^9, 3.800883594031849*^9}, {
   3.8008836379862423`*^9, 3.8008836464874926`*^9}, 3.8008837715708*^9, {
   3.800883803457456*^9, 3.800883805126014*^9}, 3.8008841096397505`*^9, {
   3.8008842307447863`*^9, 3.8008842309272747`*^9}, {3.800884382255458*^9, 
   3.80088438376542*^9}, {3.800944459919449*^9, 3.8009444626850476`*^9}, {
   3.8009468231882973`*^9, 3.8009468281141014`*^9}, {3.8009468994951344`*^9, 
   3.8009469118909583`*^9}, {3.8009520808162117`*^9, 
   3.8009521027515154`*^9}, {3.8009529874953084`*^9, 3.8009529879969654`*^9}, 
   3.800953033519191*^9, {3.800962101509973*^9, 3.80096221881931*^9}, {
   3.800962278494641*^9, 3.8009623130950584`*^9}, {3.800962359988579*^9, 
   3.8009624688772187`*^9}, {3.800962605996608*^9, 3.800962609693738*^9}, {
   3.800962667645674*^9, 3.80096267344214*^9}, {3.8009627918911314`*^9, 
   3.8009627973216248`*^9}, {3.800962858260562*^9, 3.8009628588011246`*^9}, {
   3.8009718351093364`*^9, 3.8009718379876347`*^9}, {3.800972509990102*^9, 
   3.8009725124355536`*^9}, {3.801036022697962*^9, 3.8010360376400013`*^9}, {
   3.8010361096423426`*^9, 3.8010361119042673`*^9}, {3.8010361569607353`*^9, 
   3.80103626645575*^9}, {3.801036333026626*^9, 3.8010363355837564`*^9}, {
   3.801040924286132*^9, 3.801040952662174*^9}, {3.8010409939207764`*^9, 
   3.8010411133781366`*^9}, 3.801041624767787*^9, {3.8011268147264795`*^9, 
   3.801126819017009*^9}, {3.801126897323662*^9, 3.8011269052893677`*^9}, 
   3.801126969267363*^9, 3.8063880940604477`*^9, {3.80639011281149*^9, 
   3.8063901142337074`*^9}, {3.806395121872664*^9, 3.8063951244417944`*^9}, 
   3.806395318178528*^9, 3.806395740955209*^9, {3.806395844618513*^9, 
   3.806395845469207*^9}, {3.806395903995714*^9, 3.8063959050588737`*^9}, 
   3.806395960652224*^9, 3.8064792749869394`*^9, 3.8064793315816183`*^9, 
   3.8065007436366453`*^9, 3.806500879723011*^9, 3.8065011206258354`*^9, 
   3.806502410884492*^9, {3.806504100576786*^9, 3.80650412506431*^9}, {
   3.806506051394265*^9, 3.8065060527805705`*^9}, {3.806506126221196*^9, 
   3.806506126456564*^9}, {3.806506567026551*^9, 3.8065065923458557`*^9}, 
   3.8065071167023683`*^9, 3.8065071491755133`*^9, {3.8065076627829075`*^9, 
   3.806507663588752*^9}, {3.8065077135312157`*^9, 3.8065077313954487`*^9}, 
   3.80650779334291*^9, {3.806507858129687*^9, 3.8065078586771955`*^9}, {
   3.8065078919223623`*^9, 3.8065078922446084`*^9}, 3.806507962045538*^9, 
   3.806566075002654*^9, {3.8066456667055597`*^9, 3.806645669230826*^9}, {
   3.806645699540763*^9, 3.8066457347855244`*^9}, {3.8066462531938896`*^9, 
   3.8066462757477407`*^9}, 3.806646797618827*^9, 3.806915518317671*^9, 
   3.8184335034918785`*^9, {3.818433535752937*^9, 3.818433537099573*^9}, {
   3.8184349167040963`*^9, 3.818434917645965*^9}, 3.818435823609682*^9, 
   3.8184359056669426`*^9, 3.8184361252121763`*^9, {3.818495233961505*^9, 
   3.8184952342242393`*^9}, {3.8198032691632905`*^9, 
   3.8198032702643456`*^9}, {3.8215428555830245`*^9, 3.8215428624935446`*^9}, 
   3.821610400201214*^9, 3.8216139289780884`*^9, {3.8216139928004436`*^9, 
   3.821613995031474*^9}, 3.8217149362681656`*^9, 3.8217164013246083`*^9, {
   3.821716494363395*^9, 3.821716494426227*^9}, {3.8217204262492285`*^9, 
   3.8217204272163486`*^9}, {3.821720542396449*^9, 3.821720543463479*^9}, {
   3.822468563896555*^9, 3.8224685669493914`*^9}, {3.8224716059340363`*^9, 
   3.8224716082608156`*^9}, 3.8225558202144566`*^9, 3.8225566064214907`*^9, {
   3.8226566019546037`*^9, 3.822656602136095*^9}, 3.8229830863344684`*^9, 
   3.822984863604987*^9, 3.8229851055630774`*^9, {3.8229851543953686`*^9, 
   3.8229851561068125`*^9}, 3.8230841806873*^9, {3.8233270706434975`*^9, 
   3.8233270730167933`*^9}, 3.8233273147474136`*^9, 3.823327492810766*^9, 
   3.8233283102347345`*^9, 3.8233317464478855`*^9, 3.823331833031596*^9, 
   3.823425886850991*^9, {3.8260328767119465`*^9, 3.8260329025273914`*^9}, {
   3.8260329526311197`*^9, 3.8260329815891547`*^9}, {3.8260330264152336`*^9, 
   3.8260330340846424`*^9}, {3.826033173102955*^9, 3.8260331749966955`*^9}, 
   3.826033267293388*^9, {3.8260338292201385`*^9, 3.8260338383475847`*^9}, {
   3.826033989886585*^9, 3.8260340075651965`*^9}, 3.826034654044869*^9, 
   3.826096889722331*^9, {3.826097283201393*^9, 3.8260972858311143`*^9}, {
   3.826097625823699*^9, 3.8260976316785345`*^9}, {3.8260976732248025`*^9, 
   3.8260976754463115`*^9}, 3.8260981211121516`*^9, 3.8307593268301888`*^9, 
   3.830759365583828*^9, 3.8317066423497844`*^9, {3.8317068295281563`*^9, 
   3.831706833445712*^9}, 3.831707295320484*^9, 3.8317074041722775`*^9, 
   3.8317959815979843`*^9, 3.831796138541186*^9, 3.831796221738476*^9, {
   3.8317963100522337`*^9, 3.831796335249404*^9}, {3.8317963661523294`*^9, 
   3.831796446865306*^9}, 3.8318045351386285`*^9, {3.8318046992754974`*^9, 
   3.83180469939815*^9}, 3.831804829535215*^9, 3.831804879038088*^9, {
   3.8318066680610714`*^9, 3.831806673133262*^9}, {3.8318819632912097`*^9, 
   3.831881965563018*^9}, {3.8318820278123207`*^9, 3.8318820543202543`*^9}, {
   3.83188209059377*^9, 3.8318821163195834`*^9}, {3.8318821641320205`*^9, 
   3.8318821886863456`*^9}, 3.831882219664119*^9, {3.8318827557317557`*^9, 
   3.831882768505008*^9}, {3.831882817898299*^9, 3.831882852302101*^9}, {
   3.8318830196861887`*^9, 3.831883020576614*^9}, 3.831903821692417*^9, {
   3.8319038901513977`*^9, 3.831903890497552*^9}, 3.8319040806818724`*^9, 
   3.831968992194231*^9, 3.8319690665268803`*^9, {3.832059314054336*^9, 
   3.8320593142906027`*^9}, {3.832170202874442*^9, 3.832170356872483*^9}, 
   3.8321704811308956`*^9, 3.832175464081764*^9, 3.8321756591071367`*^9, 
   3.832175726618925*^9, 3.832175880643736*^9, 3.832243115337243*^9, 
   3.832309740952331*^9, 3.832309956995339*^9, 3.8323100145465717`*^9, 
   3.8323209817562237`*^9, 3.832408458401993*^9, {3.8343892319932737`*^9, 
   3.8343892854257383`*^9}, 3.834390175771916*^9, 3.8343903751086273`*^9, 
   3.834728406879119*^9, {3.834734704208307*^9, 3.8347347043579063`*^9}, {
   3.8347347424412327`*^9, 3.8347347427703705`*^9}, 3.8347348660968513`*^9, 
   3.834738234323766*^9, {3.837063322806378*^9, 3.837063458698704*^9}, 
   3.837064033614241*^9, 3.839755622128025*^9, 3.8397556707194357`*^9, 
   3.8478715062783833`*^9, 3.84787159829438*^9, 3.8484119818254232`*^9, 
   3.8500329796297445`*^9, 3.850291029007645*^9, 3.850291097145256*^9, {
   3.850293576332982*^9, 3.8502937161821012`*^9}, 3.8503258805511007`*^9, 
   3.8503259743054943`*^9, {3.850540211068187*^9, 3.8505402141251974`*^9}, 
   3.8510555892489767`*^9, 3.8510557851034765`*^9, 3.8510558669651117`*^9, 
   3.851341892621951*^9, {3.85134225990439*^9, 3.851342260651803*^9}, 
   3.8513424749143095`*^9, 3.8513425494778056`*^9, 3.851342613524197*^9, 
   3.8513427645561233`*^9, 3.851584915172765*^9, 3.8515856318522*^9, 
   3.8515864884461765`*^9, {3.8515866275900197`*^9, 3.8515866401242447`*^9}, {
   3.8529709909982834`*^9, 3.852971010981281*^9}, 3.852971773866849*^9, {
   3.8529720284443874`*^9, 3.8529720946131525`*^9}, 3.8529721816197586`*^9, 
   3.8529724742596006`*^9, 3.8529726102179985`*^9, 3.852972687466957*^9, {
   3.8529727538910656`*^9, 3.852972781378048*^9}, {3.8529731464325705`*^9, 
   3.852973148344432*^9}, 3.8529733447780046`*^9, 3.8554801884214835`*^9, 
   3.8554802691106386`*^9},
 CellLabel->"In[1]:=",ExpressionUUID->"e5d49d2f-bb51-489d-aaeb-c5aff40e1517"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJztmfk/lVvUwE9pkHINSTRo0igqKlJpJVPllhINxmQo4zGWIY7hCMdwTCm6
JU0qoTQhIhXNkuaIW4gGGkxJvfu+1nr/iPdz/NLn+9nPevbZez/t9d17TbHz
2OgwmMPhKItxOP/9+39/Sx20219/XDEAyvD0+RlB+nfihVAf/6h70bhPyDrQ
eOmDdDAQ68Ht+nKzVlvi1WC+fFvqzb3E66BV4T70piDzNsA9KR2rlTnUvglm
Frxwqa+mdnNoksiu8B/0Gdu3gm1kc1n2PGSeBTgGH6p6Z0bt1rD+k8KZ4wHI
YAsNxhfERx+m57fDQbmgs67FyGV20LZl7jjTJxRvDw5jJtR/+kjxDjDRR+qt
3MgvGO8Iuc+NxCMXIJc5wZM6wYwbW5E5u6Djrtvv6AhkcAZJKf5VvasU7wLX
fTIMtn2meFeo7HaeITeuHePd4alYe0imLjJ4wC4ZqwMWrsRcWNtaErcoCbmB
C2bffdyq8pB5npCrN2PukTvIk73AUfv3Mu3XyGVesClWECK4jmzrDeFVo0Zs
NKT+fSCt0F4hIAV/X6YP/Ip4KHZeisbjC37jZItOfsD5afCFNOs2LacvNL9+
8PCeY41jN/Lk3fDKNOHx7SE03t2Qf3Fi3jV5ZNs9cNl05+rz02j+/CFnYb/V
mEXUvz+kHJ3ayzGn/gNgauDnueb+yA0BUCAcfORbLM1vIMQEOQmuCpEnB0GO
8buGGuKyIDjTuUGq8BD1vxdatyt29xVS/8Hg2rKx6Hod9R8MetWdSt7d1H8I
PHu52WekBM1/CHi2GEx2n0rrw4MnWyU41wFZyIMyLQmJxWb0PA/cVnBk7m5C
nh8KaUGt8SGraP1CwarE5mmcFnJ1KLwrSo+eqE/rGQYb5B9s9XFE5oaB/7U/
bvZxtL5h4LUubcz7YmTpcFjR9lljfietdzg07pFQXSDfMcD54fBAbcKwKzOR
ORHQY68gNn0RskkErOm617ZIFzkzAm483rSiYjVyRwR8TRg7+/caZOBD3UGV
aMMNyEI+xNT7eT23Qm7gw8nY7hlmO5HnR0K1ysK4Ux7IvEjgz+2ePy0EuToS
pFrEfpanI0/eB+nlBuHDi5C5+2DJFOn+hlrksn2wvyfsVNBHZOkoeOG0zeBb
P7JtFIR58WqMJL/i+KOgFo5+C1dC5kRD2gcDMXENZJNomOn3Z0G5HnJmNMiO
HitrtB65IxpKFxzqmm+KDDEgqTJrwpGtyMIY2NE86QzXE7khBpo/KnGL9yPP
FwC3sm2e3kVkngC0LTJaaiqQqwXQ5b3Fq+IR8uRYSHp058vzV8jcWIiM5A9N
aUQuiwVVbpHHxTZk6Ti43z8sM2fYNxx/HAjfx0Ws0ULOj4PyKMustS7InHhQ
Ku6t2SBANomHnRdGWHLSkTPjIdtzHbc3C7kjHvZcyVq5KBsZEmCXIkdJ7Syy
MAGmumjy7QuRGxJg78d7tvlPkRWEsNo9ZMGyLooXglyBy0/rsd8HeKcQAlxj
g0K1kYVCUPGeZ/vHFPmqEBI9pP0lHJAbhHDHJ2VYcwCyeCJYmB4fYnAQeX4i
CKXlbXiXkbckQsaOpX8tr0HmJUL6pZYayy/I2YlQ43lr63KxH7geiWDqW+ay
WAa5JxGeVtbp1cxGnpwEOg83PfMyQTZKgtaRgbkXnZG5STCuxK2M64Z8IAmU
LgzvebMTuSwJfvTy04JdkT8kgV2J09T3gcjSyfCp46biyQxkrWSw32Wjt/g6
sm0y5FpfqnJ5gByVDJOGGta030bOTwaZ9AP+bpXIL5Khqv1hWvFHZE4KZI6t
O3RatXOAZ6WAetJf/qcckE1S4NmkPXvjApD3pMBUheyKUiFyZgoU/VSO8T+P
XJUCC+ccuJV1FZn92bjetK1yof1WGaK9NFceSiReCGnHkwy+pRLrQJ3X8/yF
ycR64FVwrbHoNPFqUEiuNRAvIF4HCnlXYk5SfmB+sSFCcP30PGrfBFa5qxo2
G1C7OViKl/XJlFD7Vsj4yT+6ei7txxZw1jqhRNKB8qM1WCfZDrkdSfu9LeS9
rZ6tfYKe3w7hqS9TDEppP7aDnH0VY1RqKd4e/lp16V3jZ4p3gBWezyQFQ2j/
cwSNjx2OayVoP3MCnbqxv0cOo/15FzTZ1sqkKtJ+6wwbS/WEDtYU7wLBd51e
XDlK8a4gMP/zDzeP4t3h34MBY3KPUbwHaBSKT399mpgLmgpQrFRC+zUXPvwq
dnW9S+/3BIcDYdPv3KH92AuOXS44cSGf+vOCjuLygHdutN96w9/OHiFbaDzM
Lyx//Ult98DxM78wnpCXGq9H8+ELXE9f+R3ulC994Uel/ND7yTS/fvB6lqLu
u/OUD3fDsVz5uKZemu/dsNNYcZzGJOp/DziknbJcpkL9+8PDr2p/JZtSPvOH
Bom16neKafwB8Ke+2WmzKu3XAfBKQVvj5Q7anwNhVOzfW+dY0X4cBD+mLfUe
b0D7bxD8NbbirJ8+MvOLBcpfwuuMKb8Eg49DUdpgLconwdDToDnDfhjljxCY
Pnj9oLV9NP8hcCXb2axTk9p5EKL/Rk0rhPILD6Y/Xn/2Hp9+Lw/SRoqXnDGi
/BIK556pl2R30PqFwpasRyaCQsqvofB2ZelKxUe0nmHQZx24yJHGz/wiW0lN
YXoYjS8MXtzVuRGeRfklHEbdHmzyJp/GGw6CbHevJaWUX8NhWbeJVUgBjT8C
lDxntNy7Q/k1Anb5l5e1K1J+iYAoVeW3ajaUXyJg4pTzbnY7KT/w4cncIb8y
7Ci/8CH1a8rY9G2UX/iQZqr3aagaMvOLP34bBG/baf0iwW3QDSv7H5RfI8HA
Qsqg3BCfZ35xa/aJ4Mx4ZOYX3tKS6h8TkZlfyPuVv0vbj8z8Que+1mL315Rf
o2DCg65EZw3MH8wvNjausSq0RWZ+ETwje+gKH2TmF1d64yROxCAzv8iecKO+
Kw6Z+cVU/71gbI7M/OJWk26t5ijKhzHwfWlT/zM5yn8xoLiaM742nPKdACrH
+H6t/035TQBTHx6+Nt+Q8pkAnHnjQx/uoPwVCwKTDvFcc8pXsSAs3sRZL0f5
KRb6LnfKpzzG9zG/MPOV/z6iFZn5xfXy/Sufb6Z8EwfG/fbvTt6k/BIPIX2/
9KcMp3wSD0P0n2RGzqf8EQ+dutvz2hciM79osfTPuNyL8cwvtqV1euQWIDO/
qFU/Wvm1Cpn5hbb3v86/NDGe+YXavFM/lh1HZn6xpIynMvoDMvOL0erpRflK
Xfg+Iejk6jY+NkFmfmGpLK3a4o3M/ELqrbXuwQRk5hfHHq05vLEEmfnF/pd7
U4WDugeY+YVKm1ponzryf36hI8N3W4bM/ELRSOpUhwEy8wu+veFMKT9k5hcH
43/ctDyGzPxifIRrmP5BZOYXgQqDg6ptkJlfjN/ziuujj8z8QiWaV3rCEpn5
RWS8hck3D2TmF66bPdNf7EdmflFxxFEyZ0jPADO/mJ3WX/z3bmTmF+bT1DRs
TyAzv9j++NtT42xk5hez1ay7GguQmV+YHwgNT+9AZn5R+GmiVKdN7wAzv+DI
7rzRXoLM/GKM5nv9pFfIzC/W25ma3OhDZn5xOnlD3T6dnwPM/MIxZ2rQKkvk
/x4ZMUxO3rgVWRmmLFd6dsCMeCEo+4867X+YWAeaenq5lZ+J9WCiROWdsQpt
yKshqeXtO54R8TooDmvoWpuPzPxiVUbHzxez6H5kE3y/4tZtb4HM/MJNUiho
1Kf2raAsa9gwXIPaLUDp8OknhQbUbg1g8Hh9uDsy8wvpouSWj/vp+e2Qn6x0
I+kqMvOLmXNSlQJrKN4errWEvehupXgHKB3qlTVaku5THKH7RZ6u7zpk5heq
gz6YuJ6i+5ddIF+r/rL1KTLzi91HeSalBRTvAmGbnN7opVG8KwTqPpc2pOeZ
XzQ9+VD7fjndn3iAe352M4dPzIU5WX3HVc/Q/QEX3nzyHHT1Lt0feELqFkPJ
nD90f+AFYcNT1aTM6PzuBfcyk0eYHKPzuze4XtMe/Z18j/lFjd+d9CGFGM/8
4uznz55PXtF4fCGoIteqzQ6Z+YV2Z4nr4NU0Pj+ocL9o17YMmfmFTO9w+Wwp
Gu9uSKwWnzO6HeeX+cXRPaEvWzto/v2hhH/oyJAKZOYXzqp5cR4LaT0CwEhL
MqY/Db8f5hfn24XP1TfS9xQIPxs07Cc4ITO/8Nhg8to9FZn5xZKSiZURucjM
LzwCzZuXvaLvMxjaxRboB6yl/oMhvT7w68R/qf8Q2J4n08ybSOMPAZ+9V1O/
1lI7D87MssySDEdmfqH5yKek9jAy84scp45TOgoYz/yidq3bsXMnaP5CYeTi
ySOG/kZmfjHi29UE8U80n2GQ437MaIIXMvOL40uPnQ2Wp/kNg0XDz58sU0dm
fmFv9KzyVBQy8wuPJONHG94gM78ovf/Qqk6T7u8iIOu8nM4vQGZ+Yd6cM7un
Fp9nftH1UWJF3k5k5hcx/X1VGhb0ffDhnuTJuc0hyMwv+vefT599g+aLD24C
swojfXw/8wuDclWlt/X0/UaCZt4W8Zuj8XtkfnGxqcOC/5q+533w+kK1VB19
78wv+nfMEJ6j8wnzC5WuqGc3eMjML1qG9eR8Avreo+DBPLkZ6x5iPPOLbGiX
+ucqjT8abMzuDcp6R+OPhrlNjReK+un/QzT8ln0Roz4F38f8oqDWd6tKJt1v
xcC5hnFVo9bR/VUMnJxyKUfuEPl4DDhODIzRN6X7KwEs/Fb2ZuMTOk8JILN6
3vQ2+v3ML8Qezank7qb7uFjQ+MfgtFgpMvOL7izXMResyN9jwWp2SFWtGN3f
xAFEdhuvVyafj4Mdw/mVJQp0fxUHS+Q2be+QIb+Ph2sBXTZhUnR/FQ8PJsHY
AHof8wvLzKULxOh55hfisvdbCszJ/xNgT4bE/XNZdH+VANxjD3Sf0/mI+UXZ
jkvm9t7IzC8czm12X2pE8UJoP2F+54wBMvOLxpPBOhvp/cwv5LUmvJ27GZn5
xe0i6Vuq1M78gi9x9666IzLzC7nn/c5LfOm+LBEEhrmzuC7IzC8k6gwzgj3J
75kvzC2dbJyJzPwiNiNwVMx18v1EmBS5JN8qB5n5heygypuGdH5jfmGnsHxO
5nD0Y+YXm/98bzjgS+eBJFAcPEjaLRWZ+YXs6/gFctTO/MLOIb9eYhcy84vN
06zPtNvSeSEZxuhOm5Gpjsz8InNp+X0l6o/5xdD0Zda7O/H3ML94o5XxMKmJ
1jsZeoY++dXzCpn5hZbhhJw3zbT+KRCpe2iONZ2fmF/Yy16aZ0P3fcwvDoiP
uhQ1Dpn5ReeDX4uLp9N5LAXub+9Z7KKMzPyCky0pNXgMnV84ovqIqD4iqo+I
6iO4n4jqI6L6iKg+IqqPiOojA+2i+oioPiKqj4jqI6L6yMD4RfURUX1EVB8R
1UdE9ZGB/kX1EVF9RFQfEdVHRPWR/+X/R/WR/wGBqbhb
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0mV7FgQAheG9dHeHNEhINyggncLohtE1UGlFWrYBGxvdUtLdiNLd3aGg
IKA0WID3dfHhPucPPDlC+gaHxgoKCgqQxCQlGclJQUpSkZo0pCUd6clARjKR
mSxk5QOykZ0c5CQXuclDXvLxIfkpQEEK8RGFKUJRilGcEpSkFKUpQ1nKUZ4K
VORjPqESlanCp1SlGtWpQU1qUZs61KUe9WnAZzSkEcE0pglNaUZzWtCSVrSm
DW1pR3s60JEQOtGZLnSlG93pQU960Zs+hNKXfnzOF3xJfwYwkEEMZghD+Yqv
GcY3DGcEIxnFaMYwlm8ZRxjhRDCeCUwkkigmEU1M4H0biUlEQhIQn3jEJQ6x
iUUg8D6od+4tb/iPf/mHv/mL17ziJS94zjOe8oTH/MkfPOIhD/id+9zjN37l
Lnf4hZ+5zS1ucoPrXOMqV7jMJS5ygfOc4yxnOM0pTnKC4xzjKEc4zCEOcoD9
7GMve9jNLn7iR3byAzvYzja2soXNbGIjG1jPOtayhtWsYiUrWM4ylvI9S1jM
IhaygO+YzzzmMofZzGImM5jONKYyhcnEEM0koohkIhMYTwThhDGO/wGIRIhs

             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
           LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
             18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 
            34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
            50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 
            66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 
            82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 
            98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 
            111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 
            124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134}]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwN0WcikAEAANDPyKpLuJIjOIBuIZQ9s6koe6+iKFI2GRnJnpHIiPB+vBO8
2PjHcQkhQRAk8oQkkknhKc9IJY10Msgki2xyyCWPfAp4TiFFFFNCKWWUU0El
L3jJK6qo5jVvqKGWOuppoJEmmmmhlTba6aCTLrrp4S3v6KWP93ygnwE+8olB
hvjMMF/4ygijjDHOBJNMMc0M35hljnkW+M4iSyyzwg9W+cka62ywyRbb7LDL
HvsccMgvjjjmNyf84ZQz/nLOBZdc8Y9rbvjPLXcEskMIJYxwHhBBJFFEE8ND
HnEPWepewA==
            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0Vc7FgAAQOHPD7CSLXuvRGSPrJT5JZuQKHvPbAlR+MVeF+/znPuTNr0S
XA4JBAKXhIowwokgkhdE8ZJoYogljngSSCSJVySTQipppJNBJllkk0MueeRT
QCFFFPOaEt5QShlvKaeCd1RSRTU11FJHPQ000sR7mmmhlTba+UAHH/lEJ110
00MvfQT5TD9fGGCQIYYZYZQxxpngK5NMMc03ZvjOLHP84CfzLLDIEs8zVlhl
jXU22GSLbXbYZY99DvjFIUccc8IpZ5xzwW8u+cMV19zwl1vu+Md/7nngkSfz
cyxd
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{17.17346938775509, 1.5000000000000568`}, {
       12.705294425115511`, 0.5000000000000284}},
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{0, 1330.}, {0, 1.647525296119761}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.02], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJztmfk/VV37x48IyS0iQ2igzBVFKspVKdyRZEok85yhKNFtng45jqnQJDKk
RKKSBg2KzE8q0kApRRmapJJnPd/Wdfc/fF/HL17v1zprX/uz11p7v/de8538
trpOYTAYC7gZjP/9x79ZJqsP3XAc1vtNC4Cbv19Ddz2yJgwmqH7bp468BqRO
cwlcW4asDxngt73TANkIxmNdzWW3I28GVtkx2zvWlCPM4CzfEdGWTdhuAbZ/
bxOUtcR2K/jqwVOYH4LtNqDbvcIvPhfbbUGvWKDp2llst4e/xGJm9RdSBgeY
brnB70MB/t4RAr1zJovw97VOYGqw+szLUuzvAsm1E6Jlp7C/K/Dt0qr7eBz7
u8FXzVTG3Xzs7w5KBzqNZv9b3xPc30Xz5Z3D/l5QYb+8yQ45whue1SzMiSjH
/j4QsHhFruIN7O8LB1doK8t1Y38/4Oqbo+/xDdkfnhi4h5VPGfnNPf7AHZDV
5vwDjx8APU/k1yn0U563G1zKlyo4tWO93TDp84YZcZKywx4wl5HSNlbB+oHg
GvlT2jh+6DfnBkJrxz3uuTMpQxDc8hiVNRv6QOsHwfcZKRvnfaIcsRfOzz/d
HMRNfz9vH7y8ElTlNZty7T6YqBzk37GUskMwiEa2X4xdS5mxHyz3GpdmG2L9
/bBlz+enK4ywfggoyR/uVAXKPSHwVum1XK025YhQUP1x0ike2+cdgMsmDG0R
G6x/ALIHph1u2oP1/4EsMYnJ2clYPwzKcpX5pYuwfhg0xHf+6rqK9cOh3mT4
SGUD1g+Hd2mBV84/wPYIcKmwNxt7SpkdAa63NpzMRO6JAB2mmeK2h5TVI+EJ
+5e4YxeefyTo6mzdl91PuS0Sokry1X8OYp4oEFbq4jF+Sdk/CsD8kG7jC8wX
BUKFuwrZ45SFo6Hbv6ngriqOdzQ8Lo9b0m9FuTwatL6pHa/7d73HwH92rhgK
x/W3JQY0hOxzyvUp58bAqn+cm8xWUR6JgfXFpdzRa3F+xsLAuYbi9B2U2bEg
ysqSrTtAuScW2lumC55nUVaPg1C1+d0zknD+xsEZy+ldY0GU2+LgnMu6YQcn
nM/xMLmm/ZezJ2X/eEi8HbXfLRnndzywCyWCBsooCydAxtSmqb7VmD8BKo5c
5w25jPkTwGXZhP/YbczPBJlCSUfNJ5ifCaWNeUe3j2B+JpgpM16pc9H1N8KE
N7vXfl7ISxkS4eNps8svuSmzE2FMJu3eQVyfPYlgvXrDiz0fMX8SDJYp6oS+
w/xJYFdU+UD5OeZPAoO8FtvGp5j/IJxrUY60GsL8B8G7km95M9avPQiWciGn
v4hRFk6Gh/kP92ZKUHZIhsRRhbl6ApTLk4H3ZXi1EB6PwYJ7PctETLD+FhZ8
OpDiPhfPN5cFjuw5svzTMT8LLIWn6xVLYf4UUNWt/NY8D/OnwOHxfdK/kHtS
YJWghIGAOGVJNnzS1ZmhxIP92WAd7/Dp8xit58GGxXqdhip8eDw2GJ717nbD
PJfZoJ2o2lEpg8dng8sCl9U/RCnzpwLvRHyXMh5fPRXalqcm6eD13pYKve6t
mdde4PVPBb2vw8J7BygXp0LgeEeQ4Xscj1SYrxP5gQvH41sqbMmx3t/XhOOT
BpKGTYyo+5QN02CWqEaLIN5//dPg87WntoMPKGelQUdFs7t7Pc7fNLgaEa8p
Vkv5bRoMeed7CrXgfE6HRxPHmjfj+axIh65eoXlJOB8d0uFEoVaeFz4fEtJB
ozo7thbnb3k6yB08rjnSQbkzHeryJfxsr+L4Z0BRQcbHd/g8U8oAn5vOZ6rz
cD6Qdq6WNgt8/gZnAPclrbBpuN5yM8DM6MrXgWbK9RngGRBouugtHp/BeN/S
lSXgSM+P+MW+O5tfM42RNaHURncjlz7yGmD/zcuUMkXWB36ubbpL/u1vBHOb
x91euyJvhjsirb/at1EmfvH0uLzSFiNst4CWiPvrxDZhuxVcFBn+tcoT221A
2+/Y+XWHsd0WhFelJDWXYLs9hG7aKHc4DeerA8zRNr15JxB/7wiy+08UvwnB
9egEpe0J12ecwP4ucEhme2bRdezvCrtvr9PkuY393WDzP05VIuewvzvU9PZ5
P8N6xC8K+fKyhWKwvxeEDA3uk0jA/t5wOIzPcu0h7O8Dxc7PPJ+dxv6+YHMf
LsZjPeIXMitc/bs7kP3hsYd10cz7f/wizHZpAqMUjx8A0xlzdWqyKRO/cF92
wvdOItbbDYZcU+4fs8X5uAcK8u67ncL1R/xiZe9nsTe+OF8CoW4nd3Y+4PMj
CNI115bkoR8Sv+i9L/EtEe//xC+yrL0Ueu1wve2DxY6xwXfxeUH84qPnrBfN
uH6IX5jn2z7unoH198PaEZlkKTXKxC9q1YrUcudj/hBYKjglXG4C64fAlYQ7
U6rQz4hf5K30Yy5CvyR+sV62UjoY/ZH4hZvahIVsG9b/B84p6nR44/OA+MUO
cSM1EwWsHwZqy8XslHC+E79QUBd69QjnK/ELkVBHndUrsZ34Q+o+gXpFvB9G
QJnr3EN2svj7CPBndTHWz8b7XSQoanffLVmA4xcJ5wf5Z/lqUCZ+MU1s647n
i3E8o2BtsG3cQrxfE7+Y5mS28KEkjm8UDCu53WtVwedLNLQNaDS82Y7jHQ0N
WXkdB5j4fImG8IIg9RQW5o+BzNiCHw8DKBO/sEsRGX9lg9cjBsR1iwsuWeLz
JQbkZXTPMXdg/ljIzrHyWOKF+WNhafU5rfxwzB8LsvIZLnJFmD8O7IQl6xfi
fCZ+sb+j62jCPcwfB5GrxHNU8jF/PGzoV7zlgeuL+EXd29Qs9XjMHw8X7r7L
kMzD/AnQHspn+KQC8ydAT/KUa9PLMX8CGL7aVr7pDOZngtPOwxnPqzA/E8qs
IMrkIeZnwuDKr46mvKM0PxPa5OLcDyhQJn5RmeJ9JXQmZeIXEXyTr44+w/yJ
IH3sHauuBvMnQc0W7asKlzB/EnjU5B0Ov4z5k8B0Vuf2k8jELyoEX+8Krsf8
ByHRa9iFf/SPX/x9SnibtxitT/wif/6nSAs8H+IXo/pBy1d//uMXJXJJ5lzd
mJ8FFjb5TYKdmJ8FR3gMlla+wvwsuLx4DlfXhz9+sXXt2JyxsT9+8b1xoC+A
H/OngLxK26cYScrEL8wzfyoKiFMmfhFWwfh+49cfv1jBbSCbNEKZ+EWTqb7u
OwE8HhtmsE5d9dClTPxi/VWlL/Zb8Phs0PX71qesQZn4hfzY1cbLPJSJX+Sc
jtZajvmJX4yNHBEY4abtxC8KTKYfvziXMvGLEvHnho0qlIlf1Br4tZZJUSZ+
sbPq4oxgPH/iF/OWKtxuwvMnfpG1scxACMeH+MXZh1IqM4cpE78wUyhSjH+J
45cGD0SLNN/i9Sd+MRk7qMiP7cQvhg029kRjPeIXda0ZJrJzcHzTYdp3aeOn
iygTvwh9fKF3rypl4hc5yaYSYcqUiV+oLp5n27qQMvGLHq3Hv5bheBG/6HHT
7+/C8SR+YSMYv2hoKmXiF1a6dyUW4vwifuGlrTlmqUaZ+EWKUunN0A14fAbD
/Ofd755c+D63AGbFq2e7fKDvp8QvwuyfO3/oRF4DM6995TJoQNYH6fDFulub
kY3gQsDjTr+3yJshQ+dYdd8Evu+awcn2oUc/eLCeBUilS6eLiOH7nBVEnlPZ
3C6H7TYg0Lk8lInv08Qv7J9+jejB92XiFwtTQ9+cUML3SQd4pvPe1swJf+8I
pX1fSqOc8X3PCTYOenQVyGJ/FzJ+BhNCTfT8iF8omb+e/+wSnq8bmPjtOOQx
SJn4Radmf81+fB8nfhF++3a3giXW9wKfnoziRGOs7w2sEN3EME2s7wMpmVU+
GSrY3xecn75/rbkE+/tBg/WeIikDZH+oNhkqOboX34f94S/VJvbdo3j8ACit
mib0KAffd3fD93EFPx18Pyd+4fu4PrwuCd/f94Dtp6O5ppuwfiCkzeeRrzhB
8xG/6DQ66Jvz6j2tHwSjR0+mTsZQJn4hYsmbWRVNmfjF/cH+QIESysQvDom5
fRS6QZn4BT/j1tL3+ZSJX0TWDF43d6ZM/EJFcCcwVlImfjE3OcdBwxTrh8Cc
VWpLtbAe8QuJhqnrG8uwfihUXu3Q6X2C9Q+AWpjx1hIeHK8D0Fws3hUqQZn4
RXvXJUt7UZyfYXBK7OalI1yYPwxW5idscB7F+uGwXudWQM0k1g+H8iUKv95q
4nyJgC3rWpLtvSgTv9hVbSy+Owy/90TAoS/Dxip7KRO/cL+wMdfHE+dXJIif
SLtj5UOZ+MWoWn6hTghl4he5O3/8NI6hTPzC7yVz8ftkzBcFet+Frkceo0z8
QlxQq/rGScwbDTLq9VUdOZSJX3gV+Hb7FGL+GAipXPja/B5l4helE1nrsh/i
9YgBo6i9Jpq43olf6Em+KvmIvyd+cVLpTUT9G8wfC7dOP2hd/x3zx4K79fBm
2VbMHwewYqZCRyTmjwOnKc7Bz+0wfxzYWGwr8cHrR/xiT9nW/V+x/v++X1T1
3vQWxPkdD9U3bGvzpfH7TQLEijJDFf/C+Z4Ap6SD058KUyZ+oZ1rGGmtgfOf
CYHJU7LP4Pcz4hcT7+5ozl6O37OY4KchVr/gG+Znws/Yca4TjZg/EVwS/HzS
BzB/IoyoKNx7oYPrNRFC4VKu3S78fpUEDtd7JopdcP0mwcBj+WALXI/ELz5J
feCywPMhfjEezVS4iu3ELzJ/6gktWIn5D8J1uPdlEu8nxC+EjP0fn8V24hf6
uudnROH3PeIXF8PeNc5WwPws6BWaz4zA60n8onyE7fVIBvOzQLxv9W7fLZSJ
X1ReX329Au9HxC9qtv2QtNiN3+9SQDxNL25oK+ZPgXW8zk1iapSJX7SxBg3n
iWJ/NujxLzv7QIgy8Qu5HZ0lj3jxeGzgyXT93NBHry/xC/NyO7dZ/8H5xQbx
CydUs/F5RfyicWphixYfXu9U8J4tfVYAx4f4xcMPbuJH/r2/p4KGWcPrsEzK
xC/S6z7YfI/C+ZgKt9/I657C9Uf84lXD2gedR3F+psGIqnGo1wXKxC/Gs7j/
mriB8zUNUtpinStw/hK/4JUyiajF+UP8orWrdtK6hTLxi55Gv2hBfN4Sv2jy
LnuS2U2Z+EV3v8jrUTwe8QvPwuMjo6WUiV943W40SE/E9Z4OwhPHVvVZUSZ+
sWxwSFFyEa7/DGC9COn3VqZM/EKyak3CjWV4P8iAowPJG5vxfkf8wu7L86b6
lXh/yIBWecFJ5fWUiV9cSmVJO2/A43P2Rzj7I5z9Ec7+CGd/5Hd+zv4IZ3+E
sz/C2R/h7I/8Pj5nf4SzP8LZH+Hsj3D2R/6POfsjnP0Rzv4IZ3+Esz9Cz5+z
P8LZH+Hsj3D2R/7/7Y/8F5pBpKs=
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0mV7FgQAheG9dHeHNEhINyggncLohtE1UGlFWrYBGxvdUtLdiNLd3aGg
IKA0WID3dfHhPucPPDlC+gaHxgoKCgqQxCQlGclJQUpSkZo0pCUd6clARjKR
mSxk5QOykZ0c5CQXuclDXvLxIfkpQEEK8RGFKUJRilGcEpSkFKUpQ1nKUZ4K
VORjPqESlanCp1SlGtWpQU1qUZs61KUe9WnAZzSkEcE0pglNaUZzWtCSVrSm
DW1pR3s60JEQOtGZLnSlG93pQU960Zs+hNKXfnzOF3xJfwYwkEEMZghD+Yqv
GcY3DGcEIxnFaMYwlm8ZRxjhRDCeCUwkkigmEU1M4H0biUlEQhIQn3jEJQ6x
iUUg8D6od+4tb/iPf/mHv/mL17ziJS94zjOe8oTH/MkfPOIhD/id+9zjN37l
Lnf4hZ+5zS1ucoPrXOMqV7jMJS5ygfOc4yxnOM0pTnKC4xzjKEc4zCEOcoD9
7GMve9jNLn7iR3byAzvYzja2soXNbGIjG1jPOtayhtWsYiUrWM4ylvI9S1jM
IhaygO+YzzzmMofZzGImM5jONKYyhcnEEM0koohkIhMYTwThhDGO/wGIRIhs

             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
           LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
             18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 
            34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
            50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 
            66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 
            82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 
            98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 
            111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 
            124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134}]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwN0WcikAEAANDPyKpLuJIjOIBuIZQ9s6koe6+iKFI2GRnJnpHIiPB+vBO8
2PjHcQkhQRAk8oQkkknhKc9IJY10Msgki2xyyCWPfAp4TiFFFFNCKWWUU0El
L3jJK6qo5jVvqKGWOuppoJEmmmmhlTba6aCTLrrp4S3v6KWP93ygnwE+8olB
hvjMMF/4ygijjDHOBJNMMc0M35hljnkW+M4iSyyzwg9W+cka62ywyRbb7LDL
HvsccMgvjjjmNyf84ZQz/nLOBZdc8Y9rbvjPLXcEskMIJYxwHhBBJFFEE8ND
HnEPWepewA==
            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0Vc7FgAAQOHPD7CSLXuvRGSPrJT5JZuQKHvPbAlR+MVeF+/znPuTNr0S
XA4JBAKXhIowwokgkhdE8ZJoYogljngSSCSJVySTQipppJNBJllkk0MueeRT
QCFFFPOaEt5QShlvKaeCd1RSRTU11FJHPQ000sR7mmmhlTba+UAHH/lEJ110
00MvfQT5TD9fGGCQIYYZYZQxxpngK5NMMc03ZvjOLHP84CfzLLDIEs8zVlhl
jXU22GSLbXbYZY99DvjFIUccc8IpZ5xzwW8u+cMV19zwl1vu+Md/7nngkSfz
cyxd
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0.8708379232155019},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{17.17346938775509, 1.5000000000000568`}, {
       12.705294425115511`, 0.5000000000000284}},
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{0, 1330.}, {0.8708379232155019, 1.0821218086746434`}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{
  3.8317068342167225`*^9, 3.83170729643336*^9, 3.831707404575946*^9, 
   3.8317959820379395`*^9, 3.8317961396579866`*^9, 3.831796222106161*^9, {
   3.8317963105354047`*^9, 3.831796336086087*^9}, {3.8317963665483294`*^9, 
   3.8317964472354593`*^9}, 3.831803173623711*^9, 3.83180408258462*^9, 
   3.8318045355439253`*^9, 3.8318047000329657`*^9, 3.831804829891472*^9, 
   3.8318048794281826`*^9, 3.8318065130427475`*^9, 3.831806673587022*^9, 
   3.8318068798345795`*^9, 3.831807374882196*^9, 3.831808258306693*^9, 
   3.831819587597726*^9, 3.8318820564623218`*^9, 3.831882117145401*^9, {
   3.8318821538029914`*^9, 3.8318821891089835`*^9}, 3.831882220288968*^9, 
   3.831882769250304*^9, {3.831882818429419*^9, 3.8318828527394004`*^9}, {
   3.831893330340743*^9, 3.831893355304078*^9}, 3.831893511249239*^9, 
   3.8318976262932835`*^9, 3.8319038238012085`*^9, 3.8319038913004465`*^9, 
   3.831904081540979*^9, 3.831904113273963*^9, 3.8319688811415205`*^9, 
   3.831968935086047*^9, 3.8319689925583735`*^9, 3.831969067102858*^9, 
   3.83196935162473*^9, 3.8319852243069034`*^9, 3.8319856815723968`*^9, 
   3.8320590333644433`*^9, 3.8320593149628983`*^9, 3.832064069326546*^9, 
   3.8320655992678137`*^9, 3.832170095760996*^9, 3.832170203751569*^9, {
   3.8321703366059985`*^9, 3.832170357706598*^9}, 3.8321704817156*^9, 
   3.83217546489472*^9, 3.832175660225175*^9, 3.832175727169593*^9, 
   3.8321758811055017`*^9, {3.832243093074746*^9, 3.832243116038988*^9}, 
   3.8323095880888042`*^9, 3.832309741389146*^9, 3.8323099575603676`*^9, 
   3.832310015105756*^9, 3.8323103041917515`*^9, 3.8323112782522273`*^9, 
   3.8323209821511374`*^9, 3.832321029093762*^9, 3.8324077902742853`*^9, {
   3.83240845377711*^9, 3.8324084589051185`*^9}, 3.832423755966546*^9, 
   3.834388061586213*^9, {3.834389281046607*^9, 3.834389286621929*^9}, 
   3.83439017624129*^9, 3.834390375507212*^9, 3.834728164872324*^9, 
   3.8347284074994655`*^9, 3.8347343203861413`*^9, {3.834734707764923*^9, 
   3.834734743576699*^9}, 3.8347348666475067`*^9, 3.834735690947824*^9, 
   3.8347382349218025`*^9, 3.835760918973724*^9, 3.8362862826430902`*^9, 
   3.836287045543049*^9, 3.836657503231075*^9, 3.837063461891202*^9, 
   3.8370640342755775`*^9, 3.839755623190665*^9, 3.839755671373317*^9, 
   3.8417565026713753`*^9, 3.841757785224015*^9, {3.847791190617341*^9, 
   3.8477912108652678`*^9}, 3.8478709444405465`*^9, 3.8478713941057777`*^9, {
   3.847871496302184*^9, 3.84787151644405*^9}, 3.8478715989207516`*^9, 
   3.8483899931517916`*^9, 3.8484119829196787`*^9, 3.850032930989131*^9, 
   3.8500329804237213`*^9, 3.8500346446870193`*^9, 3.8502910327492123`*^9, 
   3.85029543696848*^9, 3.8503258815888567`*^9, 3.850325974879697*^9, 
   3.850326042884125*^9, 3.8503261061249223`*^9, 3.8503832006799736`*^9, 
   3.8503848684347086`*^9, 3.850386189196044*^9, 3.8503869394257765`*^9, 
   3.8503870988903008`*^9, 3.8504605547924166`*^9, 3.850461230931265*^9, 
   3.8504644427841277`*^9, 3.8504713550838394`*^9, 3.8504723593936467`*^9, 
   3.8504798701854243`*^9, 3.8504799614990625`*^9, 3.8504800357615833`*^9, 
   3.8504805898597293`*^9, {3.8504806448689423`*^9, 3.850480662253895*^9}, 
   3.8504839679287415`*^9, 3.8504841686777816`*^9, 3.850484241037204*^9, 
   3.8504842809086933`*^9, 3.850539168810449*^9, 3.8505402151397595`*^9, 
   3.850540797161543*^9, 3.850552312223341*^9, {3.8510555800374236`*^9, 
   3.8510555960341215`*^9}, 3.85105578640989*^9, {3.8510558615166893`*^9, 
   3.851055867584469*^9}, 3.8510580558919225`*^9, 3.8510589096077695`*^9, 
   3.851330080649225*^9, 3.8513415028293524`*^9, 3.851341894576451*^9, 
   3.8513422612454886`*^9, 3.8513424753036566`*^9, 3.8513425499756513`*^9, 
   3.851342613954727*^9, 3.851342764940819*^9, 3.851575472984936*^9, 
   3.8515849205160775`*^9, 3.8515856323930116`*^9, 3.851586488888489*^9, {
   3.85158662808265*^9, 3.8515866407262554`*^9}, 3.85245702473277*^9, 
   3.852962496362587*^9, 3.85297092160653*^9, 3.8529710209720716`*^9, 
   3.852971774775419*^9, {3.8529720309511247`*^9, 3.852972094980668*^9}, 
   3.8529721820992427`*^9, 3.852972474720218*^9, 3.8529726111308875`*^9, 
   3.8529726878594007`*^9, {3.8529727543076286`*^9, 3.8529727817559958`*^9}, 
   3.8529731487345924`*^9, 3.852973345290344*^9, 3.8533042037493563`*^9, 
   3.8533053691109595`*^9, 3.853305494271821*^9, 3.8535855508742714`*^9, 
   3.855477091578367*^9, 3.855480188855748*^9, 3.8554802694387703`*^9, 
   3.8556457099055686`*^9},
 CellLabel->"Out[23]=",ExpressionUUID->"804252fb-51e6-486b-8d45-25f5fe94e86b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"indexOfShock", " ", "=", " ", "35"}], ";"}], 
  "\[IndentingNewLine]", "\n", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"StoredEq1", " ", "=", " ", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]A", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
      FractionBox[
       RowBox[{
        RowBox[{
         RowBox[{"-", "\[Delta]L0"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"g1", " ", "\[Epsilon]z"}], "+", 
           RowBox[{"g2", " ", 
            RowBox[{"(", 
             RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}]}], ")"}], 
         " ", 
         RowBox[{"\[Delta]A", "[", "t", "]"}]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"2", " ", "\[Epsilon]z"}], "+", 
           RowBox[{"\[Delta]L0", " ", 
            RowBox[{"(", 
             RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}]}]}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}], " ", 
            RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
       RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}]]}]}], ";", "\n", 
    RowBox[{"StoredEq2", " ", "=", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]L", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
      FractionBox[
       RowBox[{
        RowBox[{
         RowBox[{"-", "g2"}], " ", "\[Delta]L0", " ", 
         RowBox[{"\[Delta]A", "[", "t", "]"}]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}], " ", 
            RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
       "\[Epsilon]z"]}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "the", " ", "below", " ", "equations", " ", "are", " ", "for", " ", "when",
     " ", "there", " ", "is", " ", "only", " ", "partial", " ", "stored", " ",
     "growth"}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"StoredEq1", "[", 
     RowBox[{
     "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_", 
      ",", "\[Delta]L0_"}], "]"}], " ", ":=", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]A", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
     RowBox[{"-", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
             RowBox[{"\[Alpha]S", " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"g1", " ", 
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                 "\[Delta]L0"}], "-", 
                RowBox[{"g1", " ", "\[Epsilon]z"}], "-", 
                RowBox[{"g2", " ", 
                 RowBox[{"(", 
                  RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}]}], 
               ")"}]}], "+", 
             RowBox[{"g1", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{
                 RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], 
                "+", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                 RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}],
           "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], 
             "-", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"\[Delta]L0", "+", 
                RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"2", " ", 
                 RowBox[{"(", 
                  RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}], "+", 
                RowBox[{
                "\[Alpha]S", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], 
               ")"}]}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              "\[CapitalSigma]", " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{
                 RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], 
                "+", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                 RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
            ")"}]}]}], ")"}], "/", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
            RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
            RowBox[{"\[Alpha]S", " ", 
             RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                "\[Delta]L0"}], "-", "\[Epsilon]z"}], ")"}]}], "+", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
             RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{
                RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], 
               "+", 
               RowBox[{
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
         ")"}]}], ")"}]}]}]}], ";"}], "\[IndentingNewLine]"}], "\n", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"StoredEq2", "[", 
     RowBox[{
     "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_", 
      ",", "\[Delta]L0_"}], "]"}], " ", ":=", 
    RowBox[{
     RowBox[{
      SuperscriptBox["\[Delta]L", "\[Prime]",
       MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
     RowBox[{"-", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
            RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
            RowBox[{"\[Alpha]S", " ", 
             RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{
             RowBox[{"-", "g2"}], " ", 
             RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
               RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
               RowBox[{"\[Alpha]S", " ", 
                RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], "+", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], 
               "-", 
               RowBox[{
                RowBox[{"(", 
                 RowBox[{"\[Delta]L0", "+", 
                  RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
                RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
         ")"}], "/", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              "\[Delta]L0"}], "-", "\[Epsilon]z"}], ")"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
       ")"}]}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]A0", "=", 
    RowBox[{"filteredWidData", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";", "  ", 
   RowBox[{"\[Delta]L0", " ", "=", 
    RowBox[{"filteredLenData", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"\[Delta]A0", "=", 
     RowBox[{"\[Delta]L0", " ", "=", " ", 
      RowBox[{"-", "0.03"}]}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"\[Delta]L0", " ", "=", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "0.141"}], " ", 
       FractionBox["shockMagnitude", "1000"]}], " ", "-", " ", "0.0011"}]}], 
    ";", "\[IndentingNewLine]", "\[IndentingNewLine]", 
    RowBox[{"\[Delta]A0", "=", "\[Delta]L0"}], ";"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"endIndex", " ", "=", " ", 
    RowBox[{
     RowBox[{"Ordering", "[", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"normalizedTime", " ", "-", "endTime"}], ")"}], "2"], "]"}], 
     " ", "[", 
     RowBox[{"[", "1", "]"}], "]"}]}], ";"}], "   ", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"storedSol", "[", 
     RowBox[{
     "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_"}], 
     "]"}], ":=", " ", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"StoredEq1", "[", 
         RowBox[{
         "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
          ",", "\[Delta]L0"}], "]"}], ",", 
        RowBox[{"StoredEq2", "[", 
         RowBox[{
         "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
          ",", "\[Delta]L0"}], "]"}], ",", " ", 
        RowBox[{
         RowBox[{"\[Delta]L", "[", "0", "]"}], " ", "==", " ", "\[Delta]L0"}],
         ",", " ", 
        RowBox[{
         RowBox[{"\[Delta]A", "[", "0", "]"}], " ", "==", " ", 
         "\[Delta]A0"}]}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", " ", 
        RowBox[{"endTime", " ", "-", " ", 
         RowBox[{"normalizedTime", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}]}]}], "}"}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"storedWidthFunction", "[", 
    RowBox[{
    "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
     "\[Epsilon]_"}], "]"}], "[", "t_", "]"}], " ", ":=", " ", 
  RowBox[{
   RowBox[{"\[Delta]A", "[", "t", "]"}], "/.", 
   RowBox[{
    RowBox[{"storedSol", "[", 
     RowBox[{
     "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]"}], "]"}],
     "[", 
    RowBox[{"[", "1", "]"}], "]"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"storedLengthFunction", "[", 
      RowBox[{
      "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
       "\[Epsilon]_"}], "]"}], "[", "t_", "]"}], " ", ":=", " ", 
    RowBox[{
     RowBox[{"\[Delta]L", "[", "t", "]"}], "/.", 
     RowBox[{
      RowBox[{"storedSol", "[", 
       RowBox[{
       "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]"}], 
       "]"}], "[", 
      RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"storedSol", "[", 
     RowBox[{
     "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_", 
      ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], ":=", " ", 
    RowBox[{"NDSolve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"StoredEq1", "[", 
         RowBox[{
         "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
          ",", "\[Delta]L0"}], "]"}], ",", 
        RowBox[{"StoredEq2", "[", 
         RowBox[{
         "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
          ",", "\[Delta]L0"}], "]"}], ",", " ", 
        RowBox[{
         RowBox[{"\[Delta]L", "[", "0", "]"}], " ", "==", " ", "\[Delta]L0"}],
         ",", " ", 
        RowBox[{
         RowBox[{"\[Delta]A", "[", "0", "]"}], " ", "==", " ", 
         "\[Delta]A0"}]}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", " ", 
        RowBox[{"endTime", " ", "-", " ", 
         RowBox[{"normalizedTime", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}]}]}], "}"}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"storedWidthFunction", "[", 
    RowBox[{
    "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
     "\[Epsilon]_", ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], "[", 
   "t_", "]"}], " ", ":=", " ", 
  RowBox[{
   RowBox[{"\[Delta]A", "[", "t", "]"}], "/.", 
   RowBox[{
    RowBox[{"storedSol", "[", 
     RowBox[{
     "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]", ",", 
      "\[Delta]L0", ",", "\[Delta]A0"}], "]"}], "[", 
    RowBox[{"[", "1", "]"}], "]"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"storedLengthFunction", "[", 
      RowBox[{
      "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
       "\[Epsilon]_", ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], "[", 
     "t_", "]"}], " ", ":=", " ", 
    RowBox[{
     RowBox[{"\[Delta]L", "[", "t", "]"}], "/.", 
     RowBox[{
      RowBox[{"storedSol", "[", 
       RowBox[{
       "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]", ",", 
        "\[Delta]L0", ",", "\[Delta]A0"}], "]"}], "[", 
      RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]", " ", "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
       RowBox[{"g2", "\[Rule]", " ", "5.9646572643958535`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", " ", "0.22596007807663557`"}]}], 
      "}"}]}], ";"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"gRule", " ", "=", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"g1", "\[Rule]", "3.2244841497907073`"}], ",", 
      RowBox[{"g2", "\[Rule]", "5.65593039165689`"}], ",", 
      RowBox[{"\[CapitalSigma]", "\[Rule]", "   ", "0"}]}], "}"}]}], ";"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", 
        RowBox[{"-", "1"}]}], ",", 
       RowBox[{"g2", "\[Rule]", "0"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "0"}]}], "}"}]}], ";"}], "*)"}], 
  RowBox[{"(*", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"g1", "\[Rule]", "3.1222703395011506`"}], ",", 
     RowBox[{"g2", "\[Rule]", "6.188414869493781`"}], ",", 
     RowBox[{"\[CapitalSigma]", "\[Rule]", "0.00854796983106368`"}]}], "}"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"g1", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
   RowBox[{"g2", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
   RowBox[{"\[CapitalSigma]", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";", " ", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\[Epsilon]", " ", "=", " ", "0.1"}], ";"}], "*)"}], 
   RowBox[{"\[Epsilon]", " ", "=", " ", "0.10"}]}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Delta]plotStoredWid", "[", 
   RowBox[{
   "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
    "\[Epsilon]z_", ",", " ", "style_"}], "]"}], ":=", " ", 
  RowBox[{"Plot", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"storedWidthFunction", "[", 
      RowBox[{
      "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
       "\[Epsilon]z"}], "]"}], "[", 
     RowBox[{"u", " ", "-", " ", 
      RowBox[{"normalizedTime", "[", 
       RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"u", ",", 
      RowBox[{"normalizedTime", "[", 
       RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", " ", "endTime"}], 
     "}"}], ",", " ", 
    RowBox[{"PlotStyle", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"Black", ",", " ", "style"}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
    RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
    RowBox[{"LabelStyle", "\[Rule]", 
     RowBox[{"Directive", "[", 
      RowBox[{
       RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
       "Black", ",", " ", 
       RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]plotStoredLen", "[", 
    RowBox[{
    "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
     "\[Epsilon]z_", ",", "style_"}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"storedLengthFunction", "[", 
       RowBox[{
       "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
        "\[Epsilon]z"}], "]"}], "[", 
      RowBox[{"u", " ", "-", " ", 
       RowBox[{"normalizedTime", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"u", ",", 
       RowBox[{"normalizedTime", "[", 
        RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], "}"}], 
     ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"Black", ",", " ", "style"}], "}"}]}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}]}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"plotStoredWid", "[", 
     RowBox[{
     "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", 
      "\[Epsilon]z_", ",", " ", "style_"}], "]"}], ":=", " ", 
    RowBox[{
     RowBox[{
      RowBox[{"Plot", "[", 
       RowBox[{
        RowBox[{"1", " ", "+", " ", 
         RowBox[{
          RowBox[{"storedWidthFunction", "[", 
           RowBox[{
           "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
            "\[Epsilon]z"}], "]"}], "[", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"u", " ", "-", " ", 
             RowBox[{"time", "[", 
              RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}],
           "  ", "]"}]}], ",", 
        RowBox[{"{", 
         RowBox[{"u", ",", 
          RowBox[{"normalizedTime", "[", 
           RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", " ", "endTime"}], 
         "}"}], ",", " ", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"Black", ",", " ", "style"}], "}"}]}], ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
        RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
        RowBox[{"LabelStyle", "\[Rule]", 
         RowBox[{"Directive", "[", 
          RowBox[{"Bold", ",", " ", "Black", ",", " ", 
           RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}], 
      "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
      RowBox[{"plotStoredLen", "[", 
       RowBox[{
       "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", 
        "\[Epsilon]z_", ",", "style_"}], "]"}]}], ":=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", " ", "+", " ", 
            RowBox[{
             RowBox[{"storedLengthFunction", "[", 
              RowBox[{
              "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
               "\[Epsilon]z"}], "]"}], "[", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"u", " ", "-", " ", 
                RowBox[{"time", "[", 
                 RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", 
              "R0"}], "]"}]}], "  ", ")"}], " ", 
          RowBox[{"Exp", "[", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"u", " ", "-", " ", 
              RowBox[{"time", "[", 
               RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", 
            "R0"}], " ", "]"}]}], ",", " ", 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"u", " ", "-", " ", 
             RowBox[{"time", "[", 
              RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}],
           " ", "]"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", 
         RowBox[{"normalizedTime", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], "}"}], 
       ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"style", ",", "Black", ",", " ", 
            RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Darker", "[", "Red", "]"}], ",", "Dashed", ",", " ", 
            RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], "}"}]}], ",",
        " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"Bold", ",", " ", "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}]}], 
   "\[IndentingNewLine]", "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plotStoredWid", "[", 
    RowBox[{
    "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", "\[Epsilon]z_",
      ",", " ", "style_"}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"1", " ", "+", 
      RowBox[{
       RowBox[{"storedWidthFunction", "[", 
        RowBox[{
        "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
         "\[Epsilon]z"}], "]"}], "[", 
       RowBox[{
        RowBox[{"(", "u", " ", 
         RowBox[{"(*", 
          RowBox[{"-", " ", 
           RowBox[{"time", "[", 
            RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "*)"}], ")"}], " ", 
        "R0"}], "  ", "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"u", ",", 
       RowBox[{"0", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], " ", ",", " ", 
       FractionBox["endTime", "R0"]}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"style", ",", " ", "Black", ",", " ", 
        RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plotStoredLen", "[", 
    RowBox[{
    "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", "\[Epsilon]z_",
      ",", "style_"}], "]"}], ":=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", " ", "+", "  ", 
         RowBox[{
          RowBox[{"storedLengthFunction", "[", 
           RowBox[{
           "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
            "\[Epsilon]z"}], "]"}], "[", 
          RowBox[{"(", "u", " ", 
           RowBox[{"(*", 
            RowBox[{"-", " ", 
             RowBox[{"time", "[", 
              RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "*)"}], ")"}], 
          RowBox[{"(*", " ", "R0", "*)"}], "]"}]}], "  ", ")"}], " ", 
       RowBox[{"Exp", "[", 
        RowBox[{"(", "u", " ", 
         RowBox[{"(*", 
          RowBox[{"-", " ", 
           RowBox[{"time", "[", 
            RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "*)"}], ")"}], 
        RowBox[{"(*", " ", "R0", " ", "*)"}], "]"}]}], 
      RowBox[{"(*", 
       RowBox[{",", " ", 
        RowBox[{"Exp", "[", 
         RowBox[{
          RowBox[{"(", "u", " ", 
           RowBox[{"(*", 
            RowBox[{"-", " ", 
             RowBox[{"time", "[", 
              RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "*)"}], ")"}], " ",
           "R0"}], " ", "]"}]}], "*)"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"u", ",", 
       RowBox[{"0", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], " ", ",", 
       FractionBox["endTime", 
        RowBox[{"1", 
         RowBox[{"(*", "R0", "*)"}]}]]}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Black", ",", "style", ",", " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Darker", "[", "Red", "]"}], ",", "Dashed", ",", " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], "}"}]}], ",", 
     " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}]}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"startIndx", " ", "=", " ", "1"}], 
  RowBox[{"(*", "indexOfShock", "*)"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]widthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"filteredWidData", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredWSTD1", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredWSTD2", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}]}], 
     "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]lengthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"filteredLenData", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredLSTD1", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"nFilteredLSTD2", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}]}], 
     "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"shift", " ", "to", " ", "zero"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLength", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}], 
   " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLength", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}],
     "  ", "-", " ", 
    RowBox[{"filteredLength", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", " ", "1"}], "]"}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredLSTD1", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}], 
   " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLSTD1", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}],
     "  ", "-", " ", 
    RowBox[{"filteredLSTD1", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", " ", "1"}], "]"}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"filteredLSTD2", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}],
     " ", "=", " ", 
    RowBox[{
     RowBox[{"filteredLSTD2", "[", 
      RowBox[{"[", 
       RowBox[{
        RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], 
      "]"}], "  ", "-", " ", 
     RowBox[{"filteredLSTD2", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ",", " ", "1"}], "]"}], "]"}]}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Scale", " ", "time"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{"scaleTime", " ", "=", " ", 
  RowBox[{"DiagonalMatrix", "[", 
   RowBox[{"{", 
    RowBox[{"R0", ",", " ", "1"}], "}"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"F0", " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLength", "[", 
     RowBox[{"[", 
      RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ".", 
    "scaleTime"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"F1", " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredLSTD1", "[", 
     RowBox[{"[", 
      RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ".", 
    "scaleTime"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"F2", " ", "=", " ", 
    RowBox[{
     RowBox[{"filteredLSTD2", "[", 
      RowBox[{"[", 
       RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ".", 
     "scaleTime"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"lengthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"F0", " ", ",", "F1", " ", ",", "F2"}], " ", "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}], ",", 
      " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"0.5", ",", " ", "1.8"}], "}"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"shift", " ", "to", " ", "zero"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredWidth", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}], 
   " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredWidth", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}],
     "  ", "-", " ", 
    RowBox[{"filteredWidth", "[", 
     RowBox[{"[", 
      RowBox[{"startIndx", ",", " ", "1"}], "]"}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filteredWSTD1", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}], 
   " ", "=", " ", 
   RowBox[{
    RowBox[{"filteredWSTD1", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}],
     "  ", "-", " ", 
    RowBox[{"filteredWSTD1", "[", 
     RowBox[{"[", 
      RowBox[{"startIndx", ",", " ", "1"}], "]"}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"filteredWSTD2", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], "]"}],
     " ", "=", " ", 
    RowBox[{
     RowBox[{"filteredWSTD2", "[", 
      RowBox[{"[", 
       RowBox[{
        RowBox[{"startIndx", ";;", "endIndex"}], ",", " ", "1"}], "]"}], 
      "]"}], "  ", "-", " ", 
     RowBox[{"filteredWSTD2", "[", 
      RowBox[{"[", 
       RowBox[{"startIndx", ",", " ", "1"}], "]"}], "]"}]}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"widthConfidence", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"filteredWidth", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"filteredWSTD1", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ",", 
        RowBox[{"filteredWSTD2", "[", 
         RowBox[{"[", 
          RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", "Thick"}], "}"}], ",", " ", "None", ",", 
         " ", "None"}], "}"}]}], ",", " ", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"3", "\[Rule]", 
         RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}]}], 
     "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"pnostored", " ", "=", " ", 
   GraphicsBox[{{{}, {}, 
      TagBox[
       {RGBColor[1, 0.5, 0], Thickness[0.007], Opacity[1.], 
        Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVy2s0lAkAxnGXRFRIUjLKtLXksiFF0oNcVku2e5GEpjAyLUojo6im0ap2
UiObVWlrSroqhzalw4z7Gncxb1YnsZgx874UIjv74Tn/8/vwWISztjI01NTU
AlT7v9rqs4zGLb02dPyukanFkeHKpZTPjil0uM6r1zujclpUxp96KQ4wrd54
USNFBvbOzBNfOJ4IGREXTqs8UrfgkIyzFTWBHqkTp2Rw4HXs7eeEY61EvoI8
I0Mjo6S9lxOHXoNNOf9myHCzxerqR04aKgOVZuM5MrhZFa6Y9MrEsv0t0fvL
ZFBPIsfGb+ZAZii4uPyDDDyReODrpzyUNZAzBjXleCBNJmf2CHFnUHPVJis5
XiZvHNXjFiCAK1ja5S/Hsx0lvM2VT6Ae5+S0PEEOU+LQonYUotmyuirxuhxf
7uUKpRdeoKzG2kZSJgf9VbrnvTnFmP+Pdb32gBzlRlOdivCXWBiq3WpnOIzE
YO1j7IJXYBbGp9o7D+P4gIhW9f0bXLsR7uQcMYwv+7g9fq/K4FdqvEgrYxh7
hk6/vDz1FgsXh18ZKR6GSFl35atzOdTKy3OqeofBXNQpo4dWgO7m02mmo0Dx
AY8A21wRhM0ia/YSBdybYqw/V4rxbV0pL9tJAVYEqZ+nWwV1gb90KEABYUz5
6GHfapjxNxlYHVTA9NruoLHYGnB36rgZcxRY3ecrYjyuhXfZ9FsfgQLpu78+
4nfWQdwzi2b+SIE+j4lsYroe1pRYVi1SYGjztl9nb2jAyEmb+fXdCixA8VSy
owSWko0mEWOqfz/lzGiRYMFy3cBQIyXUN7cmhMQ1IndtX8dqOyUEFQsVz7Wa
kBFbanreV4lp/3Q5504TaI3NXbsilDj7Kdjm7rpmMC6Ic69zlDBY3xL9vq4Z
9+dJN9zJUiL2NtuGx2zBvKxL9i7PlRhYnGrLn26Bp1n10KoGJVzuvniqd7MV
O+yyHrwdUuKuh//RXqc20IMqbxTokDDJ5rk0VLVhIiHs447vSOzVIE+tjGxH
t3EnLd+TxOvkUu3eyXbMjdLn+oSSoHSKDA1zO+DM9CzMSSFhu2W7WcD6d2Az
L/OL/iBxNn/7wf6Gd5j82W/7zL9IPDFOcxxldULbVehO7yIxxjd0D9PqQsc7
SV30OAnvGp8AIqsLr/0NEw6YUGDMv0/UrJFCzK/wXe9M4Tbr8EOTWikmw9oX
/7CLQv9vg8TDeimU5i6fS1S2exY110sihS0tqs1rN4XiEQbrSKsUmrWO94L2
UKhj77Ov7paCjIznc4MpjJwOfJE0IkX60ayk7lAK3tfsSwkagcFlgcKrkRTO
lzyWxS8l8CmS5WoRRUHSaWuuu4zAM7+Q1gKVg2grT66xJJBZecu0IppCbB7d
45IDAZZB/QAZQ0FQYCRy9yVACIS3tvxCoaueP9rmR0D2d+5lQuWlw/orDvsT
UHhEpEfFUci3n30uewsB7zfbeKnxFF4XzfAjgwmkhTfVPj1KQbMjjc3bR+Bp
qcOg2zEKP46r5ZuHEWhcst+gRuUm1yndnw4SsH9vEfMhkYJJyAnXnkgC32yK
8mKPU9ibMs5MZBJoP2TSPaFy3o3EnDmxBIbOeVucY1PoKxutu32EQBjXPcoo
icJ/Dt15Yw==
         "]]},
       Annotation[#, "Charting`Private`Tag$311938#1"]& ]}, {}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{False, False},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0.9215114470760808},
    DisplayFunction->Identity,
    Frame->{{True, True}, {True, True}},
    FrameLabel->{{None, None}, {None, None}},
    FrameStyle->Automatic,
    FrameTicks->FrontEndValueCache[{{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
       Automatic, {{0.95, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1., 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1.05, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1.15, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1.2, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.9, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.91, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.92, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.93, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.94, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.96, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.97, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.98, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.99, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.01, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.03, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.07, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.09, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.11, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.13, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.17, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.18, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.19, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.21, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.22, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.23, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.24, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.25, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.2, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.3, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.4, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.18, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.22, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.24, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.26, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.28, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.32, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.34, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.36, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.38, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.42, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.44, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.46, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.48, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.5, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}}],
    GridLines->{{0}, {0}},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImageMargins->0.,
    ImagePadding->All,
    ImageSize->{54.327731092436835`, Automatic},
    LabelStyle->Directive[FontFamily -> "Myriad Pro", 
      GrayLevel[0], FontSize -> 16],
    Method->{
     "DefaultBoundaryStyle" -> Automatic, 
      "DefaultGraphicsInteraction" -> {
       "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
        "Effects" -> {
         "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
          "Droplines" -> {
           "freeformCursorMode" -> True, 
            "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
      "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->{{0, 0.46}, {0.9215114470760808, 1.2173036681564542`}},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}]}], ";", 
  RowBox[{"pnostored1", " ", "=", 
   GraphicsBox[{{{}, {}, 
      TagBox[
       {RGBColor[0, 1, 0], Thickness[0.007], Opacity[1.], 
        Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVz3k41HkAx3EqJZX0DCmbnla7CUOJovPjqCRH51oiSZES2iLEzDprbEtJ
1PRYK4oaLIUcUcpMOaZ1HzG/5ClnZsz1jalo7R+f5/28/vz86B100GeWkpKS
08z+7zzl+TTF2p07dDJLb6owhLh5jfnZjKkH4h7eODTjmNN/3lvA3ICw3U9V
G5hChLukREwwbHDFrTItKUoIOX/pKSHjILguHKVlcUJsYHV7DDO84fUgbCH9
qhAtPhVdA4zzKCmZq+LGFiKz3SD1IyMGlXb5sa9KhdhuULzm284UKFRJca1M
COVL0klFZjryvD7N1jIRgcV7Nfp1MAvxugrCOSVCniBSOrc/F0ZGH5zYOSJU
RtqSBZfz0Tb9fpTbL8LjXypYzq+LMKjLXeGlNw4d6tTyLhSjYm/qGQfvcUw8
yMgVJJaiZbeVukfGOPSqEmweLCpHWNlt2pe+cdTSpnrE3pWwKHB83K0uRqj7
vIvh+VW4Esc4tt9YjLBRnm6d/nP0DO9P+stZjAnPy/32VTV4HzJ46FOAGG5j
sZU3pl5AfXZhk851MXgS/s2vlrVwLuG4jD0Sw395j1DvGBf+O7rbHrWIUX7S
2sk4g4fJTIMnfnIxrFrPGn1+/Qqc/RvNF2lJEHRCujhLrQ6p6x3qCy0lyD1b
SwLs6uGXxLaVuEugc9v1yGRgA/L8tLbQGBKYD9nxfAobsWU1+5btXQkSXL/+
k9zDB6Wh0eVUK8GQ9Rc29f0Nair21o18lGDM+dDVhTuaEK1Gd703X4qlKJ+K
NGvG1HRWshFdioRhmaVPezOkLXd47w5IoezcEXz0fAvqmCFWhqFSpHGXiUtU
WjFdNJZofkeK744JIsb9VjQOv5iOqJEiftCdnrOlDVOrbBwiPkqhsa39zDt+
G7y7/pXMUZUhMDuczvJvB3ttab3ARIbRH6KNk7+34/nInUTPQzJszil9tCCz
A7ZMr2vbImTIsXYMGdjYCeWz622qM2XQZrM2N9V1QrP62QkuTwaPWdIoQ78u
sJxfRmwWyfAssnrewLcuhJu58G005ZCpPlmyJKMbK7mKvLrtchgfOLzCadtb
hHJe6gt85YjnHPYdbnqLmimNsuBEOYq0YsxIUA/oMd4p6WVyTCYvsTqu0ovO
waYP1n1y7GrY7UTd6sWeWcU3fOYS+Gg+pBo2CbDUxMLEyJQgOyigQLtRgA5L
xbSnG8Hw9U9UwRsBXnwmP9OOEJg8Pq2+s1kAfe3Ug69nXC73CTrXIcCJn55W
rfMg4Id7mtb3CTAp47QrHSOQx+4rvSQXoCh+O+3eSYJdt02rKV0KQbf28UVB
BH9UFAovrKKQdH84N/scQXOP8Uq11RTWWRkkuP5GcETX8PdNaylcrLnr8fI8
QWCWnvW1DRRGLgTbpYUQpOXTeFZ2FPr7uHREEPS+SSad9hQCdEe95TNeNb54
TYAjBcKoyHgYScAxXXiFfYBCrdOv+ppMgmdP5thL3Slwi1IiR6IIZnfHhLM8
KZQlqb/PiCbYo1DirDxOwbbX3P5wDEHr1ik1B18K833j6M9jCbSPRmzt96Ng
MVGQExxH4MFU+If6UxhIj11jGE+Q9Xdo+qLAmX9RKvl9Mx6qIfzscxQKG80s
Ui8T/Af0todK
         "]]},
       Annotation[#, "Charting`Private`Tag$302398#1"]& ]}, {}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{False, False},
    AxesLabel->{None, None},
    AxesOrigin->{0, 0.9215114502412718},
    DisplayFunction->Identity,
    Frame->{{True, True}, {True, True}},
    FrameLabel->{{None, None}, {None, None}},
    FrameStyle->Automatic,
    FrameTicks->FrontEndValueCache[{{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{0.9, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1., 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1.2, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {1.3, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.8, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.82, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.84, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.86, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.88, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.92, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.94, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.96, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.98, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.18, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.22, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.24, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.26, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.28, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.32, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.34, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.36, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.38, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {1.4, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.2, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.3, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.4, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.18, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.22, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.24, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.26, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.28, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.32, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.34, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.36, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.38, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.42, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.44, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.46, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.48, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.5, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}}],
    GridLines->{{0}, {0}},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    ImageSize->{69.62184873949585, Automatic},
    LabelStyle->Directive[FontFamily -> "Myriad Pro", 
      GrayLevel[0], FontSize -> 16],
    Method->{
     "DefaultBoundaryStyle" -> Automatic, 
      "DefaultGraphicsInteraction" -> {
       "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
        "Effects" -> {
         "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
          "Droplines" -> {
           "freeformCursorMode" -> True, 
            "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
      "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->{{0, 0.46}, {0.9215114502412718, 1.3453571468678367`}},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}]}], ";", "  ", 
  RowBox[{"pnostored2", " ", "=", 
   GraphicsBox[{{{}, {}, 
      TagBox[
       {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
        Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkchpXu2lxD1hKlIpfIdamfo1LpojhdTKF2U4yGoeOQy3baxWxq
mDomCWW3GW1OW9E0JtGPzBhz+WoGg2G+LnKt1qKUxqWd/eM97x/v+zx2PyWG
xczV09Pbo8v/nbn6QbH/7CVInEq51GbBQy3N++SHbUyIHOwYC7TmYVpNnUcZ
kwns88LF91byMCVEIpu1zgf55EtPhiMPE+i9M43+BRA+bpTm5c/DDVFL3Dl1
LBAbx1Wfj+KhfWUA20l7BaijDFc1h4cLg/6I9EkpgkytNCV3wyMsixEGr75a
Dosc2eZdFD56r8/jb7XlwlPJBHskvgZ5B/j7bly+A9Fi3+8fJAtw8G5S7ZkT
94CDBxV78h4j89dvWfTkKshAqnN4Xi3qiZgL+nsfQmp3jFfB9Sc44Be6+vN2
PmyxPxz4sLwOd93/6tL2mwACnZLvNrPq0eBJvO3Iv7VQt+5gUAzrKYaIm6fb
PerhTfeEQV064vT8A4mHqQgzk7H8YNcGzKap+pYON4C7fZT0dkUDhnR9YoQv
egYO3604vGR5I25aNmnzGJqgZsIRb+U1IpUs1KMlCUHPo6DReLoRO5zXdOXm
i0BNz31vdeIZ0reX3MKmZphmqn62aHuGO3vnxUT1iYHtaF0869uE+3aEWVn/
IAGvqniXcm4Tsrb7Wa3bJ4VtbltKc5YJ0UhsZnQ9QQYXtprSexKEWG/c/tWJ
K4dLsbSaKpUQKzUMtZ2YgMiWjNBNniJUBKr0T719DhnnBdVXC0Ro4qt/ud9A
AecqXFP9x0SoMTQvkZYo4PfS0LgFu5oxgLCyRR8lRPx1wXi0shn9Dp1u6VYo
wWbTi/6ahWI8aCc4fSe6FWxF62MNI8W4WDmRx9C2wkJzdvohgRg1DS4cy4tt
oPVaYxGztAV3Z1X3KizbIftH78j6yBYMt3UsuVbdDoO8omINrwXPzrm+1zRI
BZ8LK8Ot5kvQWzKdUUaqIGJOdtYURYKmyghOd0IHbDajUZ0qJcjk6o9vnumA
L5L9Ta8/S7As+ubj6qJOmJEnMc13SpGI8MpUr+2CkeLQ2MFCKRb61QsMhV0w
HDZMWTEgxS/9l61okWqYy306RnrKML31WGrWBzUYVDWSOVkyLOTY7S1jdIND
fbB/okyGz/kaW7plDwwa55geN5Ujh91nTq3ogYTxnrduEXI0prxknAnUwPL8
Ke4qjhxvRLV+dFNoYKC9SH50WI5KR9+mqlYNjOnnUFjv5DhvouzKRpUGSpVL
e5rey5F6Mc7dp1sDa1Z+fOg0IkcfgV7i5j4N7KeFiL6My1Fh7PZu96QGzvT+
eapgWo76oouv41aSYGfwic8zJNCbNXb/vT0Jbyg5JQNGBFKPHDpHcyChV38o
2dKEQMWYvU2SEwla33XaDDMCS21qj6R5kvDCREgNWqHj04Y6cneQkH5zSCW3
JzBuy96KRbtIsMejQzOrdP9lvJS8PSRQ2PX/uDoQOJd7ziw/jIS2gN1K1loC
XyjNw9hHSfA4QkyFO+v2skw7i2gSqkw6udkuOn9s7+i14yTEufUEPXLV+Wb/
Lig9SYI6UX3A3F3HS0yjbeJICPjWIQv20PHss67l8SQ4y1SeqRsJ9Dr2asYu
gYRfLnSybnsSGLt+G3GLTsLiUfJVpxeB/wEBjI5s
         "]]},
       Annotation[#, "Charting`Private`Tag$310686#1"]& ]}, {}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{False, False},
    AxesLabel->{None, None},
    AxesOrigin->{0.014156776511059444`, -0.2282056658840477},
    DisplayFunction->Identity,
    Frame->{{True, True}, {True, True}},
    FrameLabel->{{None, None}, {None, None}},
    FrameStyle->Automatic,
    FrameTicks->FrontEndValueCache[{{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
       Automatic, {{-0.225, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.2, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.175, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.15, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.125, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.075, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.25, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.245, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.24, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.235, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.23, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.22, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.215, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.21, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.205, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.195, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.19, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.185, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.18, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.17, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.165, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.155, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.145, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.135, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.13, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.115, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.11, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.105, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.095, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.09, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.085, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.07, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.065, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.055, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.05, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.2, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.3, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.4, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0., 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.18, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.22, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.24, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.26, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.28, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.32, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.34, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.36, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.38, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.42, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.44, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.46, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.48, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.5, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}}],
    GridLines->{{0}, {0}},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    ImageSize->{64.32773109243686, Automatic},
    LabelStyle->Directive[FontFamily -> "Myriad Pro", 
      GrayLevel[0], FontSize -> 16],
    Method->{
     "DefaultBoundaryStyle" -> Automatic, 
      "DefaultGraphicsInteraction" -> {
       "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
        "Effects" -> {
         "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
          "Droplines" -> {
           "freeformCursorMode" -> True, 
            "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
      "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->{{0.014156776511059444`, 
     0.46}, {-0.2282056658840477, -0.07848856143207937}},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}]}], ";", " ", 
  RowBox[{"pnostored3", " ", "=", " ", 
   GraphicsBox[{{{}, {}, 
      TagBox[
       {RGBColor[0, 1, 0], Thickness[Large], Opacity[1.], 
        Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVkWs01AkYxiei2trtwlIUjWxtFKs2l9V6HZcI4ZBklWl3k5DL0Ljs6tSW
NdtFUU0pRiyjTW5pjHGZ3vEfl4YwFyOX+W9liZYtdkhpaGc/POc9z3mf3/Pl
of4QFxCuRaFQ9mn0/00zr7rluHAJdCY8T8sNuTgXY3tswj0TVD6++Y7ruJhS
27iDnZkJL8oDBUVGXGR4iTsW1l8GQVzYh8QNXIyNH5pvcrwCSarEZP1NXPwq
7BOb4sYsGJ3Ljwuy4qJZ6W6WxdxVEC+boT114+ISl8LDdoybcGlLofMgnYvs
8OY95jcKIOMf7XsMORdtLS/w3Ew5wCvpccmxqkFuEM8/P/seZPzqsWuKWYOj
ZfT6xKMVIH7d3KUcq8HMsx9PxSc8AFfvqlv+rjyktGTqjgw9BJsdJcuDOTx8
6eBn/taDB0Inp95rOrXoXfl+u/wcH9Kd3GQHabW4vCHa9PWbemh8vJ9RJaxF
r7ZWdc8OAVjske/NMuajWico7mAUgsMrVVLJST6mxyiGV7wSQoOBqbefgo9e
fdPMwKUEJNrx/c9Y1+G3n70zqQMR3BkKnXfNrsMo8jolht4M0Q8LtZym6rB3
2+a+jMstEJsc5CD0qsd4j9wiFLXCcIueoeJ+Pe4dWhweNtwGWUucNyfoNqC/
Z4DR+g1iqJInKQuPN2CWh4PRl/7tEN/iN75E3ICr2vRX3Y7tgIjSG5ZvzRpR
sLrnvQXnCUjXja1JTm/EUiWzn9rWCfS0u5ZnnjWixFmhHfFXF1QvXsZGewGu
sdfOHlkugWOGjJrsWwJUrjTIbc+VgP8Gv4/jKgHu7jQyRTspVJTvnOwLeoQO
wSceD0ikUPZjvYO65hEeoPJP3KPJ4MWKSu7dlYjLpDMXmHMyOO9c0TsSj6gU
bi9ee1EOERHGFmUdiD6nqocka3tAFfJ59P41Qgw03ZqbU90DJ9x/189zEWLq
otu+ei4KOGPxsvdunBBtxeqf2aQCuvdXTqQVCFFPGlI8ENsL/BRrY4MuIWZy
tP91mu8FeiUlqX1OiGzanbrqm08h3DLY3NOyCTtDdqX1b+kDVcHR8fMHm/C6
g4C/srkPGkJndVjnm3B2JNso5nA/BG4d9Gmoa8KfZEeST030A3OSUcZ5qckX
U33ZzAGYVrNoIYYEdvGUpvFrB0GtFWMpdSOwmDVsEFUyCApj1qajdAJXf/cn
M9FZCaOpLnHCQgLzw2Qqa4kSrktL5M+7CJRutRc9kCkh9Hl4YGk3gYtn2Fd3
KpRAfWMuT5QQGHUx0sZuQAkVK4pkujIC7fiUOKdhJYg97ki3KQiUrLb+2+ed
EhYEN7tTBgnUbrn4PHIjqdn/t45VYwTaZk1VjpuRYFXn4T2g8VGhwadjviBh
pk23o+iVhp8yM6FbkHB2JL3ddpzAPJP60JSvScjb+Iv40GsNnzLWm+FJgvRG
atsf0wRGuvqWLPUmIYdj75Ewo8l/xmVc2EdCGHe21fEtgVqc0/qXA0gYlzJa
u2YJ7JYaBLAOkaD7aULL9Jzmz06jGtJIeGJs4/7og6b/+NBkzvckXLOYbGaq
NX0L5VfyjpGw0TO22WhBw4v1aCaRJIwe2O42rPFarFSrgmgSysMnROUfCdx1
5Nk8NZaEkyfvuyZTRHjc0r2zKJ6Eb85FiZwXifA/G3CYsQ==
         "]]},
       Annotation[#, "Charting`Private`Tag$301146#1"]& ]}, {}},
    AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
    Axes->{False, False},
    AxesLabel->{None, None},
    AxesOrigin->{0.014156776511059444`, -0.14847573797035257`},
    DisplayFunction->Identity,
    Frame->{{True, True}, {True, True}},
    FrameLabel->{{None, None}, {None, None}},
    FrameStyle->Automatic,
    FrameTicks->FrontEndValueCache[{{Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
        Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
       Automatic, {{-0.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.155, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.15, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.145, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.135, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.13, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.125, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.115, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.11, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.105, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.095, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.09, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.085, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.075, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.07, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.065, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {-0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.2, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.3, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0.4, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
           AbsoluteThickness[0.1]}}, {0., 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.02, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.04, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.06, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.08, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.12, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.14, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.16, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.18, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.22, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.24, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.26, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.28, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.32, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.34, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.36, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.38, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.42, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.44, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.46, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.48, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}, {0.5, 
          FormBox[
           TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
           AbsoluteThickness[0.1]}}}}}],
    GridLines->{{0}, {0}},
    GridLinesStyle->Directive[
      GrayLevel[0.5, 0.4]],
    ImagePadding->All,
    ImageSize->{43.15126050420105, Automatic},
    LabelStyle->Directive[FontFamily -> "Myriad Pro", 
      GrayLevel[0], FontSize -> 16],
    Method->{
     "DefaultBoundaryStyle" -> Automatic, 
      "DefaultGraphicsInteraction" -> {
       "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
        "Effects" -> {
         "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
          "Droplines" -> {
           "freeformCursorMode" -> True, 
            "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
      "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, 
      "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& ), "CopiedValueFunction" -> ({
          (Identity[#]& )[
           Part[#, 1]], 
          (Identity[#]& )[
           Part[#, 2]]}& )}},
    PlotRange->{{0.014156776511059444`, 
     0.46}, {-0.14847573797035257`, -0.07848855836429898}},
    PlotRangeClipping->True,
    PlotRangePadding->{{
       Scaled[0.02], 
       Scaled[0.02]}, {
       Scaled[0.05], 
       Scaled[0.05]}},
    Ticks->{Automatic, Automatic}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"pnostoredWid", "=", " ", 
    GraphicsBox[{{{}, {}, 
       TagBox[
        {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
         Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxgdZlS7IWmtjGke1udRmQ4N6226sW2JDK6RDRbmVa42KXTmZ
vjFkwjCuQ4kmJMntrS2NSaNxzeX7bDtGN6q1m6LQzv7xnue853l+P8ahCI9g
VRqN5qq8/5NlUp1rN38R2Bt6euNTRPgpzPrwxC4ChhM1jDWSRRh/u9lSQBDQ
bs4W886IMMZJ0jG/kgNPXsvt6uJEGB4pn7tnlw4XX/RIpkJE+IP/4o3CZi5I
RptOsd1EaHzNnmf6KRPOFDInafoi1Nhe7GcTkw32k2+qtauuoyD4wW6Ty0VA
7IFBK3EVWpul1e+klwE/ULe79WMl1u2rdy/IqIBYs9FOdctKfFEV1XgySATT
hXrPbwVeQyL5S2LkiRqgzfi5vhFWIK2N+GpMfhPUBqbPO41cxefMPSYfHOph
2U8n7FYxrqLzjRmLnt8aIDNWntMacwU1m47R375rhBk3Y5/d98rRSfxwttey
Baya9rTVGJbjrPq+CJ9QhGqDpLJHSWX4e1ifYsmru2D7gXzHooToNPA+1XPh
H5CSu6k911GIW5ZNG92B+yCdX3turLIUQ6ksWljUA9hO35hcoVeK/eZrBs5z
2uBxysqChPQSjHTIK8X7DyE6g1Wko1KCP8sXBPsrxCDNvblN9Vwxujt6GKw0
lICmyEVgP12EXAemwffuj8CuZMulydgi1BLravHDO6C2aNz3sUoRtmj3zpiW
PYbNSaoT40sK8RqZOsgQS8GLZhrhblGAsm19akdGO8HRZZ26lY8AdTarZYxp
ysBCz8y5Ii4fyeV6eY/yZHDPNZNuXpWH9lIDOtp0gdDpjd/ifj4yvY+3D8m6
YJT/9azhYj56MRqOVwR0g4aJ6Wf/vbm4qGsqLfVTNxDlPiNSTg6Sdy2E+uwe
cFmtnxg9ko0uibVymX4vzK6eqwq0zkZP+rq8nNpeKIwbZtmmXMYEFb7biu19
YDtZ7HVLwUNryexpAdUH/NM7nrbY8XBF137hUHg/2DBsJdySLCTK1P7ZOtcP
tw2z1/O0slAQUHinNvsp1D37EtQRewml+61Yg2sHYE3z2Klj45mYxWxpWP5g
AN7JDknFPpn4cSzDIMxvEHTKDxwxlmbgqe6DcYkTg5CwaqGDwC0Ds4QMN0Hq
EERb+DUHSbjYWU/SI/WHwVmzVbPUnYtCnkIvtHwY9przd3/blI7av46kntxG
QmVH0uUL7Rws8O/+d4OMhP5NON00QWDXus33a7pJ+KLTyH3/ksAFU4LMH/tI
aMHnJRZjBIayQzbaDJFAGmZbFVME2jTQIrYqSFAYFOpwOgmUaW947TJNwoK0
MsGZagLV2tjPQlZR0NjhndYYTaA1d/LGuDEF6mwPJ9Uopc/X+2zYauX/jJ3s
FKbkJ42NokwpWKo47UsGE5hv1Ogbv4mC6OT86+reSj7+Zf95RwqS05ht4UwC
Q3a4lS90puB1ulSl1Uq5X1YXk+ZKQS6n/NZSSwJVy87qcjwouKH1KllkSuCT
Lj0P3gEKPuz7XDP1nbIXsBjfBFAg81S94qiv9B+V/50TSEEDq0snX1fpm7+e
nn+YgryXF9x2LlXykhUBRiEUaEx7GuUuUvK8hPVFxyg43HEl6K06gVYH/5xj
hFMw2R7D2KlK4FGzXdLSSAr+8hL9wp+/iP8B8SB/6Q==
          "]]},
        Annotation[#, "Charting`Private`Tag$313189#1"]& ]}, {}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->{False, False},
     AxesLabel->{None, None},
     AxesOrigin->{Automatic, Automatic},
     DisplayFunction->Identity,
     Frame->{{True, True}, {True, True}},
     FrameLabel->{{None, None}, {None, None}},
     FrameStyle->Automatic,
     FrameTicks->FrontEndValueCache[{{Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
        Automatic, {{-0.06, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.05, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.04, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.03, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.02, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.07, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.068, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.066, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.064, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.062, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.058, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.056, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.054, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.052, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.048, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.046, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.044, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.042, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.038, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.036, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.034, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.032, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.028, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.026, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.024, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.022, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.018, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.016, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.014, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.012, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.01, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0.3, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0.4, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.02, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.04, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.06, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.08, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.12, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.14, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.16, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.18, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.22, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.24, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.26, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.28, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.32, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.34, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.36, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.38, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.42, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.44, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.46, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.48, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}}],
     GridLines->{{0}, {0}},
     GridLinesStyle->Directive[
       GrayLevel[0.5, 0.4]],
     ImagePadding->All,
     ImageSize->{50.79831932773152, Automatic},
     LabelStyle->Directive[FontFamily -> "Myriad Pro", 
       GrayLevel[0], FontSize -> 16],
     Method->{
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}},
     Ticks->{Automatic, Automatic}]}], ";", 
   RowBox[{"pnostoredWid2", " ", "=", " ", 
    GraphicsBox[{{{}, {}, 
       TagBox[
        {RGBColor[0, 1, 0], Thickness[Large], Opacity[1.], 
         Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHk81AkYxseRXInGSjYGHbsmUsoxZF9JqRyJtbqYaiPjGCNEu6nYSh/6
YTDJMSKDMI1STXLsmxxDohkZi+ZXu5bt3NWxSqVpZ/94Ps8fz/P9Wu2PCwxX
p1Aofqr830eXXilyU56FLPsHQymnRPgx1ini5UYCpu1creemizDlZqsDnyCA
2lsj4R0TYdLW3j7l4mxII9LcrieLkM0Z/9zulgPm2+wl0ywRrgrTXS1ozYWd
NxLYWf4itK5bx6N/zIM9bM5jiqkI53pWhDonFUIk0/yQkfAy8sM7Ny09Vw7r
f6yxcZII0WlFptiLVgUxDZae+L4erweLA8q4tVAxFuGq5VCPT4TxzQkHRBAW
Ob5XvK8OifQvqZxDVyH1XkXf34JapHQRWpPj1yBjYaKez6NL+Bdj29J33mLw
noqXWFpdQp+GD3YPfmmCXVXpWphUg3ot0bR/ppqBGZ7ftqm9GrdKumeHHNrA
5a62aaN5Nc7OCY7bEYUwarBQsy+tCk/Gyif0n90GuZwSnEoKcOvIvxlB2ndg
VaLQsGSzAN0NZixuQQd45R88/KS+EqPIAkpsfCd8Vcll1JtU4rDt8pHT2V3g
F00bPZJzETneJZXY0Q06iUK1BWoXccu4ZnjYhASmN3xxVT9RgQGbA80Wm/fC
El9+qPtMOeZ6M8y+DbgL2g7lkteHy9FQYmxYzO4DRrrv+j61cmwzGvpAr7oH
T++3HHqmfwHrFBmjVpJ+6DY40bDNrgylHnKNg38OwPx5li8cd/BxgYsGd1JP
CtIpi7V1yaWomG9ScrdECgc8n12yFZbgun4zGjrL4I8EEOsOFyMjJKZnTCqD
g4u2e1joFuMPVk0xtcxB0DRut2VuL0Id2XRmxsdBmGwZmOnPPo+K23YC06wH
cJ/6pCzxUSH6pjaOS02HgLbYznC/UyEG0WxKzjcOwRhr9YzrqXN4RK3Yn+op
h+icJWdvTPDQqXf2Zz4pB83Tha/a3HhIle0UjLGHob5V63vuxQIkqjTefPd5
GLwNg4Q8wwLkMy/caiz8DbI1Izl9h/Oxf6fj0dFvRkC/R0hEv8jDAkZb0/zO
EVizvCK6Z0cevp/kmsWGjoJfc+NN634u/jS4Nzn15Sgs6wxy4PtzsUBg5c/P
GAN9v5PKA725OCBW0DimDyEk1OZMZUAuCngTJlHVD8G9hvl8UUsOGu16lJHg
oYCHHWRUZk82loUNvrWXKmBDyavO1pcEymxcOq4OKoDbTd8z/ZRAzWl+3hq5
AoxOFcSunCQwKou12nlMAcHvmpQVJIHOTZS47yYUUOvFG8keIFBqZP/cd0YB
aRGmocevEKjRlfU7y5KEGra9e0sigU65rxteWJOwJYYzqx6v8u0OOR67jIQz
g2/W+MSq+NfWFvF0ErjUY3pkOIGlFs27U9aqdnXlLq0QFZ/ydPj0ZhI+sSzZ
cQwCWRv8q7V9SCBlrnW/Oqr+BteTMv1IoBIXQg0cCFSvOm6cHUiCrYsuvYFO
4H2ZSSBvDwn3Pl0Lefe1aucftVrIJMG4iOO7xVTljxx/dX4fCbpfPt0sNVb5
lJdzSiNIEDPXv/Wap+J7qUwLFgntyYo7RToqnndkZXk0CfR8bZ2pOQQ67n38
2YpNQqmHuMtLncDIFRv7KzkkdBgMzxQrz+J/ifFyYw==
          "]]},
        Annotation[#, "Charting`Private`Tag$303649#1"]& ]}, {}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->{False, False},
     AxesLabel->{None, None},
     AxesOrigin->{Automatic, Automatic},
     DisplayFunction->Identity,
     Frame->{{True, True}, {True, True}},
     FrameLabel->{{None, None}, {None, None}},
     FrameStyle->Automatic,
     FrameTicks->FrontEndValueCache[{{Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
        Automatic, {{-0.06, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.05, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.04, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.03, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.02, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.07, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.068, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.066, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.064, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.062, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.058, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.056, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.054, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.052, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.048, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.046, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.044, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.042, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.038, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.036, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.034, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.032, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.028, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.026, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.024, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.022, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.018, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.016, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.014, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.012, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.01, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0.3, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0.4, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.02, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.04, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.06, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.08, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.12, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.14, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.16, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.18, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.22, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.24, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.26, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.28, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.32, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.34, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.36, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.38, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.42, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.44, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.46, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.48, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}}],
     GridLines->{{0}, {0}},
     GridLinesStyle->Directive[
       GrayLevel[0.5, 0.4]],
     ImagePadding->All,
     ImageSize->{68.44537815126012, Automatic},
     LabelStyle->Directive[FontFamily -> "Myriad Pro", 
       GrayLevel[0], FontSize -> 16],
     Method->{
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}},
     PlotRange->{All, All},
     PlotRangeClipping->True,
     PlotRangePadding->{{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}},
     Ticks->{Automatic, Automatic}]}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"g1", "=", "5.133415384573404`"}], ";", 
     RowBox[{"g2", "=", "5.010676553113143`"}], ";", 
     RowBox[{"\[CapitalSigma]", "=", "5.744056677218134`*^-9"}], ";"}], "}"}],
    "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"GraphicsRow", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"\[Delta]plotStoredWid", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Dashed", ",", "Thick"}], "}"}]}], "]"}], ",", 
       RowBox[{"\[Delta]plotStoredWid", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "2", ",", " ", "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Yellow", ",", "Dashed", ",", "Thick"}], "}"}]}], "]"}], 
       ",", 
       RowBox[{"\[Delta]plotStoredWid", "[", 
        RowBox[{
        "g1", ",", " ", "0", ",", " ", "0", ",", " ", "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Purple", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
        "]"}], ",", "\[Delta]widthConfidence", ",", "pnostoredWid", ",", 
       RowBox[{"(*", 
        RowBox[{"pnostoredWid2", ","}], "*)"}], " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"\[Delta]plotStoredLen", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Black", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
        "]"}], ",", 
       RowBox[{"\[Delta]plotStoredLen", "[", " ", 
        RowBox[{"g1", ",", " ", "g2", ",", "2", ",", " ", "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Yellow", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
        "]"}], ",", 
       RowBox[{"\[Delta]plotStoredLen", "[", " ", 
        RowBox[{
        "g1", ",", " ", "0", ",", " ", "0", ",", " ", "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Purple", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
        "]"}], ",", " ", "pnostored2", ",", "pnostored3", ",", 
       "\[Delta]lengthConfidence", ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", "}"}], "]"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"GraphicsRow", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"plotStoredWid", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Epsilon]", ",", "Dashed"}], "]"}], ",", "widthConfidence", ",", 
       " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"plotStoredLen", "[", " ", 
        RowBox[{
        "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
         "\[Epsilon]", ",", "Dashed"}], "]"}], ",", 
       RowBox[{"plotStoredLen", "[", " ", 
        RowBox[{
         RowBox[{"-", "1"}], ",", " ", "0", ",", " ", "0", ",", " ", 
         "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Dashed", ",", "Purple"}], "}"}]}], "]"}], ",", 
       "lengthConfidence", ",", "pnostored", ",", "pnostored1", ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", "}"}], "]"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"(*", 
    RowBox[{"Manipulate", "["}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"G1", " ", "=", " ", "0"}], ";", 
     RowBox[{"G2", "=", "0"}], ";", 
     RowBox[{"G3", " ", "=", " ", "0"}], ";", " ", 
     RowBox[{"\[Epsilon]", " ", "=", " ", "0.055"}], ";"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"GraphicsRow", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Show", "[", 
       RowBox[{"widthConfidence", 
        RowBox[{"(*", 
         RowBox[{"ListLinePlot", "[", 
          RowBox[{"normalizedWidData", "[", 
           RowBox[{"[", 
            RowBox[{";;", "endIndex"}], "]"}], "]"}], "]"}], "*)"}], 
        RowBox[{"(*", 
         RowBox[{",", 
          RowBox[{"plotStoredWid", "[", 
           RowBox[{
           "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", "  ", "0.039", 
            ",", "Dashing"}], "]"}]}], "*)"}], ",", 
        RowBox[{"plotStoredWid", "[", 
         RowBox[{
         "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Epsilon]", 
          RowBox[{"(*", "0.07", "*)"}], ",", " ", "Dashed"}], "]"}], ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
      RowBox[{"Show", "[", 
       RowBox[{"lengthConfidence", 
        RowBox[{"(*", 
         RowBox[{"ListLinePlot", "[", 
          RowBox[{"normalizedLenData", "[", 
           RowBox[{"[", 
            RowBox[{";;", "endIndex"}], "]"}], "]"}], "]"}], "*)"}], 
        RowBox[{"(*", 
         RowBox[{",", 
          RowBox[{"plotStoredLen", "[", 
           RowBox[{
           "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", "  ", "0.039", 
            ",", "Dashing"}], " ", "]"}]}], "*)"}], ",", 
        RowBox[{"plotStoredLen", "[", 
         RowBox[{
         "g1", ",", "g2", ",", " ", "\[CapitalSigma]", ",", "\[Epsilon]", 
          RowBox[{"(*", " ", "0.07", "*)"}], ",", " ", "Dashed"}], "]"}], ",",
         " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", "}"}], "]"}], 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{",", 
      RowBox[{"{", 
       RowBox[{"G1", ",", 
        RowBox[{
         RowBox[{"-", "0.08"}], " ", "0"}], ",", 
        RowBox[{"0.08", " ", "0"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"G2", ",", " ", 
        RowBox[{
         RowBox[{"-", "0.2"}], " ", "0"}], ",", " ", 
        RowBox[{"0.3", " ", "0"}]}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"G3", ",", 
        RowBox[{
         RowBox[{"-", "16"}], " ", "0"}], ",", 
        RowBox[{"25", " ", "0"}]}], "}"}]}], 
     RowBox[{"(*", 
      RowBox[{",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Epsilon]z", ",", " ", "0.04", ",", " ", "0.1"}], "}"}]}], 
      "*)"}], "]"}], "*)"}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8008704120947905`*^9, 3.800870413433179*^9}, 
   3.8009469237133245`*^9, {3.800946980243506*^9, 3.8009470048576193`*^9}, {
   3.8009506517886767`*^9, 3.800950659705493*^9}, 3.80095430971691*^9, {
   3.800957855670513*^9, 3.800957858978647*^9}, {3.8009582527395306`*^9, 
   3.8009582620506163`*^9}, 3.801126267328684*^9, {3.801149328710244*^9, 
   3.80114933223582*^9}, {3.8011494356940317`*^9, 3.8011494382362356`*^9}, {
   3.8012289792459793`*^9, 3.8012289956042504`*^9}, 3.8012291233507557`*^9, {
   3.8012293980035567`*^9, 3.801229399803769*^9}, 3.80122953319917*^9, 
   3.801239707000698*^9, {3.8012398913319397`*^9, 3.8012398935510073`*^9}, {
   3.804056260216545*^9, 3.8040562628684564`*^9}, {3.8063900907864065`*^9, 
   3.8063900913139706`*^9}, 3.806390274896132*^9, {3.8063954171310616`*^9, 
   3.8063954186519933`*^9}, {3.806395632654784*^9, 3.806395653325517*^9}, {
   3.8063957001612835`*^9, 3.8063957080013204`*^9}, {3.80639575776172*^9, 
   3.806395758312248*^9}, {3.80639579563246*^9, 3.806395803806604*^9}, 
   3.806395949810214*^9, {3.806500506891198*^9, 3.8065005102163067`*^9}, {
   3.8065007918439445`*^9, 3.8065008389539804`*^9}, {3.8065022058736615`*^9, 
   3.806502219890189*^9}, 3.806502439067151*^9, 3.806503006163316*^9, {
   3.80650394217831*^9, 3.806503998656261*^9}, {3.806504043313878*^9, 
   3.806504096756999*^9}, {3.8065056126976953`*^9, 3.8065056212897215`*^9}, {
   3.806506366215487*^9, 3.8065063924832287`*^9}, {3.806506455900687*^9, 
   3.806506502516038*^9}, 3.8065065502114887`*^9, {3.806506637724516*^9, 
   3.806506653058519*^9}, {3.8065067127957907`*^9, 3.8065067149540167`*^9}, {
   3.8065068222900543`*^9, 3.806506835617386*^9}, {3.8065069084107714`*^9, 
   3.806506937082615*^9}, {3.8065070468620815`*^9, 3.8065071077193885`*^9}, {
   3.806507191523281*^9, 3.8065074146974463`*^9}, {3.80650745689466*^9, 
   3.8065074767841043`*^9}, {3.8065075423449163`*^9, 3.806507548428649*^9}, {
   3.806507637209264*^9, 3.806507641536693*^9}, 3.806507849532674*^9, {
   3.806646220932152*^9, 3.8066462249753704`*^9}, {3.807363212417857*^9, 
   3.8073632676002855`*^9}, {3.8184338212859764`*^9, 
   3.8184338306687226`*^9}, {3.818433909452319*^9, 3.818433915713244*^9}, {
   3.8184339532214966`*^9, 3.8184339949826126`*^9}, {3.818434080856442*^9, 
   3.818434258030348*^9}, {3.8184342938498197`*^9, 3.818434353489927*^9}, {
   3.8184343981353135`*^9, 3.818434508150518*^9}, {3.818434554549091*^9, 
   3.8184345551041584`*^9}, {3.818434607855795*^9, 3.818434637854223*^9}, {
   3.818434684864007*^9, 3.818434728095463*^9}, {3.818434840803506*^9, 
   3.818434890582713*^9}, {3.818435014147024*^9, 3.8184350364462385`*^9}, {
   3.8184353789449835`*^9, 3.81843538187169*^9}, {3.81843550278528*^9, 
   3.8184355035876474`*^9}, {3.818435550553876*^9, 3.818435716368368*^9}, {
   3.8188448717353077`*^9, 3.8188449189750204`*^9}, {3.8188459691745176`*^9, 
   3.8188459714694023`*^9}, {3.818846082574574*^9, 3.818846104086852*^9}, {
   3.81885397496191*^9, 3.8188540144421153`*^9}, {3.8188660276477947`*^9, 
   3.818866044787944*^9}, {3.819803156383616*^9, 3.81980318158624*^9}, {
   3.8198032288061886`*^9, 3.8198032529626036`*^9}, 3.8215145067707205`*^9, {
   3.821610442348511*^9, 3.8216104565147257`*^9}, {3.821610552461155*^9, 
   3.821610552633693*^9}, 3.821610775772002*^9, {3.821612800751828*^9, 
   3.821612811448226*^9}, {3.8216136277609787`*^9, 3.8216136353925467`*^9}, {
   3.8216347872774563`*^9, 3.821634793011121*^9}, {3.8217148712057643`*^9, 
   3.821714874093072*^9}, {3.821714906103468*^9, 3.8217149235897007`*^9}, {
   3.82171609086761*^9, 3.821716104349581*^9}, 3.8217161507425213`*^9, {
   3.8217163828116813`*^9, 3.8217163882565546`*^9}, {3.8217164418618016`*^9, 
   3.821716443556259*^9}, {3.8217204411348906`*^9, 3.821720456479098*^9}, {
   3.8224685816490755`*^9, 3.822468589671632*^9}, {3.822471621208192*^9, 
   3.8224716216699286`*^9}, {3.822480083486864*^9, 3.822480105513955*^9}, {
   3.822480151571806*^9, 3.822480151713425*^9}, {3.822480683748168*^9, 
   3.8224806896418767`*^9}, {3.8226596452033377`*^9, 
   3.8226596735844088`*^9}, {3.8229849902845583`*^9, 3.822985004282075*^9}, 
   3.8229850426454134`*^9, {3.8229850795566387`*^9, 3.8229850855944815`*^9}, 
   3.8229851258936625`*^9, {3.823070381748046*^9, 3.823070393520157*^9}, {
   3.823085579721697*^9, 3.8230856162232857`*^9}, {3.823090447085432*^9, 
   3.8230904989415226`*^9}, {3.823090554212405*^9, 3.8230906847444124`*^9}, 
   3.823090810366985*^9, 3.8230908487518883`*^9, {3.823165965150426*^9, 
   3.823165965406752*^9}, 3.8231660341760454`*^9, {3.82316655471507*^9, 
   3.8231665589249287`*^9}, {3.8231689370184307`*^9, 
   3.8231689390980015`*^9}, {3.823170351139263*^9, 3.8231703600159597`*^9}, {
   3.823327099271394*^9, 3.8233272358833675`*^9}, {3.8233273222774596`*^9, 
   3.823327476686555*^9}, {3.8233282369817047`*^9, 3.8233282532055407`*^9}, {
   3.8233318041882377`*^9, 3.823331874185417*^9}, {3.8234142879764147`*^9, 
   3.8234142995834723`*^9}, 3.8234259032302637`*^9, {3.825931293714013*^9, 
   3.8259313280654955`*^9}, {3.8260327072865996`*^9, 3.826032853544609*^9}, {
   3.8260329218821325`*^9, 3.8260329380166063`*^9}, 3.8260330806576214`*^9, {
   3.826033876127497*^9, 3.8260338770369616`*^9}, {3.826034015952697*^9, 
   3.8260340166685324`*^9}, 3.826097316307889*^9, {3.8260975865919857`*^9, 
   3.826097587544572*^9}, {3.8307588347446933`*^9, 3.8307589217914553`*^9}, {
   3.8317072222967863`*^9, 3.831707275443842*^9}, {3.8317073612403727`*^9, 
   3.831707361772689*^9}, {3.831707414838143*^9, 3.8317074488396654`*^9}, {
   3.8317960009405127`*^9, 3.831796041676001*^9}, {3.8317961321279554`*^9, 
   3.831796151541258*^9}, {3.831796188506156*^9, 3.8317962030434685`*^9}, 
   3.8317963003752103`*^9, 3.831796386709197*^9, 3.8317964406831875`*^9, {
   3.831806523979254*^9, 3.8318065435341396`*^9}, {3.8318067062153573`*^9, 
   3.831806708996604*^9}, {3.831808262875266*^9, 3.8318082724578457`*^9}, 
   3.8318085881409287`*^9, {3.8318821312903433`*^9, 3.831882150461655*^9}, 
   3.8318825672680426`*^9, {3.831882599651658*^9, 3.8318826425830884`*^9}, {
   3.831882729420548*^9, 3.831882736619492*^9}, 3.8318828064306264`*^9, 
   3.8318933523321457`*^9, {3.8318935174400234`*^9, 3.8318935195802493`*^9}, {
   3.8318976337560377`*^9, 3.8318976340026255`*^9}, 3.8319038574034233`*^9, {
   3.8319040543479137`*^9, 3.831904073118826*^9}, 3.8319041049453554`*^9, {
   3.831904147069027*^9, 3.831904162325322*^9}, {3.8319688579405637`*^9, 
   3.8319688755342054`*^9}, 3.8319689233018494`*^9, {3.831969360753668*^9, 
   3.8319693716593523`*^9}, {3.831969440910755*^9, 3.8319694594710016`*^9}, {
   3.831985228943861*^9, 3.8319852812519627`*^9}, 3.8319856884645147`*^9, {
   3.831985719512768*^9, 3.831985722943608*^9}, 3.832059052517928*^9, {
   3.8320592156970463`*^9, 3.832059229004445*^9}, {3.832065609197918*^9, 
   3.832065620668127*^9}, 3.8320666946522903`*^9, 3.8322430981741147`*^9, {
   3.8322432199379416`*^9, 3.832243246811203*^9}, 3.83230959851064*^9, {
   3.8323098798647366`*^9, 3.8323099433230743`*^9}, 3.8323099881428175`*^9, 
   3.8323102001528473`*^9, {3.832310241690319*^9, 3.832310261470997*^9}, {
   3.8323112923550777`*^9, 3.832311293537816*^9}, 3.83231132368581*^9, {
   3.8323121415060186`*^9, 3.8323121447402716`*^9}, {3.8323121827289705`*^9, 
   3.832312183791561*^9}, {3.832320994523657*^9, 3.8323210347278337`*^9}, {
   3.832321065695305*^9, 3.832321083013073*^9}, {3.8323213228691473`*^9, 
   3.832321363498118*^9}, {3.832408467455244*^9, 3.832408480433786*^9}, 
   3.834388095989873*^9, 3.834389291344042*^9, 3.8343894204141445`*^9, {
   3.8347281713079786`*^9, 3.8347281828958955`*^9}, 3.834728284809551*^9, {
   3.8347343303063354`*^9, 3.834734338641301*^9}, 3.8347348155366406`*^9, 
   3.8347356987499356`*^9, 3.834738239298897*^9, {3.835760935408986*^9, 
   3.835760942673662*^9}, {3.8357613249388194`*^9, 3.83576137787974*^9}, {
   3.835761445577899*^9, 3.8357614570664673`*^9}, {3.8366575292475657`*^9, 
   3.8366575329516945`*^9}, {3.841756573483902*^9, 3.841756575333847*^9}, {
   3.8417572481660337`*^9, 3.84175724897237*^9}, {3.841757798712619*^9, 
   3.8417578111642265`*^9}, 3.8477912561307116`*^9, 3.8478710152242174`*^9, 
   3.8478714055709515`*^9, {3.847871581232087*^9, 3.8478715909032035`*^9}, {
   3.8484120367842054`*^9, 3.848412079706233*^9}, {3.8500329142328606`*^9, 
   3.8500329209529877`*^9}, {3.850033052763715*^9, 3.8500331024919662`*^9}, {
   3.8502910597144547`*^9, 3.8502910613607044`*^9}, {3.8502954549522877`*^9, 
   3.850295460750222*^9}, {3.850325886917735*^9, 3.850325890194343*^9}, {
   3.8503259798768635`*^9, 3.8503259802021313`*^9}, 3.850326054149711*^9, 
   3.8503261118769054`*^9, 3.8503832125342407`*^9, {3.8503861996127834`*^9, 
   3.8503862255303555`*^9}, 3.8503869064171915`*^9, 3.8503869458157434`*^9, 
   3.8503872404581223`*^9, 3.850387283570305*^9, 3.8504612401681423`*^9, {
   3.850479878284604*^9, 3.850479878483057*^9}, {3.850479969947183*^9, 
   3.8504799763702707`*^9}, {3.850480042974207*^9, 3.8504800435447474`*^9}, {
   3.8504806108829775`*^9, 3.850480611601154*^9}, 3.850484173910863*^9, {
   3.850484247239555*^9, 3.850484247595616*^9}, 3.850484285966692*^9, {
   3.8505391785704293`*^9, 3.850539179095025*^9}, {3.850540221225518*^9, 
   3.8505402259514623`*^9}, {3.85054080391463*^9, 3.850540809691681*^9}, 
   3.8510553596130505`*^9, {3.851055532536225*^9, 3.851055542141971*^9}, {
   3.851055620312868*^9, 3.8510556260006495`*^9}, 3.851055680464371*^9, 
   3.8510557356090293`*^9, {3.851055792974927*^9, 3.851055801759269*^9}, {
   3.8510558535621386`*^9, 3.851055882670042*^9}, 3.8510580609677815`*^9, {
   3.851330085312358*^9, 3.8513300991606674`*^9}, {3.8515756701475697`*^9, 
   3.8515756706267214`*^9}, {3.851585046116963*^9, 3.8515850463469486`*^9}, {
   3.851585398696277*^9, 3.8515854080028977`*^9}, {3.851585445088397*^9, 
   3.851585451302486*^9}, {3.8515854962032623`*^9, 3.851585528185707*^9}, {
   3.8515855719424543`*^9, 3.8515856194611673`*^9}, 3.8515856906051874`*^9, {
   3.851586564412813*^9, 3.8515866201478987`*^9}, {3.851586822999801*^9, 
   3.8515868572824755`*^9}, {3.8515869525686483`*^9, 
   3.8515869536779685`*^9}, {3.851586986624277*^9, 3.8515870165186987`*^9}, 
   3.8529625045983267`*^9, 3.852970925932948*^9, {3.852971051466899*^9, 
   3.852971095307439*^9}, {3.852971237141795*^9, 3.8529712513259134`*^9}, {
   3.8529712901180344`*^9, 3.852971318439024*^9}, {3.852971414519128*^9, 
   3.852971428451976*^9}, 3.8529714643619957`*^9, 3.85297151839877*^9, {
   3.8529718303169613`*^9, 3.8529718611879206`*^9}, {3.8529719318063345`*^9, 
   3.852971945430047*^9}, {3.8529719889228687`*^9, 3.852971998946661*^9}, 
   3.852972231836852*^9, {3.8529722643510513`*^9, 3.852972302311015*^9}, {
   3.8529723649328175`*^9, 3.852972398172415*^9}, {3.852973196105614*^9, 
   3.8529732656523433`*^9}, 3.8533042095577974`*^9, 3.85330536339157*^9, {
   3.8533055259654293`*^9, 3.8533055570409307`*^9}, {3.8533056028628964`*^9, 
   3.8533056216921225`*^9}, {3.8533056623388*^9, 3.8533057338163576`*^9}, {
   3.8533061332748327`*^9, 3.853306133871237*^9}, 3.853306189922717*^9, 
   3.855645733158932*^9, {3.8556458284691577`*^9, 3.8556458599685526`*^9}, {
   3.855645917775917*^9, 3.8556459533021603`*^9}, {3.8556459918290267`*^9, 
   3.8556460076830864`*^9}},
 CellLabel->
  "In[330]:=",ExpressionUUID->"26416945-e5d0-46e7-b17f-83b88191f1f5"],

Cell[BoxData["0.1`"], "Output",
 CellChangeTimes->{{3.8510558722791877`*^9, 3.8510558839502335`*^9}, 
   3.851058062551507*^9, 3.851058913590639*^9, {3.851330085988905*^9, 
   3.85133010923724*^9}, 3.8513415068252378`*^9, 3.851341897196062*^9, 
   3.851342269025888*^9, 3.8513424779823065`*^9, 3.851342553235388*^9, 
   3.8513426167481365`*^9, 3.851342768806308*^9, 3.851575684130927*^9, 
   3.8515849506964283`*^9, 3.8515850499917965`*^9, 3.8515855028995247`*^9, {
   3.8515855754257545`*^9, 3.8515856354139233`*^9}, 3.8515856926828194`*^9, 
   3.8515864932117014`*^9, {3.85158663095928*^9, 3.851586643271215*^9}, 
   3.851586862071417*^9, 3.8515869549280915`*^9, {3.8515870008427415`*^9, 
   3.851587017845268*^9}, 3.8524570275355773`*^9, 3.852962505741949*^9, 
   3.852970927138775*^9, 3.852971023955714*^9, 3.8529710849652843`*^9, {
   3.8529715079830832`*^9, 3.8529715193478117`*^9}, 3.8529717790186796`*^9, {
   3.852971938053161*^9, 3.8529719473996706`*^9}, 3.8529720006457586`*^9, {
   3.8529720329032702`*^9, 3.8529720997995844`*^9}, 3.8529721845151157`*^9, 
   3.8529723049304485`*^9, 3.852972402155675*^9, 3.8529724771677885`*^9, 
   3.8529726131811547`*^9, 3.8529726897757416`*^9, {3.8529727563219223`*^9, 
   3.8529727845741196`*^9}, 3.852973151314173*^9, 3.8529732783244963`*^9, 
   3.852973347628791*^9, 3.8533042105237184`*^9, 3.853305371288211*^9, {
   3.8533055835916767`*^9, 3.853305621872224*^9}, {3.853305669694626*^9, 
   3.8533057342676783`*^9}, 3.8533061363791513`*^9, {3.853306182617694*^9, 
   3.853306190456072*^9}, 3.8535855576844482`*^9, 3.8554770978508615`*^9, 
   3.8554802714103203`*^9, 3.855645860673297*^9, {3.855645917978985*^9, 
   3.8556459545631533`*^9}, {3.855645992532096*^9, 3.85564603059615*^9}},
 CellLabel->
  "Out[342]=",ExpressionUUID->"a3551daf-68e4-4e66-a78a-c67c33ad7a9e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"0.00047189255036864813`", ",", "0.`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "1.`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.8510558722791877`*^9, 3.8510558839502335`*^9}, 
   3.851058062551507*^9, 3.851058913590639*^9, {3.851330085988905*^9, 
   3.85133010923724*^9}, 3.8513415068252378`*^9, 3.851341897196062*^9, 
   3.851342269025888*^9, 3.8513424779823065`*^9, 3.851342553235388*^9, 
   3.8513426167481365`*^9, 3.851342768806308*^9, 3.851575684130927*^9, 
   3.8515849506964283`*^9, 3.8515850499917965`*^9, 3.8515855028995247`*^9, {
   3.8515855754257545`*^9, 3.8515856354139233`*^9}, 3.8515856926828194`*^9, 
   3.8515864932117014`*^9, {3.85158663095928*^9, 3.851586643271215*^9}, 
   3.851586862071417*^9, 3.8515869549280915`*^9, {3.8515870008427415`*^9, 
   3.851587017845268*^9}, 3.8524570275355773`*^9, 3.852962505741949*^9, 
   3.852970927138775*^9, 3.852971023955714*^9, 3.8529710849652843`*^9, {
   3.8529715079830832`*^9, 3.8529715193478117`*^9}, 3.8529717790186796`*^9, {
   3.852971938053161*^9, 3.8529719473996706`*^9}, 3.8529720006457586`*^9, {
   3.8529720329032702`*^9, 3.8529720997995844`*^9}, 3.8529721845151157`*^9, 
   3.8529723049304485`*^9, 3.852972402155675*^9, 3.8529724771677885`*^9, 
   3.8529726131811547`*^9, 3.8529726897757416`*^9, {3.8529727563219223`*^9, 
   3.8529727845741196`*^9}, 3.852973151314173*^9, 3.8529732783244963`*^9, 
   3.852973347628791*^9, 3.8533042105237184`*^9, 3.853305371288211*^9, {
   3.8533055835916767`*^9, 3.853305621872224*^9}, {3.853305669694626*^9, 
   3.8533057342676783`*^9}, 3.8533061363791513`*^9, {3.853306182617694*^9, 
   3.853306190456072*^9}, 3.8535855576844482`*^9, 3.8554770978508615`*^9, 
   3.8554802714103203`*^9, 3.855645860673297*^9, {3.855645917978985*^9, 
   3.8556459545631533`*^9}, {3.855645992532096*^9, 3.855646000690302*^9}, 
   3.855646030705567*^9},
 CellLabel->
  "Out[353]=",ExpressionUUID->"f36e11bd-0034-4993-8be1-15dd8dfe3eb9"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {GrayLevel[0], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVy3080wkcB/AVnbokZbR2suzVkYfogeGVfIscJ9QNp0J0oYwxpOQpdaJL
E7IQizIuYkmSir7Kc7ZsmIb9unuJ6OqFLok8dO6Pz+vzx+fz1v0tjBmwlEQi
uSzm/47bVJm7c+EyUA4liaIvCPErmxH4wZ4LnvfFFbREIUY/rNvO53LhXrkn
szVGiFFO7R0L2mkQN6e8ZT1HiKGcwflnO68AR715c+thIW498v02QV06ZGqN
WzpvFSK9zJpn+DUTpvY+vDkzUIEqtjd9LKKyoTtKlNBvXoH8gKafNl0rBAr0
uo7L7yDD6FLNXloxkLyECdmFZVjtUXPgRkYplOervI6JKcWR8vDHkf5CILMV
VhGOt5F7/ls8J+IeXKw875DG+BNJzdzvhgfvg61b88XZ9SX41mr/pimHGpAm
0zfEqhXjvrszW7p/r4Xy2YNzujQBrnwSTBsbfwwbp0q3WesVoVNry1zP9no4
vFLedsrhFs4t8wg7yEJw1WcmPIi6iUls2ZDquwaQyx3PBOYVopN8MsVt+XOw
HhluoFYW4C61aZ1H0Aiq5vrdmtQbyCKySOzwJihSbjOOzM/HXmM9eXJaM6jZ
LnuxwiEPOQ55RdjYAiJhYMzYm1z8eVA54MhQK4zY7+42KsnBA45MqvaGdhjd
njei552N6Q5W1M0HXsDbC9qrlPWuoXorWf16aAeUzTw4nq7Ow/o1PTOGxSIw
y4m8ZjxxFcsUKX26rWKwQBMD7bFMlOyWKR1/8xLcVd3Wmc5m4FpLpYzhlRL4
tGq0JXohHRWrtfJe5EnguTx8j792OlqLqTS0kMKw+BZvw7E0tPIMaeuXSIHZ
aXNaVHoZf9WtDSn17YKsDhn5B1oqrpB+vpTytQuKq791iZL+QEXDFgEltRti
z/qn1mteROf4qkEJpQcevt/10b4uGd1oBnk5VT1QZ78rYsD9Ap5Zct1Vw1YG
XlOmhiEaSchon4vlEzIIYNLCEpvPo4b0kKA/tBe4/S5endfPIbdY6V+b+V7Q
LOH6N59LRL5vwaOq7FegutT7vdGTBBQfMo/r05cDXeXKVG5lHGZZ1deubpLD
c3NylUlmDH4ZzqCyffpgMEXbrD0rGmO6/E7Hf+gDutUy1ePiU5gl0HXlp/TD
UfTW95k8iS9rFDQOZQDSNLUoIS6RKOANabFKBmB6rdltHobjmsOvUyJ3K2Br
oxkuoXPwxpGuT6YSBcQedPeo9mOj1MCy8V6XAvxl+1PJ7mxU/szP3CFTgLfG
xPrTDmxkpQZts+hXgJAZAXYmbLSoJYXZDCnA2a+l4MtsCErWmP7jPK2AwMYJ
T0l2CCo1p/4dtJEAgUpYrY00GBnpH+++pxOQ0XByx7umYGR5eZ5l/0iApfWT
GV5tMEo+0nXCDQlQnvMJnCoIxnydx17RZgS81bGr7gpd9NGjvcmOBBTMdzZN
qwZjkJ1ryfJ9BLwaLXvWSlr8q1VHXXIhoCSbrJQ7ycKlxWfJaUwC7BpGfrFV
sLBTqsXkeRMw/FSmUXlncefH6a7zJcDDMcwgo4CFjBODEzlHCWji2SSevMrC
/IWKK/mBBIzNScf3xC76dg1fnSACnvaiinHYouedMSkMJqBtkuFLOcZCc7+/
5nVDCaBaiD5/58nCE0b24iIOAc/iyR1fnFj4H6Hodsw=
            "]]},
          Annotation[#, "Charting`Private`Tag$106635#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[1, 1, 0], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHk41AkcxmfRrlaFCKui8XRIh0SOJ3x7zNqxyiR0qBzppIbB2ihlu1jK
Nb8ZzEzjaIYijaLHOvfbritKzbia0e8Xa6lNWoSVFu3sH+/z/vG+nw89JMLn
uAaNRvNS5/+OX31fsH3+BvD4a3pir8nwE9v+xIh7KrQUpNT5XZZh7C91W8Wp
qfBBd9m/WxJkGOPZ+mR+RRq46vblD8fKMJwzMPfb9nS4J2Cmh5yR4ZbAr22k
dRkwQoVNH/OVoUWJM9/qExcwqllaQZfhV24FAQ4x2XAZu1Nj8B6Kjzd+tzor
H1qi4wKI0VK035BS+a15IfQOFrzLtS3Fh3srvXMzi6Fi1Cnw/U938U1pZE30
MRmAr5hh1lSCqZc/X+BEPYDqiBtR3stLkNaU+uXQQAW0YwFzcWgxvnbavfof
ZiX80BZfW4J3cGfZzKbOK1UQ+VbUcXXtHdSpPW3+92gNpAzV22Vcu42eLc2z
XVvroZHlwhifKMLZBXsjDoQh+CUSyqOhRXiV3T246O0j8P85a1L0ohA9lZNJ
vtq/g1DrYnqlbyG6LPloVg0NkOM4FGLSKsUwikdjRzbCc4bLa4a7FHs2rlUm
pjXBZ+e8ZbPtEuQwRRJsaIazTafen/OW4PcDWscDB1tg+ZWMctWrW+jt4WO6
YmUrLJY4c0+fvIUZTCdTS+826I87yGmeKkC9FkM9YfgTEGzInO5LK8B6/a4Z
q8KnoBN1RFNgUYAlZJKK3tIOIxcZf8Q/ykf5jm7Nk38+g8FZwlTzaD4uddTM
HNKRg7L+m+xkWj6SukaiNpEcSO4eXRErD53bTc3RQQFjNMqvjZuLTvvPPO6V
K8C/Zt34YJ8Y99GrzhQHdYAwMTGmyUWMCxVTKUmfOkAlud0wyb2J5KNNUpPr
nWCS7tum81GEuy6UD8hNukC+9MdVrGMi9DVfL8op74JuP2PrmMdCjPtCyDJw
64aVwdbvlm8Xon3r7Hkx1Q1XjS55WRYJ0EDhL+0N74GZ5LG+KTMBphZqfnCd
6wFTmfvCD+IcFAflVZdnvwBLfdexzmU52O6/LV61Tgn9dcxqhjAbeU71VbqN
SrBv1mBrm2Tj9FCmKTtABdweA0mjKAvPdQSfvTCigmLDO48nrLKQJ6WzxEm9
sCXCzet1BR+fVZLmHJOXwLLdJK5l8lHKHzQKK3oJ6Da64EQ/D/UPvkqK3kGC
Xf1ciGM0D3MDOyas5STkvYdATT0eKtY7NjzoIMFo3TMz1hIeak2JubbdJBwc
pusLFvEw7HqojUMvCTN28ynWC3noUEWLcB0k4fDb5o5ADR7K9a2Hd30kYY37
pdLmSQI1m673h66igDxP7a9VEWifMV72zoKC6bt5jEVKAsMO7U9gr6HgkMgj
OKCHQPm4hVmkFQWyV1s30joJvGlWcyjWjgLWl0WLPZ6q+di/ehI9KFDsHh3r
/5XAUAarSHsnBXpzqjd29er/kocxKV4U7NNy1k2uJVCjMMEwzYeCIqbnqE0V
gc8VRj78wxRY3n86ce2BehfH042DKGA7l7Fflqn9pwbGco5QYMxRGNvI1L75
e+k3T1Cwe7JqlixR860GQWahFNgd4DjYFqt5ftzm/NMUbE7ZeSv5NoHbgvvm
6OEUDBMMl/5CAk9tcG+XcCgwTNij7SAl8D8H3Ies
            "]]},
          Annotation[#, "Charting`Private`Tag$107882#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0.5, 0, 0.5], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVkmk81AkcxoXtULvOnbXCNJZ0CW1GPuGnsJSSKLYL7WenwjhK09LOjE1N
4xr3lTFiDTIxolYq+rUhdzszMaH5by2yJSV0mRw7++L5PC+e5/u8eig/RfrS
1NXU1Har9L8zza9d2jqfAqsTrWUxHDEqw6nHxt15YOvNcKSfE2PMzcZNAh4P
Hlrt1QlmiZGxs6Nr3jgV1jDcjXcwxBgRNTT359Y0OGy+qnUVTYw2gVq2wsZ0
aNYsOjjqJkYzkWPOOmUmEOE6xzo1xbhke8kRe0YevL4aKJriVKOA1vKDeW4x
bLsfl0SOrULq+qR6N3IZ5NuIjLI5V/HG/nqfooxKIJdq8QsFIvy36uTt6J/F
oLhvYXS0shJ58QusqFO1YDYaz7XpvoJqrbzFz4eug3XngnrRcAWOOuwx/+BR
D1W81I1eiyvQq2bG6tH5BiBpK6WvnMpx+Z0w8puJ26CZ22RpEFaGO9sezPZu
aoJ3SmN7kyohzn6xP/LHUISDIco8+FCKF8L7Rla8vAefdV3cG6mluLP/Hddv
6X0Ydlns5Z/4Ozp99cn0FjTD6JmuhVlZCYYS2WrhJ1sgaVH6tbMWJSjfsLr/
YmorGDWGBkclFGOUB78Umx+AJUHVO/DgMu4Y0qQFjrQBPSpaqssvQh9PXyNj
kw6gZ3C8EoIFmO7hYLTGpxMeBVFid9kVok6bgU5BRBdQN5hFn17Nxybd3pl1
Zd3wyjfJk7+sAEUK7gClrQe8dR1bqpdcQolLn8bx4YfQ9NGTZKKXj3pbNDKe
L5fA8riQsXLtPFRok/idfAmI6H1aNyxy0bHHiIz2UhCON2+WWOegQwC9fVAi
hU4f56kJ92z0pzTQK4NkoKhQ7vE9lYXLpO+TuEoZ8OSDTpiViYp7VkLD5Efw
UWTr5tGZgbtYdUMSw14w2ewxHK+VgX7ktfz8ul7oT7EhRC7pGLuowFt/ex+0
jr9d0DNIQ2rH7K8Cog/OpDtHWmbzUF96QDgYIYc1GYFFwi0pyCvTmHKek8P4
FR3B9OskFARdvlWX9xjCulbGUzITseeAHXPAsh9K/A3/CQtIwGyHpgbtln6g
cVosn67g4sfnGUbhRwZgg8/ebRUyDp6VBf/CGh8A4m7gnZj6C5gtpHgLuIPQ
IDvf0J58Hh/WK8hRhk+gtth1SSorHoU5I6TQ8icw9+lbYDHPoe7Bv7nRLgpw
iS5wJ0f8hkWBsmlriQL2HX/c7TTNRunaLc21MgWkTUa0Px5jo+Z7Qeb3fQqY
qJsZPTXExtDkEFv7QQV0J/qmVEnZaN+gFuk8ogC59/toq2tslOhaj+36pIAZ
ukkuLZyNGq3Jz0JWEcCueWkqfsFCavpkzSszQvUvQxv6MxaGHgqIC7cg4Cgj
IWh9Pwslk2amJ9cRUFuYZVjdxsJC09uHYjYTQOI4TjSVq/iYF/KLngSIpz98
+TWNhSGu3uVLvQh445o1OXJY1f/qBiNpNwHFn0mTf+xjoXpZnEGqLwHaPs6u
h9xY+JeU5JtzmIBRv7fW179T5QIm5ZsgArLLr75JXqnaPzH0Nv8oAQZ3Ke00
fdXefHVa4TECvMYqOo01VHyHfpBpCAEBcvr0jJKJ6jmxG4vDCBiz86f2TzHR
LvjpHCWCgJrTzlk3x5h4Yr17T2kUAX7zC8vyh5j4H82gfdE=
            "]]},
          Annotation[#, "Charting`Private`Tag$109129#1"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJztmfk/1en7x7VIi6ZNDVNDG6lUMylKdAljiWJUKrTY98pSlKUQIUuRfTv2
c47D2eyV25YkJYmyVZZE+mAwGim+fR+97/uvOH7x8Hgf59z3db+u9/t5ntcG
84uGVnOFhIQWzBMS+v/fLenzCgJKq1Dg4wU55jV+SDyf7tUnWYXEHM6KH2GF
INPSI3+p36xE3Vzls7bsCJRaM7Y0fbACpea/zd4vG4F6G2NbhfQrUOK4uuFq
sxCkV3T1ILJFqDTejqeyPBA1N1Q3esmXoyV9cpI544HIuHepmdLMA2RWmBZ3
TSMEdU+dHPtSdx/90dxxMkExCNkuT/cvjCpDegzO5wJxHzQi81nM9Wwp8rKJ
aVuzxQZdUVHI/mNrCeqIkzWxED2Fvh27oTg8XoSs21z/9l1ngfzt6+tyywvR
yNcI+RJdK7TYV8zYLrgAORty59y2P4fuxp4dkjnORyKKJoy3x85R++Uhex0Q
ydloT+2PgxwMwzazwi9R+2GjrIYEeoeLE7V+FvrqEuA+DdbUeplopaisvtoH
S2p9dGRttOTLrKk1tZ4sdHLQ8E+6jRX1+RnIOPCf+a6W+tTn0ZD5ofbmICkL
+Pn+SWjol4vZ7jx3+Pl+cejBF2On5TRv+Pn/USi/86yG0aw79fpQpNN7LHjS
wZ667o9k+w48kA1Xov52RTVG688Uz3dHQtRPsPRRk5u996j1uIKoXJujSXUm
9bc/ZFkGBB6QZ1H7DYXGP9t6PQLyqetRYFVqsmvz4Xxqv3Fg4Ga069qJPOr1
SRB5V/KV/WQu3h8wtf4YuX6LifcPvRn7S4azGLg+sGTZHA8jTQauH7xZVEC7
cZSB6wv314e8WzHGwPWHhA3yh4NvM/H5AEvitWXZciY+P9AVvoXq4+j4fGGk
a10u/3s2Pn/Y1+mVlXk1C+cDlK3qZyM+ZeD8wJPJAcs3qek4X6A4PCky2puG
8wdLeFVLJIzScD4hsSCD9biZhvMLQ3KH2QafaTjf4LfJTn3AJQ3nH6KjaW4F
Gmm4P+BCtmrLelca7h+Im3QsUgQa7i9Q0qrvm/zxflT/wfaS3/fEbknD/Qmz
/b+80FJKxf0Lm6ImZ9TXxCOqvwEOyBy81BJF7b8atOcWFtukRKKjoaUb64ar
4VxdycN+vXtUPWpg/tYTQA+NQY8vX7y7ePMjMH8+3LVyJpaqzyM4skkuZ4tK
LFI9Jy105HQt6N2ovDP/fRRVr1qQevemqUvyDirV7rgQEf4YlK+Im55eGkrV
rw7WZJ8QC1ANQ7t33+1qqq6Dlfu1DJJs71L1fAIXunacfiZ0D+Wu1dITm3oC
IcZKe1dpRlH1rYeNC0vSX70OQ5uFv5cZ7XwKClHjA7L+AVS9n8Jw77NH1U7+
KHmYtzXeogFqP40qyk36U/VvALXttIFDFr5ozRvbuI64Z3BL49cjfDUP6jye
g/8OJVVmtAOKqJQUkXz+HBI0NlVMB5+gzqcRmFaj3wZd/0A3T3xS4sx5AQfZ
/KWbFupT5/UCSiIXzOzebIUOHf7L5e+kF2A8tM0kzuYidX4vIKfo5v38Gjf0
/SCNMabQBB9CNK2/CnlS59kEc/WDxyS1vFCZ/PT7qKYm2BPD5KyWcqPO9yWU
Oa+StbpxHF2RNRLf6/gSZtcFLkFPz8PP834JykGX5qm9sQT537n6rQua4QTo
frTm6VLn3wwp2yzuVexxR6MrRG+5pzXDMucNjI3Z16k8NEPkmMnlrjNXEGuB
Tbm48iuwSN640nn/cSofr6CxU+b6y1YzsJuu/Le09RXc/1xx1qD3AvzMSwu8
Kx9kq666ANKj63aYOLeAnJPMxJiRHvzMTwtkctm6NL4T6ulzt/y2pBXKt+3e
ey3ancpTK+x2kqjMXmOPUtpeJiZntwJ3YL3sye0a8DNfrbBI4qH02xZTMHm+
o/ngoddw3HGmStpLlcrba3AS22XTYeaCfq0OWvy+4zVwPEBFQ9GXyt8bGNtn
Oln61h+9Ku495HvlDajMY7vVXPel8vgGArSaRWKNfNEd1sGrG1e0Qdspdws2
K4DKZxs007+IjZYEoyNp8Zzq3B/Xf1v2zDUxhMprG0S49/ZrawajRTETHy01
28HM2D/qQjt+vrWDxGPdQ+1Coag2RF9qQXc76Pgo6PBNw6k8d4DGZZ/fnHfd
Rv7XmUY5nh3Q8067Te0/fyrfHcDpHr01reiNwE04XHtNJwTrpNwqGfGi8t4J
M2eaij489EffbM8/GuR0giJP9SF3OITKfyfIN+zp/0y/g0rO3P8WotsF5goB
Hj9Ci+8XSMM4Y+mh42mAeWDLAC2kwTIZMA9kTAQap0gkAuaBlK3DOzLLkgHz
QNFvnhHrlqcB5oGBLk3lupg0wDywd+l/nPVVqYB5oKJ/r87ikkTAPMCboU+n
CScB5oE/IoXf/1KWBpgHWA2BL52ccgDzgNpVixjnZwzAPPB59FIHk5cNmAfk
o07xhD+kA+aB5m6lKqHYDMA8MND/dcvORXTAPHAkevxr68dcwDyQMn6Rc/Mc
CzAPlOXxBuj5DMA8UPd70pZFCtmAeSCra1nsWZ1MwDwwvjNHybA4EzAPXOz3
8cy2ywbMA3PrVjumPaUD5oEE697KhtFcwgO6WYFo35J8wgMxPuztWjQW4QHh
AwaPygfphAf87ioyqxyyCQ+4vZWvuuWeSXggMMneUX4yCTAPiPZ3vNg/6omv
g/F9vcsjMsGEB3zs4636oiMJD/z70tnzRmUE4YE721VN+o6EER7wOCkatnI6
nPDAPv6d0LK5wYQH9AL1n8iK2BMe6HkVIl49cQPXB/hHjUzmPAvH9YNuS0ZU
p1Ywri9sm9F0CWpxwvUH7qZBs3YzwmvgdleiAvG8CQ+EWBqk90ZeIzzwcmVo
uVeIBeEBEd8i/10rnHE+gO809du9wmCcH7DM3HZeZtc9nC+QcCvY+5d7NM4f
SMzTcvkgdxfnEzx2h/258iRebxnYh0jMob32x/kGU5OKkJZZX5x/MFxwuUP3
UyDuD+Bc7DPeOj8M9w+UBztkq7vexv0FerPalv1P/XH/wcqcw1bPeNdxf0K/
dJj7togg3L9wS3gyKn5bHGAeWDj8yutiaxpgHvDLXWxwyjodMA+w05MsEzyS
AfMA/aNeqZpRLGAe6I/gzCZJxwDhgS5pl96JWMA8UKvNdjg/lQCYB7xbzMaz
xGmAeWDh6cprH/7F/VEH29vbliSoMwDzwFSsWY9WFx0wD4SvWZzedTATMA94
P9V9+PwYDTAPTHeZ/10UTwPMA8wg3xVpvRmAeWAk5z7vy0AWYB5QrHWQ0fPK
AswD37Zs8N3ZlAmYB8bSyn9VWJ4NmAf2ebS35X5iAOaBxVMVQje+sAHzgNwv
Rw+PT3AB8wBrwq/jei4HMA9oF79tDaUzAfOAqNQOi6/G2YB54IXvzLewgizA
PPBUWsNR4VkWYB6wNHmM7v7oC8wD8adGxquycgDzgLVsEd88gwWYB3QMarpL
vDmEB6TNxit5hhzCA9Ow4+jUC3z/aIbcxrba7DgGYB7YMLpQbr4sAzAPdP+l
suFVEBMwD3wuNP9iUJILmAf0wjykdT6yCA9ELCwP5fXkEx7gGc29LWLHITxg
81Z1Incfh/DAsaLxY9XueYB5YD/rTzmr1FzAPNDkdWmOW2s+YB5QOvu20s2D
R3hg12r7oKk8PuGBEk75jjEuFzAPGJmVtqU/ygPMA9IDKwaUs3IB84Br5KjH
1ZA8wDwwRzu1vsKdA5gHxBVgJlmKC5gHOos9U04KcwDzQOg6KVOfSBZgHqia
fmiZWM8EzAOD1ZJtdogJmAd4s2Hvxx2ZgHlALLfoo2I9HTAPKDauuxZzMwcw
DyRbJKxTu0cHzANRAzEePktZgHlAOw2B5hAbMA+sMhxaLTXAAcwD7n7Rinml
HMA8oGluGhccyQHMAz53S2bf6nMA88Dp2tP/VnTk4/sFEimXMXMpYhI/kMy4
3hS6kEX8gFqzmam/ZR7xA5KO1p8uOOcTP+AnlrwvRzWf+IFHTM/VH1NYxA/Q
PCI/9hrnEj+w4vnQJbUZJvED/9hWbU2RZBI/4Pfgz7XKqgziB5LiS/MMDJnE
DzTOXdOgeDSX+AEJx1ThA2sYxA/ciawv8Qon3//Q18kTLoywLOIHjBPurHSc
YRA/cM2no2O7HJv4gXWZTzpjD3GIH9AXqT0z/0we8QMyDaExC2foxA9sfTfx
fkF/NvEDFfFB+8f8cogf+HHv8038sT7MA3uPq8x/VMsgfuCCpG1ORyj+/puE
7nR/akmQpOPnLcquOLVcfR9efxRq99+3Z3AwHT+vkfjqpW3qkhn4eY76htWk
9Jfi7/uuaMLCO0xLOZP4gcPpdtG3zejED6Td2+XjncIlPCCyWMqpKqyY8MCl
L/avtMPKCA9M8MczbGhlhAcsBgu6fr1SSnhgm2eo36rWEsIDHk8/0DWLSwkP
+M4cXnur5j7xAz1vHDImpR4SP+CqsFXey/0B8QN5p9ZtKn9fRvzAuQixTIeA
UsID0TdabMP3lhAemDdrFpA0UkR44LS37KNzZkWEB7Q0SpKLQ4qIHxiP3Oqv
tqGY+IGe1PFvabnFxA+oLLE8UXmomPiBZpfjtoZphcQPfDJuGWPM8Ikf2H/W
ia1hwyd+4H87Kyd6eHziB84rLBv9vqGA+AGLPclC2asKiB94YaO0nZbHJ35g
k80xrqs1n/iBJHOXxTUb+cQPqIhPKSxi84gfGKv3sKyL5hE/kHHPu2ukhUf8
QF/ru3nn/XjED3SEzvsv/iaX+AHH59+f9a3lEj+w7XZv/qUgLvEDX4OkOA2J
XOIHTkXqWRjnc4gfOGqc3FO5lkP8wKp6azEdHy7xA4lGc3WH/+ETPxBoe1xi
bGMh8QMzU4neLVIFxA/MXaU+NdrAJX5AtKc8nRbAJn5A03A6YG9WPvEDH+LT
o9tS2cQPJBywVDN3ZxM/kKrifLnRL4/4ATHX+UM961nEDww+7N5g9qPfMQ8w
Y8zeLqNziB/4b1hLsmM1j/gBu+pSG9oWLvEDqcGpCquO5BE/cMUr8sL/tJjE
D1xlv8st/cAkfuBmXYvw5TAW8QPSbDuv0y9YxA9Iz0icD8pjET/gf05xgd1Q
HvED452/9kx15yPMAxpcD/Uzi/MR5oHJeJuA0Pw84geOJYwNtVqxiR/YnS3r
UBvEIX5AbcNhJL2cQ/xA5bubCwemWcQPcLlRLRdYTIR54MunDze0F+QizAPB
l0WEcpblIcwDlsHvDWjhbIR5QL21IH9tLIf4Abe1qNOsikP8gHLLE8dMUS7x
A7HtKlaPt/AQ5gFrOeXYw495CPOAHbO+pmecS/zA/qiqNtFdXOIHDr485X9x
PY/4gcsnlykNPeATP9C08OlH7usC4gemRPZUqF8uJH5gVfhpd/9LhcQPeHoc
kfcsLiB+ILYmPWubaAHxA22gLaPF5RM/4Ny6JXq1E5/4AQOtnTcNrfjED+wU
MV3mcZpP/IBU4+fj31fziR9QYyWPNc7nEz/Q9rnrTnoSn/gBjbXvZNYEFhA/
8G+bTpYMo5D4geZwlojC0WLiB2K/vHQ5kVlC/MAZnxEFofoSJJgXCOYFgnmB
YF4gmBcI5gWCeYFgXiCYFwjmBYJ5gWBeIJgXCOYFgnmBYF4gmBcI5gWCeYFg
XiCYFwjmBYJ5gWBe8H/i1khw
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0vOfEAYAxuG7y7axbNtLa9m2XZeNdbfcatm22zK2zC1u2bbtns+nH573
/Qe+KZsHV+8cFBAQEEiQCUNYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIRnwQk
JBGJSUJSkpGcH0hBSlKRmjSkJR3pyUBGMpGZLGQlG9nJQU5ykZs85CUf+SlA
QQpRmCIUpRg/UpwSlKQUpfmJMvxMWcpRngpUpBKVqUJVqlGdGtSkFrWpQ13q
UZ8GNKQRjWlCU5rRnBa0pBWtaUNb2tGeDnSkE50Jpgtd6UZ3etCTXvSmD33p
R38GMJBBDOYXhhBCaOD3DgIDv0fx1X3hM5/4yAfe8463vOE1r3jJC57zjKc8
4TGPeMgD7nOPu9zhNre4yQ2uc42rXOEyl7jIBc5zjrOc4TT/8x+nOMkJjnOM
o/zLPxzhMIc4yAH2s4+97GE3u9jJ3/zFDrazja1sYTOb2MgG1vMnf7COtaxh
NatYyQqWs4ylLGExi1jIAuYzj7nMYTazmMkMpjONqUxhMpOYyATG8zvjGMtv
jGE0oxjJCIYzjKH8SighfANDgILC
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwN0ncilwEAANDv5yau5AgOoDOYGVmJsiJ7haKQlZW99967MrJDvT/eDV54
5IuIqFAQBNHEEEsc8STwkkSSSCaFV6SSRjoZZPKaLN6QTQ5veUcueeRTQCHv
KaKYD5RQShnlVFBJFdXUUEsdH6mngUY+8ZkmmvnCV1popY1vtNNBJ110850e
eumjnwF+MMgQw4wwyhjjTDDJFNPMMMsc8yywyBLLrLDKGutssMkW2+ywyx77
HHDIEceccMpPfvGbM8654JI/XHHNDbfccc8Df3nkiWf+EQgQIoz/0opg+g==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0dVSFAAAQNF1AElJUbpLBATp7u4lVBCQBenuzh/n8HBm7vvNDx0GDz4E
AoFnwkQ4EXwkkiiiiSGWOD4RTwKJJJFMCp9J5QtfSSOdDDLJIpsccskjnwIK
KaKYEkop4xvlfKeCSqr4QTU1/KSWOuppoJEmmmmhlTba6aCTLrrpoZc++hlg
kCGGGWGUMcaZYJIppgkywyxzzPOL3/xhgUX+ssQyK/xjlRBrrPOfDTbZYpsd
dtljn/dphxxxzAmnnHHOBZdccc0Nt9xxzwOPPPHMC6+8AWo8JHk=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{}, {}, 
         TagBox[
          {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxgdZlS7IWmtjGke1udRmQ4N6226sW2JDK6RDRbmVa42KXTmZ
vjFkwjCuQ4kmJMntrS2NSaNxzeX7bDtGN6q1m6LQzv7xnue853l+P8ahCI9g
VRqN5qq8/5NlUp1rN38R2Bt6euNTRPgpzPrwxC4ChhM1jDWSRRh/u9lSQBDQ
bs4W886IMMZJ0jG/kgNPXsvt6uJEGB4pn7tnlw4XX/RIpkJE+IP/4o3CZi5I
RptOsd1EaHzNnmf6KRPOFDInafoi1Nhe7GcTkw32k2+qtauuoyD4wW6Ty0VA
7IFBK3EVWpul1e+klwE/ULe79WMl1u2rdy/IqIBYs9FOdctKfFEV1XgySATT
hXrPbwVeQyL5S2LkiRqgzfi5vhFWIK2N+GpMfhPUBqbPO41cxefMPSYfHOph
2U8n7FYxrqLzjRmLnt8aIDNWntMacwU1m47R375rhBk3Y5/d98rRSfxwttey
Baya9rTVGJbjrPq+CJ9QhGqDpLJHSWX4e1ifYsmru2D7gXzHooToNPA+1XPh
H5CSu6k911GIW5ZNG92B+yCdX3turLIUQ6ksWljUA9hO35hcoVeK/eZrBs5z
2uBxysqChPQSjHTIK8X7DyE6g1Wko1KCP8sXBPsrxCDNvblN9Vwxujt6GKw0
lICmyEVgP12EXAemwffuj8CuZMulydgi1BLravHDO6C2aNz3sUoRtmj3zpiW
PYbNSaoT40sK8RqZOsgQS8GLZhrhblGAsm19akdGO8HRZZ26lY8AdTarZYxp
ysBCz8y5Ii4fyeV6eY/yZHDPNZNuXpWH9lIDOtp0gdDpjd/ifj4yvY+3D8m6
YJT/9azhYj56MRqOVwR0g4aJ6Wf/vbm4qGsqLfVTNxDlPiNSTg6Sdy2E+uwe
cFmtnxg9ko0uibVymX4vzK6eqwq0zkZP+rq8nNpeKIwbZtmmXMYEFb7biu19
YDtZ7HVLwUNryexpAdUH/NM7nrbY8XBF137hUHg/2DBsJdySLCTK1P7ZOtcP
tw2z1/O0slAQUHinNvsp1D37EtQRewml+61Yg2sHYE3z2Klj45mYxWxpWP5g
AN7JDknFPpn4cSzDIMxvEHTKDxwxlmbgqe6DcYkTg5CwaqGDwC0Ds4QMN0Hq
EERb+DUHSbjYWU/SI/WHwVmzVbPUnYtCnkIvtHwY9przd3/blI7av46kntxG
QmVH0uUL7Rws8O/+d4OMhP5NON00QWDXus33a7pJ+KLTyH3/ksAFU4LMH/tI
aMHnJRZjBIayQzbaDJFAGmZbFVME2jTQIrYqSFAYFOpwOgmUaW947TJNwoK0
MsGZagLV2tjPQlZR0NjhndYYTaA1d/LGuDEF6mwPJ9Uopc/X+2zYauX/jJ3s
FKbkJ42NokwpWKo47UsGE5hv1Ogbv4mC6OT86+reSj7+Zf95RwqS05ht4UwC
Q3a4lS90puB1ulSl1Uq5X1YXk+ZKQS6n/NZSSwJVy87qcjwouKH1KllkSuCT
Lj0P3gEKPuz7XDP1nbIXsBjfBFAg81S94qiv9B+V/50TSEEDq0snX1fpm7+e
nn+YgryXF9x2LlXykhUBRiEUaEx7GuUuUvK8hPVFxyg43HEl6K06gVYH/5xj
hFMw2R7D2KlK4FGzXdLSSAr+8hL9wp+/iP8B8SB/6Q==
            "]]},
          Annotation[#, "Charting`Private`Tag$313189#1"]& ]}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.13, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.11, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.42, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.44, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.46, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.48, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{47.00000000000003, 5.}, {22., 4.000000000000028}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {GrayLevel[0], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVj3s01AkUx5XalB4e07CEiE3atGXNZNmu7aWHYZawefagIjPotZSySyhv
nZQwqm0oWT2maYxXd8bML8mqGYw85qdNtNkwsik5ZH/9cc89n3O/n+8513Jv
lFfYTC0tLRY1X3a89d3Lzp8zwDbH42yrkRAnOIz9g5szwU5Nn3Y3FWJsZe1a
XmYm8Hxu6j4yF+Kx7Y1Nn5dkQUS8PopshMiN7p2SOmcD//Jk1nkHIX4XPG8N
vzYHyglhq4OnEK1uueTZTZwHs8eOZ81ShDhnw7Ug5rFL4M0UH8odFSIvTL7F
+uJVWJzfHpr3/AEyVqaJNlmUgMNpo0rjUhEKfUTs4twyWMgO4n0Ir8R//oyp
PhJ6G5YLYqz8mGLMTJw+FX34HpTF3FxePCJGLSLzq/7e++BFE2WJBVX42snT
+oObCHwXlJo1RVTjjjufVrUmiYEmyrgxrFeDujWHLIY11SAwKKjciDW4veHR
ZNvaOkjIuHhCFliLk7N9on6JQOB2X5kXNVqLZziqvvkDEphgl/rXZdfh9o73
qd469eAe5xupMXuIPy4cN68CGbxO5jdtuv8QI8gLWpwYOdhfdkxy/Amx/dtv
OlKyCFjwwib/khQx2q3wOsoegXHS0mxvawlu650VFtzXAO9pGyNj90iQvdXL
ZIlZI8wf7XaVXJNgjpuTiS37CQhcifJ3PRLUa6DpFXCbYMlxm4P76FKs02/7
ZFfyF+jZv5Q1sKV4S53aadnQDAfSk+ZishQVrirtA6+ewuGUyLlbxFI0WKed
26+rANlwukPekBTVi+iFTwoVkB7mbvnJrB5dmk0skKkEF4l+6DS7Hp38Ih93
KZTAMjXiP/i9Hn0txZFlIS3Qp+KKxyrqca5yLC11ogXKEri3hep6VEtW8Y3T
W2EkqVrHaY4M3U8JehXGbTBsP5DWt1qG3hYrCvMFbXDu2fRZjb8M42YUeBhu
UIEN646rWaIMGY2TJ3mkCqzun5yVXS5DQ+Uufhe3HTJeM9k7lTLMLNEeXT/V
DnTGtYrkMRnyQq5UCS49h6YM020vTeXYvMsxvnN5B9BrMm6R6+V4walOvEje
AQd+650xtE+OH/tzTThBnaDteQ9OpsrxRMvuX08NdkLgXVfayA0qz7f04KV2
wTKdM4y9T+T4VKS2iDbuhqNHbuv3DMiRn9dHjyjtho7KVyoLHQL1/XtSj7iq
oWeSVrPDlsDi4Jb/VivUYJcYsLZqM4HKFetk91rU4ECW73TeQuCsMd55B5Ua
ehdoR9ZRHJEevobZpYYf7JrjpG4EMsVaUev71KDbP9OgcRuBCv3V/7qPq8Fg
8TlGO4tAbSL97/ClJPwxVBL4xodARs67O2+tSEj8+udl4b5UX4BfAseGBNZb
lxcDFCveWZnH2JFwo5pkvPUjsMi8OiD2exLuFh8PG9pF+bFv2lO2kjCyqkCq
CSIwfKNHqc4OErjJtmRUMJVfKDyWxiJhPII2rKF4ZkkCLcuLhHUm80c0IQQ+
U9K98gJJKLlScVSzh7rz4i2NQkh4OOXvHLWX6j/YO5K/h4SxoKMfhyku+lyR
XbSfBGnwqOfwPspvNAwxDychoMh/kBNK+Xlx9lcPkWBCZ5weothx94spSy71
X0HKbE4YgQdXbm6+Hk2C4TgrcZDi/wEhzIfo
            "]]},
          Annotation[#, "Charting`Private`Tag$110376#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[1, 1, 0], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjWs01AkYxqfo7silM3Uca9Dsti4ltWhq8nZsFyWt2EgK29ncMiI5qyKV
munQMKxJxdRUo5hNNUyMcXkNM8aMv5ph3OdfrZR03e4q7M5+eM/z4Xl+v9dp
74HgfdMpFEqg6f7PDPqdC2umzsLBZTRu90IpfmV5x7zcwIUdEQpZrL0U02sb
Vgi4XHAfOsf95ijFtC2ajin7PNA/tLB1dpViUvLwpGJNPoxP0LkJTCkuj5zr
KWrgQRN7hu9YtBSdxUy+69dCsLQY6BJUSHGW35U9PmnFMHbd2v4p4y4K9ik3
0s8JIdvllsUNVg16u+XUrKeVQUsaZ97f7FqU7qgJulRQAYHKzHdTRTIcvZki
T/39Figj/VjPq+uQe/LfzOSDErjLj8mnyeVIUXFnPhmuhpj0ubV7dfX4lPEL
/dOmGnDPKNcqhxow4PaXpd3ZMsjafvHQYl0jzqvfT3v9Rg70SylZqu4m3KJu
mzCsaATCppbnp0CcmLHjwM4EhMqcLNd7wc14itUzYjHWDLrH70PWEc24pf8D
J2R2C7S7HJkMW6PAtZbjDnXQCoXyKmqMRIEJZBGFlaIERvMrx8/OLdjr/kM/
O08FZfH+FwZzWjB5U8k1bG2DWebqD9FfWnDzsPm+yBE1HLYK/bMgshWD/IPt
7L/TQNtoPp+mbUXeJobdj0FakB2KPl3uqUQr9QKri0kdIN7IC0nlKbHR2vDF
tYwA5u7j94M+KlFs5Aw4qTtBUszobdyuQt26HrPYx/cgRyVSNItVaLPKrODJ
PB3063y6C+a0oXE+tURbogN20zJxanQbMjvtaOijB938R4/GGtqQEZbYPqjT
A6PQ5c40qhpDnWSJFVFdcFYSyhDFqnGO/mMO52sXcAJ/zS5tUqOxealoUW43
xJ2SEnss23FrZtWwbpEBmLm8t2sj2jGE5lJyvsoAYocXbqsr2/HwtIvbbP16
INzG2z5uvB29NRNHBWQP5I6V/HXCX4O2+nDRYFIvMNvKU80LNcgtM3vnO9kL
xyReE8/6NSiIulxXVdwHy8foM0/TtdgZ7pUxsKQflqjW80bjtVjEaJTNV/bD
ND7nRk+1Fj8/KbBj7RmAyKNZ9W7ftHikK/qPzJcDkD4ai0JmBxaJnLYJOINQ
Zv80NeVkB96rMdKSFw2Bgeq+M6+lA0X8EWrC9SHwnd6+JIlCoPWuB5zUdUaA
lRP2mX4EXorseu+hM8KngsT39CwC9S6rWiVdRtBlW1Z4HifQ/KOgcGWPETzE
jlt9TxCYkBvv6TNohJsnSneFZRPoI6Mc8B0xwqs+5wtnOATqrD2ebx03gtHs
tWA0n0AzVe6jeEcSFicKuoqFBHrz3t5+4UwCWy9kXL1i8kWEZbG+J+GZISDv
5lUT/9bZIcWVhIGrlykKEYGlDvKI9J9IkPUlzRkrN/Hpz3rZ/iQoOB6VXhIC
43/edn12AAnC8xlvfKtMe0tpWk4gCasnztL8qwmcXpa1IC+YhO7yKf9ddwm8
r6cG83eT8MA2VJFZZ+oFGU4Lo0z/vV+nsOUmf9zwP+d/I8GSE2aVX2/yTVXm
l8aQ0FsiogobTbzGNsohngSbvtxj5U0mnn94mXA/CcXuAYY7SKBX9MNJpyQS
qsJGFtY1ExjntqHzWjIJt2zDNysUBP4HsXKVRQ==
            "]]},
          Annotation[#, "Charting`Private`Tag$111623#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0.5, 0, 0.5], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzHs0lHkYwPGJ2qx2K0tYK2MsbWikC5Lap9PNJUlTugkpxGjGyJEix5bN
7KEpWrY2hjqNimylxpir563JuEUzbrnMu20u0b20ygjtu3/8znM+53m+P8b+
BFa0EY1G20y9/+dxx9t/+kydBq31p/Q2KzGOczxjXm0QQPx9tcMbazEerVYu
FQoE8PRyvdrERozJAQ1NU7ZnoCp2jmG1rRi5vL7Jez5ngWaZ537dXozu4aZL
RMpc+PFtVFuasxgdylcVuIyfg0ct/GG6jxhnrr0c5pV8Hggn3fbQcDEKox9s
dPzjEhRu2et7qlyMnq7ZkvX0UjjR8Puh0PdiFIdIgovzyqB3+72n2Z5VOFSR
KE+KugmTW691BJ6oQsHJL+m8w5Xg2kOvbdJUIa1W8NVg311QOj8L05pJ8Jn3
FsePvhIwEwwFuIRKcNMtA7MtUwrMS7VurBIJzlLE09+8lcOLKdq8d8MSDKjT
TLQvVcH43D2iKGY1TswISdjFRiDb/F8Drxp/5XQMfPOcAE3sEfpJaTUGdP3L
32ZyH/awVyy78bkaV88es5OBGoYWudS7rZcim8yncRIfAEdL+MzLkWLnogVd
WWdq4XDcScPIQynyfAuvoFoDdXUMS1sLGfr3TY8OH6gDEetR//odMgz2Y9nY
zm+Aloza7gqhDHN9vW0WBjeC0ZKuHzL6ZTi3zmLuRW4TvJ5p8I50lKPKrN3g
UvoQ8rK4F5PYcizX87sZdc0w6lliV3xDjto1HcYH+1tAMW1GxrqXcvxuhXHe
4CwtyPwz1abuCtTPsSxsLNTCap670JCgwFXNNnT00sFb5secKbECvXcequ/R
6kB4y7EidUyBOxjSQ2URrfBto5rm5qXEr3Wj2fzxVpCX5Bo/T1WinmCKrHPa
wMr25sp+mRID0+/0aa3boXMncSXqkxK30Z0LL9xph+L5TZ1PvFV4bNrFIPO1
HRCi6XEuS1GhZ8NEmpDsgI+bbuv3yVVortst6uF2gsI9+xx3TIWCUuORnyc7
4ZTf5kWmHjUojCiR3Tn/GPz6clKyjtRg826P490/dcFj+kTqwbs1mO+tks55
0AW77q4amT9ag58G82w4Yd2Q5BqtDfdATG3dl5L+qhsWnJ7pa56ImC9iBAn5
PZCdX592thKxRaKn86x74YBJ0FDWa0RRwYAl+2ovFNsXfZ5lQaDZnr/5SWv0
8Dmmq7ZyGYHF4a0fFmv1kG7G2mi7lUCd8wp1ZasejC58CS+hPH1UeG5Zhx7y
s1KSHVgEsnPilnj16MH0vqZw4TYCvaS0hJ8H9FCm6m9eHkKg1mzxi8AxPYgc
7OsDdxNoXJvzT5w9Cf5pgxZpkQR65r6/9dKBBH7myLNJyuzQnRkcJxIinZok
v+yn+vcOdokuJNjtfbIl6wCBRXby0KPLSbC6nH8wL5rqjw53ZvmRYOhfybwW
R2DcuqCrJptIePplht6ZTd3PFidnbyaBGST8rYKyUWmGxRkWCQuvu/dWxhP4
SGfJKthLglHYy2glh9oLjzOsIkhItPreGLjU/7F97y5EklAebF58j3LR1F9n
i2IoR3OaNQlU32AeYRdHQvb25kh/HtUXHHO7FE9CzLDhQxNlj31PJhlcEhpd
PmQGJRIY67qh+QqPhLVOMjMd5f8AKGqJ4w==
            "]]},
          Annotation[#, "Charting`Private`Tag$112870#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkchpXu2lxD1hKlIpfIdamfo1LpojhdTKF2U4yGoeOQy3baxWxq
mDomCWW3GW1OW9E0JtGPzBhz+WoGg2G+LnKt1qKUxqWd/eM97x/v+zx2PyWG
xczV09Pbo8v/nbn6QbH/7CVInEq51GbBQy3N++SHbUyIHOwYC7TmYVpNnUcZ
kwns88LF91byMCVEIpu1zgf55EtPhiMPE+i9M43+BRA+bpTm5c/DDVFL3Dl1
LBAbx1Wfj+KhfWUA20l7BaijDFc1h4cLg/6I9EkpgkytNCV3wyMsixEGr75a
Dosc2eZdFD56r8/jb7XlwlPJBHskvgZ5B/j7bly+A9Fi3+8fJAtw8G5S7ZkT
94CDBxV78h4j89dvWfTkKshAqnN4Xi3qiZgL+nsfQmp3jFfB9Sc44Be6+vN2
PmyxPxz4sLwOd93/6tL2mwACnZLvNrPq0eBJvO3Iv7VQt+5gUAzrKYaIm6fb
PerhTfeEQV064vT8A4mHqQgzk7H8YNcGzKap+pYON4C7fZT0dkUDhnR9YoQv
egYO3604vGR5I25aNmnzGJqgZsIRb+U1IpUs1KMlCUHPo6DReLoRO5zXdOXm
i0BNz31vdeIZ0reX3MKmZphmqn62aHuGO3vnxUT1iYHtaF0869uE+3aEWVn/
IAGvqniXcm4Tsrb7Wa3bJ4VtbltKc5YJ0UhsZnQ9QQYXtprSexKEWG/c/tWJ
K4dLsbSaKpUQKzUMtZ2YgMiWjNBNniJUBKr0T719DhnnBdVXC0Ro4qt/ud9A
AecqXFP9x0SoMTQvkZYo4PfS0LgFu5oxgLCyRR8lRPx1wXi0shn9Dp1u6VYo
wWbTi/6ahWI8aCc4fSe6FWxF62MNI8W4WDmRx9C2wkJzdvohgRg1DS4cy4tt
oPVaYxGztAV3Z1X3KizbIftH78j6yBYMt3UsuVbdDoO8omINrwXPzrm+1zRI
BZ8LK8Ot5kvQWzKdUUaqIGJOdtYURYKmyghOd0IHbDajUZ0qJcjk6o9vnumA
L5L9Ta8/S7As+ubj6qJOmJEnMc13SpGI8MpUr+2CkeLQ2MFCKRb61QsMhV0w
HDZMWTEgxS/9l61okWqYy306RnrKML31WGrWBzUYVDWSOVkyLOTY7S1jdIND
fbB/okyGz/kaW7plDwwa55geN5Ujh91nTq3ogYTxnrduEXI0prxknAnUwPL8
Ke4qjhxvRLV+dFNoYKC9SH50WI5KR9+mqlYNjOnnUFjv5DhvouzKRpUGSpVL
e5rey5F6Mc7dp1sDa1Z+fOg0IkcfgV7i5j4N7KeFiL6My1Fh7PZu96QGzvT+
eapgWo76oouv41aSYGfwic8zJNCbNXb/vT0Jbyg5JQNGBFKPHDpHcyChV38o
2dKEQMWYvU2SEwla33XaDDMCS21qj6R5kvDCREgNWqHj04Y6cneQkH5zSCW3
JzBuy96KRbtIsMejQzOrdP9lvJS8PSRQ2PX/uDoQOJd7ziw/jIS2gN1K1loC
XyjNw9hHSfA4QkyFO+v2skw7i2gSqkw6udkuOn9s7+i14yTEufUEPXLV+Wb/
Lig9SYI6UX3A3F3HS0yjbeJICPjWIQv20PHss67l8SQ4y1SeqRsJ9Dr2asYu
gYRfLnSybnsSGLt+G3GLTsLiUfJVpxeB/wEBjI5s
            "]]},
          Annotation[#, "Charting`Private`Tag$310686#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 1, 0], Thickness[Large], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVkWs01AkYxiei2trtwlIUjWxtFKs2l9V6HZcI4ZBklWl3k5DL0Ljs6tSW
NdtFUU0pRiyjTW5pjHGZ3vEfl4YwFyOX+W9liZYtdkhpaGc/POc9z3mf3/Pl
of4QFxCuRaFQ9mn0/00zr7rluHAJdCY8T8sNuTgXY3tswj0TVD6++Y7ruJhS
27iDnZkJL8oDBUVGXGR4iTsW1l8GQVzYh8QNXIyNH5pvcrwCSarEZP1NXPwq
7BOb4sYsGJ3Ljwuy4qJZ6W6WxdxVEC+boT114+ISl8LDdoybcGlLofMgnYvs
8OY95jcKIOMf7XsMORdtLS/w3Ew5wCvpccmxqkFuEM8/P/seZPzqsWuKWYOj
ZfT6xKMVIH7d3KUcq8HMsx9PxSc8AFfvqlv+rjyktGTqjgw9BJsdJcuDOTx8
6eBn/taDB0Inp95rOrXoXfl+u/wcH9Kd3GQHabW4vCHa9PWbemh8vJ9RJaxF
r7ZWdc8OAVjske/NMuajWico7mAUgsMrVVLJST6mxyiGV7wSQoOBqbefgo9e
fdPMwKUEJNrx/c9Y1+G3n70zqQMR3BkKnXfNrsMo8jolht4M0Q8LtZym6rB3
2+a+jMstEJsc5CD0qsd4j9wiFLXCcIueoeJ+Pe4dWhweNtwGWUucNyfoNqC/
Z4DR+g1iqJInKQuPN2CWh4PRl/7tEN/iN75E3ICr2vRX3Y7tgIjSG5ZvzRpR
sLrnvQXnCUjXja1JTm/EUiWzn9rWCfS0u5ZnnjWixFmhHfFXF1QvXsZGewGu
sdfOHlkugWOGjJrsWwJUrjTIbc+VgP8Gv4/jKgHu7jQyRTspVJTvnOwLeoQO
wSceD0ikUPZjvYO65hEeoPJP3KPJ4MWKSu7dlYjLpDMXmHMyOO9c0TsSj6gU
bi9ee1EOERHGFmUdiD6nqocka3tAFfJ59P41Qgw03ZqbU90DJ9x/189zEWLq
otu+ei4KOGPxsvdunBBtxeqf2aQCuvdXTqQVCFFPGlI8ENsL/BRrY4MuIWZy
tP91mu8FeiUlqX1OiGzanbrqm08h3DLY3NOyCTtDdqX1b+kDVcHR8fMHm/C6
g4C/srkPGkJndVjnm3B2JNso5nA/BG4d9Gmoa8KfZEeST030A3OSUcZ5qckX
U33ZzAGYVrNoIYYEdvGUpvFrB0GtFWMpdSOwmDVsEFUyCApj1qajdAJXf/cn
M9FZCaOpLnHCQgLzw2Qqa4kSrktL5M+7CJRutRc9kCkh9Hl4YGk3gYtn2Fd3
KpRAfWMuT5QQGHUx0sZuQAkVK4pkujIC7fiUOKdhJYg97ki3KQiUrLb+2+ed
EhYEN7tTBgnUbrn4PHIjqdn/t45VYwTaZk1VjpuRYFXn4T2g8VGhwadjviBh
pk23o+iVhp8yM6FbkHB2JL3ddpzAPJP60JSvScjb+Iv40GsNnzLWm+FJgvRG
atsf0wRGuvqWLPUmIYdj75Ewo8l/xmVc2EdCGHe21fEtgVqc0/qXA0gYlzJa
u2YJ7JYaBLAOkaD7aULL9Jzmz06jGtJIeGJs4/7og6b/+NBkzvckXLOYbGaq
NX0L5VfyjpGw0TO22WhBw4v1aCaRJIwe2O42rPFarFSrgmgSysMnROUfCdx1
5Nk8NZaEkyfvuyZTRHjc0r2zKJ6Eb85FiZwXifA/G3CYsQ==
            "]]},
          Annotation[#, "Charting`Private`Tag$301146#1"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJzt2fk/1Nv/AHClVCi52SqFknJVCnGTHIl2WaIkN7palIqQPYpypbJHtmyp
sY+xr4eZUZYxiy17iiKKi9QVdb99H5/3+/VXjF883o/3zPt9znm95pznOS+F
vxzNLiwUEBAQEhQQ+P//7amChffK6Nj32pdttDZ3JJNL8RlaT8fxtxqCJy94
IOsyI8P9d2vx9UU2OpWFPiiJObU89WMN3i6snGEg74cGOTEdAsY1mOI43Ka+
0BcdK/bUxfYYC9uy6uxHvFAri8HxUa/GZQd/jxB47IqsBpef0/5ZiT9z867s
cLyK3s6emvpWX4Evd5p0Pre/juxXpgYURZZjjRaO+YcmNzSh9EnC5WwZtswX
LvOY9EFuezWf71AuxfskD/dveOiL5k/c1hqfLsbfnR9Gl+zyQwFXGuuzqotw
9wL5VwOr/JDwHQmry/cLcfGj8CcvIr1ReMzZMSXzAqx7q26PidhNor80/GlZ
lEN25TWif1RMObjHI03PnuhPHlb4qqAb4XCFaH82tp70u5JjTrY3EwsYnbJM
MnUm2kfBahVV84eXeBHtSceNISo5GSp3iPen4XPsmY7MVQHE+5JxoM+dNWd5
AcTzE/DQkVnj1dy7xPOe4B9pidmrX94lvh+J6+dV/piK8ic+/xBbtFbnpDb6
EvcDsAmzdfaMgStx7YL/PhJMzY2/jAWIP/qDRAef6WhM3EeB3osffJimENcB
aLfjG4nvNfmYeD4K9lLybJUuJO5HoqAvfUVvhYow0T50NUzD8FxPEfH5BJSp
bySnFlKMif6hrbW5A+ayJcT305B79Y3XNdwSTIwPEvkg+mDB+VLieRR0Q+HO
IO12KSbGFy2SDZzuCC4lnp+N+oS+tYeKlmEiPij8pukLIaFy4n1UpOpl+TRu
TQUm4osGZypWp3ZUEO8vQAoyUXbHxCsxkR8okDN3p3BtJdGeIhS/u+txpVMl
JvILNc6ExS2eqyTaV4p8qV9el56pwkR+ItZ3rUn98CqiveXoz+0rOjjLqzGR
38hlNvOBlDwm2l+JxA+cT1tnUYOJ3wcSfbGSvUywlugPRsqjRwqnrGsx8ftC
CRpTSPJaLdG/GnR/1+1LzZdrMfH7RCmvVJ8rGdUS/aWjat5FkSGRWkz8vtFW
6xXSfi01RP8ZKFDxzNztNzX4+MOyDfXjDLR62VZOwrJaYjyY6Oh6zhdTzVr8
6qZjuLBiHbpQ9jVsQ1AtMT51qPPnpMHYIjrWs9kkYHT6JQqyGvcttKET4/US
ifR/FJ0MpeOyQz3XQ0NeoZBRnX1pzXRi/OrR75dZmC7PwGpq4X08Rj1q+ctW
31eXQYxnA7LRp58tE2XgrLUHj0nMNqAuzWML0xh0YnwbkfWKFUUPntCx4uIf
5Se3N6GC6SZBkWA6Md5N6DHbeuVoNB0njtOUY+1YSEZ/NMmhlE6MPwstMaEs
dWXTsVSn/ZOeJ80ocWpTWS+HTsSDjUZOoTGdQToOrV2/ZD2bjaL0Hi/WVmQQ
8eEgVpj9BC2Ege9ajGpTF3DRAj3/r8UfGUS8uIgX6p6j08XA+44YOpsmcNGe
XXSpRzcZRPy4yC7gjJO6PgP/0E3OmNLkobKNslvaLjCIePIQq9AjQyuZgcvV
5wYieTykeTXOPfENg4hvC5LbaC+xfDcTu205KbPragvK3bvqcsBdJhHvFmT+
eTJLxJaJ1dflG3cItSL5eUMxvwoGEf9WFM2092SJMfA/4qJ/u6e0IueTPS45
7XQiH1rReIy3x9RCBs4WulQto9OGnq+L2LzQjEHkRxvS1mZTLIsZ+PJc7UxZ
RxsqMdCbLt/MJPKlHTEtNtlSLZl40z+y287caEeiDsqxDX8wifxpR2cip0t3
LmDid0Pu5+dFOhBb27ci6xWDyKcO5Ng2EdkVwMBPu1riE593oPnVdbo9bgwi
vzpQXG+uk2kcA59hb2vV3fcaOVs033mbxiDy7TVq9pboPuvLwNKMIOGBntfo
3ezzgyM2DCL/OlHHxkh69REGbisZ3HfHrROZ1bwVOKpB5mMn8pVurXMxZOCw
bF3PDeJdaP+Kezrvfcj87EL+QgLvlv+6NkqJpTKyupCEs13Iuh1kvnYhxd+0
/jFWYuBl0V+Gzx/oRsqUqNaTv9r7v/ztRhEu0d8v72Lil8HGckJvu9ERSkCX
3zMmkc89qF7wJIfZ/mu8/DJPvvDuQYWzhdpbaEwiv3uQsqab/hsvJkaui0MO
SfWi/PC8Aplf9/+X773Ic7T7hpV5HZ63t637SO1FM45fIhRa64j870V95haq
4/F1uPTPivngo31I/slDszE2mT907LhJfipJuQw8EKewXtbuWRl4QIU6YfE4
uhQ8MKYnba6sXAIeWCe/Zs4tpRg8ILJ8V1wbpQg8cGLD9akcKxp4YD9tueuJ
z9ngAWOrTUu932eBBzj5X/6traeCBz7nMy5aWBWAByZfZ6/5KlgIHkjTeDEu
2V8AHhgcU+gfiysAD+wVvDhivqUAPKDQdHPOM5YGHnjjbiYx/zsNPNA5/rf4
5/p88MCYiekZ/I4KHjCJqHLpTM8FD1CG5HQWJeWCB0LWqTUV3KOBB74dXy48
llYEHli5w6OiEBWBByIEKPWF2wrAAyLX/lJOMqCBB6bEuE8Zu2jggU9Dy5wv
1+WDB9J2fD4n4UwFD4xQbtNZ27PAAymqQ0X5R5IR6YGNxX/vFBO8SN5HIVK6
v3W9iAYP+Owp/5FyNRk8MJbjo9KrmgweCOMEGQRpJIMHThvaLv9cnAweKNPD
xhJ2ieCB7Vr+I80VseABpiB10uF2PHhgKszi+kxqNHigaMnW96z88+CBB3HB
fTKJkeT4o1ua560S8uPJ+CC7/ifD0dqPyfghcVPDvV1198j4Iqw03HZH352M
P3JPfDAcG3GBzA9kV2VrqH/LGzyQfCv1g7hwDHigJuLkb0vsn4IHzu4yVaPY
PgYPGDtcE/rJCgAPXCsMqfLdHAwekF2lFFvmlQQe4NLcCzU/ZIEH1o4kX/ZQ
oYEH+rcaZ6sp0MADQvYR9VKbs8EDo9niFv2r08EDjaFjshe608ADrIHaPuOU
Z+CBoI8FR8K908EDLw9pe77+TAEPXFDXxVWDFPCA6GZ7VZybCh64+U2udmBP
PHjgQ8scav6UCB5YylqQ3vcpBTywjn2h9apEOnjA9lJ0ypL5LPDAtE7tDx8r
GnjAIPtQ5osDBeAB84FAxQkFKnhAJqVwkcbeLPDAlIpNt9qmHPDA2UOisnPz
ueCBsNnwo8dtMsEDchmisi6taeAB9dp11ayYFPBAh+F6ATyfAh5I2PRvyCfZ
VPCAfJivpY3kM/CA45YMFTlWFnig3XL45sxzGnjgi5nSuNv5AvCA2mi9COt0
LnhgbeLmEf1Xz8ADYqqsBzFKyeABxs6oorX+SeABhRTZfTVGaeCBgJeLLD51
ZIEHAu4l372hTgMPSJWpKrrtp4EHAi9J4T23s8EDERddDXWpz8ADVlqL9hr1
J4MHCkYVnfbwnoIH8icOv9hqkgIeCO019fD+lwIeaEzuGxJmU8EDPmHL58IE
88EDwtbaxfK/4kF6oLw52IX+IxU8MPtege0Y+RQ8YL3l3yUzKbHggfS9Jkpf
Ax+DB5Y6jV5DMlHggW6unWH5wijwgOihDz/U+8LAAz3NtbqdlQHggXMNn6dS
vDzAA3Frzu/kBPqDB54OX3T3fhIEHpAaq1AMOuQPHtBrFZYsWeEJHugefH7S
2fQ+eECyL2Qk53sceGD4qGOZ68pU8MBvfzz6ucknFTzgZ3Lrg7F6GnggWTKW
cck2FTzwk3v2vE58DHjATPSW5kLbAPAA51RWT2ybN3hAz0ehzul+IHjg1MaJ
nLJrD8EDweyB7WZ1/uCBzd1/2Rw0c0CkB3DMuexlqsXkfII/TDJHn8UUk/MN
TuTYsX/8V0jOR/iZ3FS1vGEBOV/hLWq3bu94C/MZXnbH+86rozRyvsMlNNOa
tWF55HyIlUpLLl6zySDnS6yH1m67KEMh51O80rHIOrg/i5xvcVCJQdIxjzxy
PsZHigarb6hRyfkaBx/L+lY1nkfO59j0tXfwG6c8cv+HxdJejGKHPHJ/iKc1
vw/LTeSR+0espxVrtNOYSu4vsbX2ou53BlRy/4nF7fqvi3rkkvtTrBh17aV+
Tya5XmF7ceGLCcKZ5HqGTVka0o/v55LrHT7gQH8qcDqfXA+xe2X54kYv8n3J
eEBf7G65cza5nuJ0jfrMnQrk857gYSPTS15LM8n1GLs2/Xh1Wi+TXK+xc/YV
mds7M8j1/FeeizCL1j0n9/940mPmwWbfNDgfUFxSfDbnBAXOB97N3Dzwz+EC
8EBBzdvf045WgAfEjA9e7xWpAQ+k11Q8w7M14AEpv94Fz3NqwQORVhaPOW/p
4IEDXk839gwxwAP/Ve05XWDLBA98VtfvSw2tAw+Y3fiUN7atHjxg4agl5vWz
Ec4Hch7tP8fwZ8H5wNlwg7unc1hwPrCPs1XtXzcWnA+sVrXbUhzGgvOBmANq
TdGXWHA+EN/AdWxETeCBDx8XnfYKbQAPOG88ULpoewN4oPV+Ji8trxE8IK3I
W+lizgIPSO7fNXrKgQUeWKkVaIl3NIEHnJIyY3OoDeAB4W6TS6f+qQcPDO69
/tuxjAbwgBYHN5/nNoEHOv6r2L3xUTN4wDhLcXFhWjN44KjKn3KuEyzwwLcq
x57VB1jgge7iSzIPA5rAA5b3grYf6W4CD7SpMdd9qWkGD3S7NCxroHDAA1n7
ppzWK3HBA0sUjjfKbOCCB8IOfR962c0BDxjskYgzSGCDB3rUSwUOSjSDB/wd
E/IoXSzwQJTEPhXvpWzwwBVDB8HZEjZ4oMr0bkHjcDN4wKQ9Su+1eTN4oG59
+yOBaDZ44Eu2vc6PvVzwwEDMkJNXPBc8MKi8ocsgjAse0DhhezopiQseCL9+
b01IChc8UO0wvUxVkgseeNK6Um3ajw0e2PK1Z3CvABs8MKoa8fsLcw54oCb0
5KqjGVzwQEdiquaCczzwAPWG3LgkhQceWNXp5vj+Jg88YBz86r5qNRc8EP9H
h9jxCQ54QPZnk6H1Uw54QFXVLsZdhQseYGqVU5meXPBAIEebNVjGBQ/sP+xZ
2y/JAw/kvaFEzG/mgQcyfjJ2H47hggeEy8RdnUY44IH0yXMKLGkueOCh3F/+
7z9xwQNpu/2veKbwwAOOsgnVrv088MBHU6f95R954AEFKdteh/Ut4IHYXVzP
ZssW8ICdjHtfkV0LeOCYtGbcA6cW8IDzGPXeAnoLeCD/6ivttpEW8IBv0sm/
JZJbwAP7BqRH8263gAfGttvMJY+2gAc0erIWt0q3ggdmtHPnwi+0gAdOKOaK
p7vxwAPZ1Rd1DlnywAPhLKb2+/c88ID2z4JeSd0W8IDE23cdJfdbwAPPRB1d
Xf9oBQ+8NKLvePOmFTxgNqR37KV+G3ggpj9/bEVyG3ig5+vduoKJNvCA/fH+
RMbidvBA259H34b+uubXC/j1An69gF8v4NcL+PUCfr2AXy/g1wv49QJ+vYBf
L+DXC/j1An69gF8v4NcL+PUCfr2AXy/g1wv49QJ+vYBfL/g/R4yp0g==
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0vOfEAYAxuG7y7axbNtLa9m2XZeNdbfcatm22zK2zC1u2bbtns+nH573
/Qe+KZsHV+8cFBAQEEiQCUNYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIRnwQk
JBGJSUJSkpGcH0hBSlKRmjSkJR3pyUBGMpGZLGQlG9nJQU5ykZs85CUf+SlA
QQpRmCIUpRg/UpwSlKQUpfmJMvxMWcpRngpUpBKVqUJVqlGdGtSkFrWpQ13q
UZ8GNKQRjWlCU5rRnBa0pBWtaUNb2tGeDnSkE50Jpgtd6UZ3etCTXvSmD33p
R38GMJBBDOYXhhBCaOD3DgIDv0fx1X3hM5/4yAfe8463vOE1r3jJC57zjKc8
4TGPeMgD7nOPu9zhNre4yQ2uc42rXOEyl7jIBc5zjrOc4TT/8x+nOMkJjnOM
o/zLPxzhMIc4yAH2s4+97GE3u9jJ3/zFDrazja1sYTOb2MgG1vMnf7COtaxh
NatYyQqWs4ylLGExi1jIAuYzj7nMYTazmMkMpjONqUxhMpOYyATG8zvjGMtv
jGE0oxjJCIYzjKH8SighfANDgILC
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwN0ncilwEAANDv5yau5AgOoDOYGVmJsiJ7haKQlZW99967MrJDvT/eDV54
5IuIqFAQBNHEEEsc8STwkkSSSCaFV6SSRjoZZPKaLN6QTQ5veUcueeRTQCHv
KaKYD5RQShnlVFBJFdXUUEsdH6mngUY+8ZkmmvnCV1popY1vtNNBJ110850e
eumjnwF+MMgQw4wwyhjjTDDJFNPMMMsc8yywyBLLrLDKGutssMkW2+ywyx77
HHDIEceccMpPfvGbM8654JI/XHHNDbfccc8Df3nkiWf+EQgQIoz/0opg+g==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0dVSFAAAQNF1AElJUbpLBATp7u4lVBCQBenuzh/n8HBm7vvNDx0GDz4E
AoFnwkQ4EXwkkiiiiSGWOD4RTwKJJJFMCp9J5QtfSSOdDDLJIpsccskjnwIK
KaKYEkop4xvlfKeCSqr4QTU1/KSWOuppoJEmmmmhlTba6aCTLrrpoZc++hlg
kCGGGWGUMcaZYJIppgkywyxzzPOL3/xhgUX+ssQyK/xjlRBrrPOfDTbZYpsd
dtljn/dphxxxzAmnnHHOBZdccc0Nt9xxzwOPPPHMC6+8AWo8JHk=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0.014156776511059444`, -0.1671729694607512},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.42, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.44, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.46, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.48, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{47.00000000000003, 5.}, {22., 4.000000000000028}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.8510558722791877`*^9, 3.8510558839502335`*^9}, 
   3.851058062551507*^9, 3.851058913590639*^9, {3.851330085988905*^9, 
   3.85133010923724*^9}, 3.8513415068252378`*^9, 3.851341897196062*^9, 
   3.851342269025888*^9, 3.8513424779823065`*^9, 3.851342553235388*^9, 
   3.8513426167481365`*^9, 3.851342768806308*^9, 3.851575684130927*^9, 
   3.8515849506964283`*^9, 3.8515850499917965`*^9, 3.8515855028995247`*^9, {
   3.8515855754257545`*^9, 3.8515856354139233`*^9}, 3.8515856926828194`*^9, 
   3.8515864932117014`*^9, {3.85158663095928*^9, 3.851586643271215*^9}, 
   3.851586862071417*^9, 3.8515869549280915`*^9, {3.8515870008427415`*^9, 
   3.851587017845268*^9}, 3.8524570275355773`*^9, 3.852962505741949*^9, 
   3.852970927138775*^9, 3.852971023955714*^9, 3.8529710849652843`*^9, {
   3.8529715079830832`*^9, 3.8529715193478117`*^9}, 3.8529717790186796`*^9, {
   3.852971938053161*^9, 3.8529719473996706`*^9}, 3.8529720006457586`*^9, {
   3.8529720329032702`*^9, 3.8529720997995844`*^9}, 3.8529721845151157`*^9, 
   3.8529723049304485`*^9, 3.852972402155675*^9, 3.8529724771677885`*^9, 
   3.8529726131811547`*^9, 3.8529726897757416`*^9, {3.8529727563219223`*^9, 
   3.8529727845741196`*^9}, 3.852973151314173*^9, 3.8529732783244963`*^9, 
   3.852973347628791*^9, 3.8533042105237184`*^9, 3.853305371288211*^9, {
   3.8533055835916767`*^9, 3.853305621872224*^9}, {3.853305669694626*^9, 
   3.8533057342676783`*^9}, 3.8533061363791513`*^9, {3.853306182617694*^9, 
   3.853306190456072*^9}, 3.8535855576844482`*^9, 3.8554770978508615`*^9, 
   3.8554802714103203`*^9, 3.855645860673297*^9, {3.855645917978985*^9, 
   3.8556459545631533`*^9}, {3.855645992532096*^9, 3.855646000690302*^9}, 
   3.855646031361818*^9},
 CellLabel->
  "Out[364]=",ExpressionUUID->"c84f8503-e74b-4c04-8d9c-de67675726c2"],

Cell[BoxData[
 GraphicsBox[{{}, {InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {GrayLevel[0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzn881HccB/CjVDwq/TA1yTh1EyttpDxcvd9R+RWnqFjRcVHI79IPEncd
+XFfWgkbd0ZKls2Protx81g9pu1aocuP2O2268e56vtRtDLa9t0fr8fr8fzn
9XjZRSXtjDZmsVgBTP7vy36OgW4jE5v0F7zS6pfQUD3xakTKfgBNqgsdrKU0
+IeKVxxl68Bbfv9dKGM7M54Pnz0OvzuIt5p+SMNcncujXewZqDhHO8da0ZDD
49QGsRcj98pvPpzlNHSIZbMD2fYYcqJfWsqmYch2pG072wU9xIrdvqtp4E/s
jwoc88LaGcuNlF40GGyGhUJZANLuNY69e2i42Dd60Kw4GDnvkla1xNHQOrj0
Rog8FE08vOODsmhYJry7sE4UjgHD19YOFdOAxyr8MvZFIl3WrTKrYfZnHi6b
MgiwbbVozKaVBo6O9TwrIAZbCtd1Rf5IQ5x9Up9QdwjXX22b69FHQ4hc1pUf
EI/1uzLzo7U0OEmJ+6FvEvD0/N5OxUtm/0hRrcAmGUvK9/JLpmjY5ClstNiR
gqg5YCCzCUx1HTDKrUrFSG0Yt9uCgPPzfiudLg0/0pa+UNsScNvUoNhscRQv
8WIbK5wITG+Ok/Ij0tEGzT/+2Y1AaWLhnJwvjuEnX2XOu4MEXvpXdERqj6Pw
sYMJx59Ah9rNbY3DSQx20tRoQwhE5K5zmQ7LQN6THuW5cAI/6G1PFtRlomnV
tdSyGALjaQlbrIZP4UZ1+vEriQSqGnzVpWanMf9PTb9HOoEZvqYD+lXZqMnI
alqWRcBuh1Scdysbk6+HVq4QE5A1rwqbFZeDg5lV15OLCAw+yzTPmCfEC0o/
yvc8gYyW7LyxOiE653mbH6wgcOrhyRXb/EVYP4sX1CUjMFq0UlT5RITNUQ2u
h+sILLAqv63PPIPmfM1AVwOBsn9ZTh/YiXH46+9a/ZoI5J2wCvZsF2PP4ML3
XDmBfn/Hah4/F+0fjxVGtBMobjF8Gz6Vi+T9Zu24kvlPUqsjz+dhEY+T5HmL
wIDo1Y2tG87i329/WvB9NwGLRttix76zWN6b49CmItC8ZlsROZ6PjSbiqpH7
BExzXQ43WBdgfODIcuUDAqqU3nkx8gIcaOaPuw4QeCGPVhvtLUTF0/Lhu48I
HKMa9knfFKJRpauzsYZAJ1fRvVZShAc+33jV5A8CAq/2PbWfSlBlnZvNeUwg
VZNw1VIlwc4F+za+ekrgdu7OoVu/SrC+9UzSe8aWzutNU3ok+NRrt8z0GYH2
06xY1UMJThv/9daOsZHdeYdsrQTfDrlKdjIuEdy8MvpGgr4aS59Wxo1648sd
thRuH6o1TtMT+Kfk2cNYewoPWd8zZDEOcr9rsoRD4bBRU08B44n80ugUJwrj
CipLaxhznRxWctwoLEheObOP8S8JAZeK/SmcFIUfWTtKwNryMzU3kMKoxe4b
uIwTlZYzDUEU1skeTHozXmSuFWzZTWGY2Dt9P+OwplT7ST6FWsH6EIpxQ+ie
4MsCCjNvLpn1JeNpFlcUHEOhq6JdXse4eoeJrjGewov5fvM7Gb+eHF20N5HC
Yp8NijuMt9Tc85yTQuHWs4ZwNeOLfq2p8jQKI5SRxlrG+tdlNVHpFJ7hSy89
Z/wfsGdmgg==
            "]]},
          Annotation[#, "Charting`Private`Tag$114204#1"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJztmfk/VVsfx4+4SK6IDKGBQrhFKRVd30a6UYQkknnOUKTocswOOY6p0CQy
5CYSlavBTSqZnyiiIqSSqUmUPOs+rW/9Ec/xi9f7tc7a3/3Za62933uvBfbe
O5ymMRgMfl4G49//+DfbaO2xW3bDet9pIfAK9mvqbkDWgoEYtc8BGsi/g8x5
HqEby5E3Qgp4727TR94C45FOpvK7kbcBu+iU1R0LykwTuCBwQrxhK7abgdUf
u4TlzbF9J3xy5cvNDsR2S9DtWOUdnYntVqCXL1R34wK228CvEhGz+3Mpgy3M
MN/kPZiDv7cDP4+MqTz8faU9bNdf+9eLQuzvCPGVk+JF57C/EwjsW1H97jT2
d4ZPWomMu9nY3wVUjrRtmfOjvhu4vA4XyLqI/d2hxGZlnTUy0wOeVizKYBZj
f0/wXbIqU/kW9veCo6u0Fyt0YH9v4Omdu9H1M7IPPNF3CS6eNvKdu3yA1zet
yeELHt8Xup4orlfqpzx/PzgWL1Oyb8Z6+2HK8yWLeZay7QEwlZPRNlTF+n7g
FPpV1jB66Dtn+kFjyz3eebMogz/cdh2VNxkapPX9YWJmwub57ykzD8KlBefr
/Xnp7+cHwIu//cvc51CuDIDJ0gHBPcso2x4C8dDmK5HrKDMOg/lBw8J0A6x/
GIwPfOhctQXrB4KK4vE2NaDcFQivVPoUKrUpM4NA7ctZ+2hsn38ErhkxtMUs
sf4RSH8z/XjdAaz/J6RJSE3Nicf6wVCUuVhQNg/rB0NNdNu39utYPwTuGw2f
KK3B+iHwOsnv70sPsZ0JjiU2JmOdlDlMcLq96WwqchcTdFgmyrtaKWuEwhPO
N0m7djz/UNDV2RGQ3k+5KRTCCrI1vg5gnjAQVWnnM3xB2ScMwPSYbu1zzBcG
Irn7cjnjlEXDocOnLueuGo53ODwujlrav5NycTis+Kx+uvrHeo+A/+xdNRSC
6884AjRFbDKKN1LOjIA1fzrUmayhPBIBG/ILecPX4fyMhDcXa/KT91DmRII4
O02++gjlrkhobpghfIlNWSMKgtQXdMyMw/kbBX+Zz2gf86fcFAUXHdcP29rj
fI6Gqd+bvzm4UfaJhtiqsMPO8Ti/o4GTK+X/poiyaAyk/FL3i1c55o+BkhM3
+QOvYf4YcFw+6TNWhflZIJcrbaf1BPOzoLA26+TuEczPApPFjB4NHrr+Rljw
cv+6D4v4KUMsvDtvcu0FL2VOLIzJJd07iuuzKxYs1m56fuAd5o+DgSJlnaDX
mD8OrPNKHy5+hvnjQD+rwaq2E/MfhYsNi0N3DmH+o+BRKrCyHutXHgVzhcDz
HyUoi8ZDa3brwVQpyrbxEDuqNE9PiHJxPPC/CCkXweMx2HCva7mYEdY3ZsP7
Iwku8/B8M9lgx5krLzgD87PBXHSGXr4M5k8ANd3Sz/XzMX8CHB8PkP2G3JUA
a4Sl9IUkKUtz4L2uzkwVPuzPAYto2/cfxmg9Vw4s0WszUBXA43HA4IJHhzPm
ucYB7Vi1llI5PD4HHBc6rv0iTlkwEfgno9sX4/E1EqFpZWKcDl7vXYnQ7dKY
euM5Xv9E0Ps0LHrwDeX8RPAbb/E3eIvjkQgLdEIHeXA8PieCcYbF4d46HJ8k
kDaoY4Q9oGyQBLPFNRuE8f7rkwQfbnRaDTyknJYELSX1Li73cf4mwXVmtJZE
JeVXSTDkke0m0oDzORkeTZ6q34bnsyoZ2rtF5sfhfLRNhjO5K7Lc8fkQkwya
5emRlTh/i5NB4ehprZEWym3JUJ0t5W11Hcc/BfJyUt69/vE8YzDeNrSnCdnR
4xEfCLizrY9liKwFhZa6m3k2Iv8OnD/4WTLbkTeCIM8u3aU/+m+BefXjzn1O
yNvgjljjt+ZdlIkPdJ5WVDHegu1m0MB8sF5iK7bvhCtiw9/WuGG7JWh7n7q0
/ji2W4HomoS4+gJst4GgrZsVjifh/LKFudrb/7njh7+3A/nDZ/JfBuL6sYfC
5pibM89gf0c4Jrc7Ne8m9neC/VXrtfiqsL8zbPvTvkzsIvZ3gYruXo+nWI/4
QK5AVrpIBPZ3h8ChgQCpGOzvAceDBczXHcP+npDv8NTt6Xns7wWWD+BKNNYj
PiC3ysmnowXZBx67WuTNevDTB4KtlsUwCvH4vjCDMU+nIp0y8QGX5We87sRi
vf1gwDPtwSkrnD8HICfrgfM5XC/EB1Z3f5B46YXr3w+q9/KmZwPe7/0hWWtd
QRb6HPGB7gdSn2Pxfk18IM3CXanbGtdHACyxizx0F+/vxAfeuc1+Xo/znfiA
abbV446ZWP8wrBuRi5dRp0x8oFI9Tz1zAeYPhGXC00IUJrF+IPwdc2daGfoU
8YGs1d6s39AHiQ9skC+VPYS+R3zAWX3STL4J6/8JF5V1Wjzw/k18YI/kFnUj
JawfDOorJaxVcL4TH1DSEOl5hPOV+IBYkJ3O2tXYTp73iQFC95Xx/sWEIqd5
x6zl8fdM8GG3MzbMwftTKChrd9wtWIjjFwqXBgRne2lSJj4wXWLHnmdLcDzD
YN0hq6hFeH8lPjDd3mRRqzSObxgMqzjfa1TF50E4NL3RrHm5G8c7HGrSslqO
sPB5EA4hOf4aCWzMHwGpkTlfWn0pEx+wThAb77HE6xEBkrr5OVfN8XkQAYpy
uhdZezB/JKRn7HRd6o75I2FZ+cUV2SGYPxLkFVMcFfIwfxRYi0rfX4TzmfjA
4Zb2kzH3MH8UhK6RzFDNxvzRsKlf+bYrri/iA9WvEtM0ojF/NFy++zpFOgvz
x0BzkIDBkxLMHwNd8dNuzCjG/DFg0LOreOtfmJ8F9nuPpzwrw/wsKNoJYUat
mJ8FA6s/2W3nH6X5WdCkEOVyRIky8YHSBI+/g2ZRJj7AFJjqOfkU88eC7KnX
7OoKzB8HFcba15WuYv44cK3IOh5yDfPHwfbZbbvPIhMfKBHu23foPuY/CrHu
w46Coz994I9zors8JGh94gPZC96HmuH5EB8Y3ei/cu2Hnz5QoBBnytOB+dlg
ZpldJ9yG+dlwgk9/WWkP5mfDtSVzedoHf/rAjnVjc8fGfvrARO2bXl9BzJ8A
iqpN7yOkKRMfME39qiwkSZn4QHAJY+LWt58+sIpXXz5uhDLxgbrtG3VfC+Hx
ODCTfe66qy5l4gMbrqt8tDHG43NA1/tz72JNysQHFMeu117jo0x8ION8+IqV
mJ/4wNjICaERXtpOfCDHaMbpK/MoEx8okHxmUKtKmfhApb53Y5EMZeIDe8uu
zDyE5098YP4ypao6PH/iA2mbi/RFcHyID1xolVGdNUyZ+ICJUp5y9AscvyR4
KJ6n9QqvP/GBqcgBZUFsJz4wrL+5KxzrER+obkwxkp+L45sM0ydkDTt/o0x8
IOjx5e6DapSJD2TEb5cKXkyZ+IDakvlWjYsoEx/oWvH423IcL/Jn+vXuhBsP
vi8thNnRGumOg/T9j/hAsM0zh8E25N9h1o1PPPo1yBtBNmSJ7o565C1w2fdx
m/cr5G2QonOqvHcS3ydN4Gzz0KMvfFjPDGSSZZPFJPB9aSeEXlTd1qyA7ZYg
1LYyiIXvq8QHbDo/MbvwfZT4wKLEoJdnVPB9zRae6ry1MrHH39tBYe/HwjAH
fJ+yh80Dru058tjfkVxv/UmROnp+xAdUTPsWPL2K5+sMRt57jrkOUCY+0KbV
X3EY33eJD4RUVXUomWN9d/DsSsmPNcT6HsAO1I0N1sL6npCQWuaZoor9vcCh
822f1lLs7w01FgfyZPSRfaDcaKjg5EF83/SBX9XqOHdP4vF9obBsusijDHyf
3A8T40reOvj+S3zA6/H9kOo4fD8+AFbvT2Zu34r1/SBpAZ9iyRmaj/hA25aj
Xhk9b2l9fxg9eTZxKoIy8QExc/7UsnDKxAceDPT7CRVQJj5wTML5ncgtysQH
BBm3l73Npkx8ILRi4KapA2XiA6rCe4GxmjLxgXnxGbaa27F+IMxdo75sBdYj
PiBV88uG2iKsHwSl11t0up9g/SOgHmy4o4APx+sI1OdLtgdJUSY+0Nx+1dxG
HOdnMJyT+OfqCR7MHwyrs2M2OYxi/RDYoHPbt2IK64dA8VKlb6+0cL4wwXh9
Q7yNO2XiA/vKDSX3B+P3FCYc+zhsqHqQMvEBl8ubMz3dcH6FguSZpDs7PSkT
HxhVz87VCaRMfCBz75evhhGUiQ94v2AteRuP+cJAb0LkZugpysQHJIVXlN86
i3nDQU7jfllLBmXiA+45Xh2euZg/AgJLF/WZ3qNMfKBwMm19eitejwjYEnbQ
SAvXO/EBPemegnf4e+IDZ1VeMu+/xPyRcPv8w8YNE5g/ElwshrfJN2L+KIBV
s5RaQjF/FNhPczj0zBrzR4Gl2a4CT7x+xAcOFO04/Anr//t9oKz7Hw9hnN/R
UH7LqjJbFr+PxECkOCtI+Vec7zFwTvZQcqcoZeID2pkGoRaaOP9Z4Bc/Lf0v
/D5FfGDy9R2tOSvxexELvDUl7i/8jPlZ8DVynOdMLeaPBccYb8/kN5g/FkZU
le4918H1GgtBcDXTeh9+H4oD25tdk/mOuH7j4M1jxUNmuB6JD7yXGeQxw/Mh
PjAezlK6ju3EB1K/6oksXI35j8JNuPdxCu8nxAdEDH0eX8B24gMbdS/NDMPv
Z8QHrgS/rp2jhPnZ0C2ygMXE60l8oHiE4/5IDvOzQbJ37X4vY8rEB0pvrr1Z
gvcj4gMVu75Im+3H72MJIJmkFzW0A/MnwHp+hzoJdcrEB5rYAwbzxbE/B/QE
l194KEKZ+IDCnraCR/x4PA7wpTp9qOml15f4gGmxtfPs/+D84oDk5TNq6fi8
Ij5Q+0tuwwoBvN6J4DFH9oIQjg/xgdZBZ8kTP+7viaBpUtMXnEqZ+EBy9aDl
RBjOx0Soeqmoew7XH/GBnpp1D9tO4vxMghE1wyD3y5SJD4yn8f46eQvnaxIk
NEU6lOD8JT7AL2PErMT5Q3ygsb1yyqKBMvGBrlrvcGF83hIfqPMoepLaQZn4
QEe/WN8oHo/4gFvu6ZHRQsrEB9yravWTY3G9J4Po5Kk1vTspEx9YPjCkLP0b
rv8UYD8P7PdYjMzdL+DuF3D3C7j7Bdz9gu/5ufsF3P0C7n4Bd7+Au1/wP+Tu
F3D3C7j7Bdz9Au5+AR0P7n4Bd7+Au1/A3S/g7hd8vx7c/QLufgF3v+D/Yb/g
v02sBMs=
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0vOfEAYAxuG7y7axbNtLa9m2XZeNdbfcatm22zK2zC1u2bbtns+nH573
/Qe+KZsHV+8cFBAQEEiQCUNYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIRnwQk
JBGJSUJSkpGcH0hBSlKRmjSkJR3pyUBGMpGZLGQlG9nJQU5ykZs85CUf+SlA
QQpRmCIUpRg/UpwSlKQUpfmJMvxMWcpRngpUpBKVqUJVqlGdGtSkFrWpQ13q
UZ8GNKQRjWlCU5rRnBa0pBWtaUNb2tGeDnSkE50Jpgtd6UZ3etCTXvSmD33p
R38GMJBBDOYXhhBCaOD3DgIDv0fx1X3hM5/4yAfe8463vOE1r3jJC57zjKc8
4TGPeMgD7nOPu9zhNre4yQ2uc42rXOEyl7jIBc5zjrOc4TT/8x+nOMkJjnOM
o/zLPxzhMIc4yAH2s4+97GE3u9jJ3/zFDrazja1sYTOb2MgG1vMnf7COtaxh
NatYyQqWs4ylLGExi1jIAuYzj7nMYTazmMkMpjONqUxhMpOYyATG8zvjGMtv
jGE0oxjJCIYzjKH8SighfANDgILC
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwN0ncilwEAANDv5yau5AgOoDOYGVmJsiJ7haKQlZW99967MrJDvT/eDV54
5IuIqFAQBNHEEEsc8STwkkSSSCaFV6SSRjoZZPKaLN6QTQ5veUcueeRTQCHv
KaKYD5RQShnlVFBJFdXUUEsdH6mngUY+8ZkmmvnCV1popY1vtNNBJ110850e
eumjnwF+MMgQw4wwyhjjTDDJFNPMMMsc8yywyBLLrLDKGutssMkW2+ywyx77
HHDIEceccMpPfvGbM8654JI/XHHNDbfccc8Df3nkiWf+EQgQIoz/0opg+g==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0dVSFAAAQNF1AElJUbpLBATp7u4lVBCQBenuzh/n8HBm7vvNDx0GDz4E
AoFnwkQ4EXwkkiiiiSGWOD4RTwKJJJFMCp9J5QtfSSOdDDLJIpsccskjnwIK
KaKYEkop4xvlfKeCSqr4QTU1/KSWOuppoJEmmmmhlTba6aCTLrrpoZc++hlg
kCGGGWGUMcaZYJIppgkywyxzzPOL3/xhgUX+ssQyK/xjlRBrrPOfDTbZYpsd
dtljn/dphxxxzAmnnHHOBZdccc0Nt9xxzwOPPPHMC6+8AWo8JHk=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.86, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.87, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.88, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.89, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.91, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.92, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.93, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.94, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.96, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.97, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.98, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.99, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.01, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.03, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.07, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.09, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {250., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {750., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1000., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1250., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-250., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-150., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-50., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {50., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {150., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {350., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {450., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {550., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {600., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {650., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {700., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {800., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {850., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {900., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {950., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1050., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1100., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1150., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1200., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1300., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1350., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1400., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1450., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1500., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{37., 5.}, {22.00000000000003, 4.000000000000128}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {192., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], InsetBox[
     GraphicsBox[{{{{}, {}, 
         TagBox[
          {GrayLevel[0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjn08lAcAx6m8JCpUlo3JNiIUlY9K/YidVGdlaoVUtvOy87baKi+nouzM
VqFEk4yiOGUdhk96GVfo5KXzEve0pCvJc3fP3fN4CWu3P36f3+f7x/fz+y0L
jfXnzNLS0mJr8n/rac81nVzuvan5fka2Do/E+bPJY6uTraE3uia1WMMpkb9e
nZfsgqLr5SmeySTid2cnjvM2Y9Gsd9W84yRo8ZJwkuePwkfPybGTJFz4fcHD
vFCQlS+vjqaR6OTU9cp4h5BXlPWF7ByJQondhVe8FFjxJCyDayQ22gltpr2z
MeBiVXu1k4R2gmpisjAfSRHUGe40Cb7o4cjU6yJEywIWh9vKUS5NUukOliLN
ixp3+kaO+iQvZl6aAGacur6+U3Lc3lXH93tUCSp4pj/pLznMifClvRDC3SmS
ChqRY/x6Qan0t2r4Zea0SswVsL6Tvvm6US1YwiMWyTsUaDSd6VeG1iNJcDk3
P1WBo0F6R+IFd2B4JXlMUKPAsRGRRbPtPdx4WxVtrVBgPCRt0PfOfbTsF6s5
JkrsHU2tz5p5AO4Kny2zVykhosTnp9waYZtlzy5gK8Fd2k9a729CQ9ytIGGk
ErXfebIdC0Sws/k0u5yvhEdX1IqxRw/hYdZUYVSiROy3qgVFBs1QZZnWRjxU
ojSqkYn2aYGdyRzt26+VMM/dEzgR04oDYS5qlg6FNW98RJxbjxFZbZagsKGQ
vmfqZma/GJ0xmSESFoU3nu/ziA9t8NV9SfHDKIz6fZ1huKkdT0bfLeemU1iC
2pmk1R3Qxqbq6DKNP6x240g64NYuyxU+oaDt1/3jvkOdOKDvurJDRSGn6SNl
lU4XhpwSTalFKnzYni7nXetClFfGqrj1Kpx+HeRQsv4pBl38j8j2qbDQXfL9
c/FTiCz8HRafVCGmON6Bz5XAe8+/FxtKVRj5+KRj5gcJLpzQr/AUq7CupPrP
eYXdqJpblBhAq1Diuf0n2doeHFy60X2tuRpmefx17c09CC899lYENYJnqU7Y
R/TiWmLrAa1INe4mNejJpnthEeLaLD+rhlq/xti4oA9LUl6EX65Xw3FnwCds
92d4YZ2nniNT43RZQNhw+zPkf/5AS9eIRuXilNVMbD9O9SiLh9xoTGQaexzU
GUBG1dbD7FAaX7ay2MTFASxL3HZpVwYNzqIbRKurFB0sYfjuWhrFsdEVZo+l
GDQme1te0hg+946oaJNCNBUZxh+i4XQ7cr53hxQ53PoZ1isatTQnNq5bw149
rCYZDXF8iHPLP1KE/DG9+d4wDTr1q+oEWgpqr/lQjVyzn+vcQFgQaLPc2ih4
T+OXulvkYSsC1k8joqKmaHT0O1oafEbgB+cQS4dpGoEW9sddlxOw9WvLL5+h
EVNk7XnWhUBg9b3Z5VoMcgSmIg8fAmy+QUK5LoOBtkymx5fAlm1XKrl6DKwU
C2yitxMg3Q2VK/QZlDkb/py3k4C9YWy6YC6DuzVzfFVBBEwmAm1uGjKY3ZcS
zw/R+E+ExTFGDLZMapVZHtT8y5LZrZzPoGvDjMG2MAKXPCU7KhcwMNuXuGEw
ggA/OJOKW8ggOHmSe5RL4O9G29+djRkUXTmabxRDoOfMRbZKw2/uM+LiOAL+
3S/0hSYM/gNzQoAS
            "]]},
          Annotation[#, "Charting`Private`Tag$115452#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0.5, 0, 0.5], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzWs0lAkAxnGjMkWFVSFd0CqEjTKbyEMpS8kSW7nUUY2SwlHKbYSkodoS
S+hMUsnaooiG7WJXgxhLQ2ZiXjVJLjXM7R0ka2c/POd/fp8ek4ORvnR1NTU1
L9X+L5UyT2/S3M25wVaUM4chRs6VJOX6JFPws2e1SFVODbt0RyvJDmmn+zT6
ksSI+yU7YZyxBZY+X/JqksVQcJccETN8sUMzSv9omhh2TEHQEOMg/Of5X+Je
FOM1vZY/wIhGbmWKd2GBGEVdFr99ZKTiOI3n+TNbjM0WVau/uWUjmZVRZDYp
BiVeNjFZdAOHe/85Z08bBZPTODL1qRhToS5DWdGj+EOYKNMQ3QMbTYWFj0dR
l7iV1Eq/j1bRPEOObBSV/rXMXU0PYfIoNoFNG8NS4oghH1XQrB3eR40fw3gp
657wcjW22RW17asdg+nTjC2lC9jonPZ3Kfx3DA160z2Sg3UIsz25ZHilBGcC
qafj7j/FxIfrtt+7SBA7wlnevOYFLFi6AWGHJBjfny7yeFqP8Hc6wwVpEuz7
cq7u2vRfSG9O6hwolYAj5eZMbWwA65ZGqIArQbhhj9j0wEv8YOjgVjoqAfuw
q5c1i4Pc9I977upJ4cI7vlbZ1Aj7xAvmsTQpIg/JtIs1m1HQtWE7M0iKe8cb
yBPur2AQ7TVrc6oUS6/vDZiIaEFKAu/Ok7tSbBh059ArWmFlJjmZxpUiY+9U
eVYPF40F0Zu0pVIMun7NJ2bacFnOa7JZLMOXXbsvzndux8yvmfRqJxmWgD2d
uL4DLaHtwuEQGTKG5BvpXR0wvchj5WbKQNn15lRw9GvYEJR1okoZcl8aSB7P
4cH9U+nNZoEMMzszRhl3eQjTKqlyVpfj/KdAq5JNnQgoZ67xsJBDx6nrWB+3
E9ojlMj33nJE3I6zYoZ3QbJat2ZZvBwjRinWWTNd2Ep1NxDeksOhpPqRVtEb
7DWL/+zbJkeJ686YAftu2G/iy7Yq5dDPZzq0N3fDyNih4tkKBYLUZcmWR/no
d34UpLFDgeeJz6gD3/jIyfMzfXJKAfncGl1dlgCPjZmOnsUKWPv4LfNyeouS
+i0/RrUrcL7ML3So/S1aC9bSPk8q8HBx6noysgeCRTEVIeYkJrJ0XULm9OJ5
TlXRKj8S21q2exF5vfA2eXmAfpYEfdHvRAtNCIZj/99/lpO4HXnigX6rEF0X
dO09e0kMXf1MPGgTQsfUT/07IQmbyrCFbh1CUJoX8t+qzFbQI6PeCNEYLM4N
6yPBjdtv++qdEN31e6IyRCQU57yr4xVCXBs1yWwZVP1ft31GLCeQ1nI10FdB
IrO2QnzSmECt4JCBEUmio8d6heYqAq42bGG/ygHLLc/SzAmc5g8kxIyTiCg2
db1iRyDZKXhR/lcSuff1OC7uBD5YTj8QqSnR25ZFdnsQMDtG7S+jKGE8pr36
xE4C3dfyVp5SV6LMdv6FfB8C4a88KzRmK/G8ZraHLJBAxMhsCyuqErMEqXHM
/QQMcrYXkCr/NKlWtiKEgE+cjt6LuUrwHKc1d4QSqFvpbOSrqYR+cIKj6CiB
7JjiMiMtJYKSJsPPhBPYve6q64DKxTfP3FgQQcC/gPq+fL4Sg/Uk93YUgcnp
uemxC5T4D3WFe0E=
            "]]},
          Annotation[#, "Charting`Private`Tag$116700#1"]& ]}, {}}, {{}, 
        GraphicsComplexBox[CompressedData["
1:eJzt2fk7Ve3XAHCSIeVBSRR6mpRERUWSJXGoVEo0ocnQYCYlPamkb6VBSQqV
KElCaUJsUiEyjxniEeJMe59zOIT69l7vPuv9I97jl3O59j773Pda676vz77X
rP0+W93GSUhIyEhJSPzPp/wZlV2HLn4gJFa5mXBbmLDpcvbsEk4RUd+YGhHL
Z8L1GBem9rYiov1qpXD5dBbUJ0q9DM9+T3S++qF0ypwFaukpJ79rvSc+tRc6
9O1lgVP2Rqu15woJx9W7oj/8w4L7H3gKiX0FRJ9aufnwTRZ0VcY0SGwuIMoU
zZzXpLHA9nWwGXGQIOZnNR1pr2JBbXlR5UnDfKJbPqUoWJINu7oU9pn8ekfs
Pd9TkLKYDZ3D23nCklzC/VR8SZcDGw4qJYa9isohNrPUUh+eYANXm6US4JJN
dNi+kJtyjw1Bq1ckL9F5S9xROfnUM5cNo/anjTj810T/jkXT7WvZEHb4c8nT
/FeE21SNdhaTDf8bj5eEZqDiN5WJHHr+WUR6o43c+aUcer4viNq2CO33Ozn0
/DIJ8rPXr4vnOPR8MggFxfC3lm859PjTCCIwjrGLzaHHm0oUCw9rq0zn0uNL
IeqluKEJFlx6PI+IQ8rOt3d7cunfTyI29OVdWX6DS/9eAuHAD/QqyeDSz48n
0i21F90vFT3vNuFu8svUpEX0/Shi2+WI0AhCdP9lIqxk0oSt1qLrYURMtqva
iZui+QYQo+cqpJ4rckCC/guaPjkn+QdbdB1iXPqNPTii/8Ogosy9xl0oytdl
+Gp/rfrTeNHzoiDzpWbGO1WOaHzw2v7guudzRPGJh7RlY85Tl4vimQA3H8we
lnAUfT8JZoewFzkGc0TxgazIcfd5l0XPS4FLJz0i3kZifCHNtqujJhLjD6kD
WxSz4zE/0LdPXTiSjfkDz96tOUQb5hcsqwa0AoSYf2ho3h44UZ4rqg/w62X8
7T1blK9XULtTXoIw54rqCwqM5eVXOIjy8Ra8QEL58zauqD4h5mTf1dC1XFH9
gnPenvorxlxRfUNXTuxFTStRvt7BFtUvOwPduaL1AcHvfnu5XuGK1g/4b4qZ
+j2XK1pfAP1swyUDonopgM7j8npLVUnR+oQv+hoyb+aTovULQ65qUvOWk6L1
DesHy/qXW5Ci9Q/vq7dB0TpStD8AdW2azq/1JB2PD9B2R/ei9RYSio/6XJef
+xEutQf5NzqTdHw+QvJlobbDQRLM98yT2LjzE1TpLrvy2Iek4/UJwhcJl8wJ
JSHbpsX72tViUOyV+lkYS9LxK4HYQkaYbA4JBgbX26qLSmDlLKWxjjqSjmcp
3Bo6+/gkk4SnM6xtVYZLocljF4M3RtLx/Qxn/U/X2ChQMFd6LMdRvwzqzB/w
wrQoOt5lEPODISVnSMFdzgudOwfKYX7Q76WFlhQd/3KYPGXaZJvNFKg2Hbzd
cvsL5C+NH1xiT9H5qAAF3QUa93dScK1QS1arogIO9MxM9fWj6PxUQg9Tyzf3
FgXnHPpNMiWrwLe4f7HlS4rOVxWY7I7rrSmiYM16K/8t8VUwGLDDv6iSovNX
BTcqSzmNXykYM0t4wltRDefPh0vf7KTofFaDnm+Oz8t+CnIMRzqiqquhfEwm
IU2GR+e3BiK/Xzm33pgHQQsc1ZZ71kDhBafEDUd4dL5rQCt3uGZLBA8MNZ9v
bpCphYMvJjhJxPLo/NdCit8m3+FEHpDKk/5z7EEtHH+TuGZ5Co+uh1o4pC6h
pf+UB2kyHvlqpnUw+4hRuGs2j66POviHWbY3s54Hh0YKB7Ib6mCdd+hS00Ee
XS/1oJJ15KfLND7MIzX0dvvVwwnPyyfPmPDp+qkH3YDFe3/b8+Hf78dcRyc2
wHUfpWB5Nz5dTw1QGnhTpucEH+4118TdTW6A3fYPxzPu8On6aoBIJdU9p1/z
YXeFXq3ZmkaIO7Dqr9U1fLreGiH2VW+NE4cP04ouyHe0NEKN38edq6UEdP01
gf3RgiMrlAVQ96ZrzZmgJqgvbrOs0RHQ9dgEZhXbGvztBBCZZhY8W7kZ+iaG
pL88LKDrsxmm53kV+HoJYOODO5lFT5tB64XsUOtBAV2vzSAYDo855SmACbcE
va6Mr7A/z2P29xABXb9fgUV+UE+OE8CnS5tnynR+BddDeyxXEAK6nlsg3eVV
yZEvAggLTXV8HNICM6Wta7ifBHR9t4By7O1gr2IBQKD0VRvVVijhVsTkMgV0
vbdCwrS2+Cd6A6L1TOzx/LC35AgHPXDR32hN/HUOeiDm4Q0GL5qDHmjzb8xc
FsVBD/hnvevMecJBD6hF1THksjjoAbWMN5eS/+znIg9sORdBPFnMQQ84p6/t
2M7goAec5ApGlPM46IG4n+EP1i3C/ZJ46nItT8EN91PC5cbe8Z/O435LZHyr
0jF5hPsxERbdfJORj/s1kfafoqm6dbifE3+tfdXVycb9ngC/BoWI8SR6wJBJ
um+QJ9EDZm3Tfk2UIdED3XvrlKPVSfTA1nzLSDcXEj1w6rNH05sHJHogwvH3
Xd8MEj3w750TU9OTSPSAYbbcvJYnJHrASM08VyuPRA/8GM319PxMogfcbp+d
V1pKogeSXmc9epFJogfI3MITXV4kemDjYZ/QHfIkesBp9Hc014eLHrDVyIi+
aslFD/j6HVU94I3XQVCsKl0ehZ6AlgXqFl3P0RuQlK56pXsYPQIHbdWnG87E
8YFbzGMnU10cP1RQ+n9F2eP8oEN+g0FpLs4ffrf3eGzXo9ADX9VMDJsPUOiB
SZc37lzoTKEHBHNWBcxgUOiBv6YVPQ2yotADS+dywtpsKfRAoFtOzDhjCj0w
1GGk7SpDoQfmjdssuWGERA+8STnsMGBEoQdCrVr1jUMp9MC86s1Py8Ip9EDM
RLm8VBsKPfCswSAvhSTRAzsSK+0iskn0wLc1+WvUK0n0wIhLyHJ3PQo9kKKl
rzbvLIUeaPps9j4skUIPTPo0zq41k0IPRKR4+6/Mp9ADpkI759AsCj2g5afd
W1ZKoQcOBRcWcNV56IELenO/6e/hoQc0Zz332n+Qhx6oXTR+NG4/Dz0QTd2c
FruLhx6IsbdkSevz0AO/g7ZEfONS6AEvyffOrgIKPcDYrcgotOahBz7qPDqV
cJWHHghQUjBgXuehB1SDCrtibvHQA2blxiu8W3joAY0vg9cPG/LRA1s71ztn
7+WjB05pp0hDIB898Gb4ivyjS3z0QIrG+/bBK3z0wOzgf8xtHfnogY/dFnVG
k/joAf6q7rEGFT56QH2dxIy6MD56oHjqUar9Fx89MLvi3rsl1gL0wOHTM85U
HBCgByLsSLl0RwF6IDJ3m8RmFQF6YOT1gOrNaj56wOGoKn9CHx89QBTeWtO4
XYAesB1z7Ur+IEAPhI6MWs2SHUAPjLeqTTi/ZAA9MGCxL4O7bAA90OsUHPd6
WIAe2BUz4JOeJUAP1Bk8KKZKBOgBk4B/D48aDaAH9Bc/Fpg+HEAPrCw4rTvl
xwB6YIpBbE6m1iB6wCzdorPabhA94DRXSa83YBA9oPjNxeLOtUH0QFLl+ntb
8wbRA7ea/4mOlBSiB3T79c+MGAj/zwNmyuFepkL0gLqN4mOSIUQPhLtaz1cM
EqIH7lwVfHBKEqIHZpzzPGt1R4geCFEbd7JqjxA9MOP4V99AKyF6QPfi6fxH
TkL0wPmru+14PkL0gOd2v9imW0L0QNF9d4W08UPoAZ2YsdyNx4bQA45z9A33
PhpCD+yr5tXbpgyhB3T0XQY7s4bQA463z4TFkkPogWyWpuLAnmH0QMIEGRVV
2z70wKzVWg23HfrQA3ODJz0JvteHHugeGvYtZvehBzTli0unqfWjB270fus6
bdOPHsg92zG4IbMfPbA2jvzZtICJHuC/8RK67maiB7wUIiM6rZjogbmTrTtk
DZnoAa17T2qzGUz0gDmjenOYNxM9oJQT1cu8xUQPZEZpvb/xlokemL8wWiuk
hokeeNd7tknYx0QP5Ev7J05RYKEHhE0ZFkc3sdADepI/7Dwfs9ADqnUGzX31
LPTAsQen7fKzWOiBs9s8Wi1jWOiBEItGJes/94s80F37o+77ajZ6wDszpUci
nI0eWJg48lAvlY0eaGX5Sb79zEYPRO+wVkj7zUYPnJWN1ld0wPdzoiwhaoJd
Egc94PnOZAo/mIMeqAkqjR2fje//xFM226/2Kws9cLIo3bl/Pws9YDKQ5zlu
HQs9UOT9cn+/KQs9oDwsq5qiyEIPXK+SWziFy0QPPDh+prmPZKIH8sLj748v
YqIHDutlXPFZxkQP2BgrXBqL6UcPPOdGNhps7UcP/OwwdNXw6EcP+Gyxa/GO
7kcPrMzTLD6X3o8e8Alx7DH92o8e4EottTqxgYkeiG0PoTT/ZaIH9mUo95zW
ZKEHAv95G03VYf1A6gKnRIUwrC8wqgzMq7uH9QdpHuRjMzUWeqBug1fSs0cs
9MDEFX9PkP7FQg9M4L29JsdioQfSvJNsNPzx/Awerkp6ekoVz9dguezz5AID
PH8DV5uG4scX8HwOfG7YVm5pxfM7yC+vcG4zYqMHEp+rmI2as9EDjj1pOkN1
LPTAIFMeMg6y0AOXxkZKDHez0ANlCsmLekJZ6IGxW89jdd6z0ANeEQ5FNlZs
9ACjUE/rWzsbPWCUsUPuwxQOeuBlN7k7vIWNHmh5UaXY9qfeRR4YO6Ad+ezP
+4TIA7qDFxren+agB3plhtJY5hz0wJfFKtqbKtjogRRzruLdt2z0wB6HMsnE
LjZ6YFF354ucMTZ64NfkpksGszjogay6ozt1EzjogWcd00smbeKiB5JnvUpT
ieeiB9w1Qy5Z2XPRA8t4Ba1baznogYSqxfP6/4xf5AGpyoXFvsc46AHDu4wn
Uvkc9IAw0XPqC2cuesBZJ7SkTopED5ifF9punkuiBw7IhhfnqZHogZUq2/aR
yiR64N2JwT1nFUn0wJeZ5tNOSJHoAaeEVUul/twv8oDc5PLeLEcSPXA8Tr78
WSKJHvBN+mLR+IREDxQceOXoGkCiB9yebfdeZUOiB7iPHEtTGSR6oDP5lNlW
RxI9oGqs8W3RdhI98ClH6aOeI4keCJf//NnAnUQPqDSOHV55lEQPRFinL/A9
QqIH5Nus4075keiBO4vy/7ZNINEDl+NCJl0iSPTAzPMrM53TSPTAZMniD9aZ
JHpgv9rqhQmyFHpg+29+x+2jFHpAfZykklc0hR6Y3HJ1qcqf6yIP7HfLbJc/
RKEHts9xSeXupdADUy3maCcYUOiBhFWF5VqyFHpAOtbU5dgAiR5oNY6ruNFN
ogeGpGtHh76S6AFja4201h4SPXDeIn6hC77viPsF4n6BuF8g7heI+wXifoG4
XyDuF4j7BeJ+gbhfIO4XiPsF4n6BuF8g7heI+wXifoG4XyDuF4j7BeJ+gbhf
8P+5X/BfoQUWWA==
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0vOfEAYAxuG7y7axbNtLa9m2XZeNdbfcatm22zK2zC1u2bbtns+nH573
/Qe+KZsHV+8cFBAQEEiQCUNYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIRnwQk
JBGJSUJSkpGcH0hBSlKRmjSkJR3pyUBGMpGZLGQlG9nJQU5ykZs85CUf+SlA
QQpRmCIUpRg/UpwSlKQUpfmJMvxMWcpRngpUpBKVqUJVqlGdGtSkFrWpQ13q
UZ8GNKQRjWlCU5rRnBa0pBWtaUNb2tGeDnSkE50Jpgtd6UZ3etCTXvSmD33p
R38GMJBBDOYXhhBCaOD3DgIDv0fx1X3hM5/4yAfe8463vOE1r3jJC57zjKc8
4TGPeMgD7nOPu9zhNre4yQ2uc42rXOEyl7jIBc5zjrOc4TT/8x+nOMkJjnOM
o/zLPxzhMIc4yAH2s4+97GE3u9jJ3/zFDrazja1sYTOb2MgG1vMnf7COtaxh
NatYyQqWs4ylLGExi1jIAuYzj7nMYTazmMkMpjONqUxhMpOYyATG8zvjGMtv
jGE0oxjJCIYzjKH8SighfANDgILC
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            CapForm["Butt"], 
            LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
             17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 
             33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 
             49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 
             65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 
             81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 
             97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 
             110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 
             123, 124, 125, 126, 127, 128, 129}]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwN0ncilwEAANDv5yau5AgOoDOYGVmJsiJ7haKQlZW99967MrJDvT/eDV54
5IuIqFAQBNHEEEsc8STwkkSSSCaFV6SSRjoZZPKaLN6QTQ5veUcueeRTQCHv
KaKYD5RQShnlVFBJFdXUUEsdH6mngUY+8ZkmmvnCV1popY1vtNNBJ110850e
eumjnwF+MMgQw4wwyhjjTDDJFNPMMMsc8yywyBLLrLDKGutssMkW2+ywyx77
HHDIEceccMpPfvGbM8654JI/XHHNDbfccc8Df3nkiWf+EQgQIoz/0opg+g==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0dVSFAAAQNF1AElJUbpLBATp7u4lVBCQBenuzh/n8HBm7vvNDx0GDz4E
AoFnwkQ4EXwkkiiiiSGWOD4RTwKJJJFMCp9J5QtfSSOdDDLJIpsccskjnwIK
KaKYEkop4xvlfKeCSqr4QTU1/KSWOuppoJEmmmmhlTba6aCTLrrpoZc++hlg
kCGGGWGUMcaZYJIppgkywyxzzPOL3/xhgUX+ssQyK/xjlRBrrPOfDTbZYpsd
dtljn/dphxxxzAmnnHHOBZdccc0Nt9xxzwOPPPHMC6+8AWo8JHk=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
            CapForm["Butt"]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{}, {}, 
         TagBox[
          {RGBColor[1, 0.5, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVy2s0lAkAxnGXRFRIUjLKtLXksiFF0oNcVku2e5GEpjAyLUojo6im0ap2
UiObVWlrSroqhzalw4z7Gncxb1YnsZgx874UIjv74Tn/8/vwWISztjI01NTU
AlT7v9rqs4zGLb02dPyukanFkeHKpZTPjil0uM6r1zujclpUxp96KQ4wrd54
USNFBvbOzBNfOJ4IGREXTqs8UrfgkIyzFTWBHqkTp2Rw4HXs7eeEY61EvoI8
I0Mjo6S9lxOHXoNNOf9myHCzxerqR04aKgOVZuM5MrhZFa6Y9MrEsv0t0fvL
ZFBPIsfGb+ZAZii4uPyDDDyReODrpzyUNZAzBjXleCBNJmf2CHFnUHPVJis5
XiZvHNXjFiCAK1ja5S/Hsx0lvM2VT6Ae5+S0PEEOU+LQonYUotmyuirxuhxf
7uUKpRdeoKzG2kZSJgf9VbrnvTnFmP+Pdb32gBzlRlOdivCXWBiq3WpnOIzE
YO1j7IJXYBbGp9o7D+P4gIhW9f0bXLsR7uQcMYwv+7g9fq/K4FdqvEgrYxh7
hk6/vDz1FgsXh18ZKR6GSFl35atzOdTKy3OqeofBXNQpo4dWgO7m02mmo0Dx
AY8A21wRhM0ia/YSBdybYqw/V4rxbV0pL9tJAVYEqZ+nWwV1gb90KEABYUz5
6GHfapjxNxlYHVTA9NruoLHYGnB36rgZcxRY3ecrYjyuhXfZ9FsfgQLpu78+
4nfWQdwzi2b+SIE+j4lsYroe1pRYVi1SYGjztl9nb2jAyEmb+fXdCixA8VSy
owSWko0mEWOqfz/lzGiRYMFy3cBQIyXUN7cmhMQ1IndtX8dqOyUEFQsVz7Wa
kBFbanreV4lp/3Q5504TaI3NXbsilDj7Kdjm7rpmMC6Ic69zlDBY3xL9vq4Z
9+dJN9zJUiL2NtuGx2zBvKxL9i7PlRhYnGrLn26Bp1n10KoGJVzuvniqd7MV
O+yyHrwdUuKuh//RXqc20IMqbxTokDDJ5rk0VLVhIiHs447vSOzVIE+tjGxH
t3EnLd+TxOvkUu3eyXbMjdLn+oSSoHSKDA1zO+DM9CzMSSFhu2W7WcD6d2Az
L/OL/iBxNn/7wf6Gd5j82W/7zL9IPDFOcxxldULbVehO7yIxxjd0D9PqQsc7
SV30OAnvGp8AIqsLr/0NEw6YUGDMv0/UrJFCzK/wXe9M4Tbr8EOTWikmw9oX
/7CLQv9vg8TDeimU5i6fS1S2exY110sihS0tqs1rN4XiEQbrSKsUmrWO94L2
UKhj77Ov7paCjIznc4MpjJwOfJE0IkX60ayk7lAK3tfsSwkagcFlgcKrkRTO
lzyWxS8l8CmS5WoRRUHSaWuuu4zAM7+Q1gKVg2grT66xJJBZecu0IppCbB7d
45IDAZZB/QAZQ0FQYCRy9yVACIS3tvxCoaueP9rmR0D2d+5lQuWlw/orDvsT
UHhEpEfFUci3n30uewsB7zfbeKnxFF4XzfAjgwmkhTfVPj1KQbMjjc3bR+Bp
qcOg2zEKP46r5ZuHEWhcst+gRuUm1yndnw4SsH9vEfMhkYJJyAnXnkgC32yK
8mKPU9ibMs5MZBJoP2TSPaFy3o3EnDmxBIbOeVucY1PoKxutu32EQBjXPcoo
icJ/Dt15Yw==
            "]]},
          Annotation[#, "Charting`Private`Tag$311938#1"]& ]}, {}}, {{{}, {}, 
         TagBox[
          {RGBColor[0, 1, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVz3k41HkAx3EqJZX0DCmbnla7CUOJovPjqCRH51oiSZES2iLEzDprbEtJ
1PRYK4oaLIUcUcpMOaZ1HzG/5ClnZsz1jalo7R+f5/28/vz86B100GeWkpKS
08z+7zzl+TTF2p07dDJLb6owhLh5jfnZjKkH4h7eODTjmNN/3lvA3ICw3U9V
G5hChLukREwwbHDFrTItKUoIOX/pKSHjILguHKVlcUJsYHV7DDO84fUgbCH9
qhAtPhVdA4zzKCmZq+LGFiKz3SD1IyMGlXb5sa9KhdhuULzm284UKFRJca1M
COVL0klFZjryvD7N1jIRgcV7Nfp1MAvxugrCOSVCniBSOrc/F0ZGH5zYOSJU
RtqSBZfz0Tb9fpTbL8LjXypYzq+LMKjLXeGlNw4d6tTyLhSjYm/qGQfvcUw8
yMgVJJaiZbeVukfGOPSqEmweLCpHWNlt2pe+cdTSpnrE3pWwKHB83K0uRqj7
vIvh+VW4Esc4tt9YjLBRnm6d/nP0DO9P+stZjAnPy/32VTV4HzJ46FOAGG5j
sZU3pl5AfXZhk851MXgS/s2vlrVwLuG4jD0Sw395j1DvGBf+O7rbHrWIUX7S
2sk4g4fJTIMnfnIxrFrPGn1+/Qqc/RvNF2lJEHRCujhLrQ6p6x3qCy0lyD1b
SwLs6uGXxLaVuEugc9v1yGRgA/L8tLbQGBKYD9nxfAobsWU1+5btXQkSXL/+
k9zDB6Wh0eVUK8GQ9Rc29f0Nair21o18lGDM+dDVhTuaEK1Gd703X4qlKJ+K
NGvG1HRWshFdioRhmaVPezOkLXd47w5IoezcEXz0fAvqmCFWhqFSpHGXiUtU
WjFdNJZofkeK744JIsb9VjQOv5iOqJEiftCdnrOlDVOrbBwiPkqhsa39zDt+
G7y7/pXMUZUhMDuczvJvB3ttab3ARIbRH6KNk7+34/nInUTPQzJszil9tCCz
A7ZMr2vbImTIsXYMGdjYCeWz622qM2XQZrM2N9V1QrP62QkuTwaPWdIoQ78u
sJxfRmwWyfAssnrewLcuhJu58G005ZCpPlmyJKMbK7mKvLrtchgfOLzCadtb
hHJe6gt85YjnHPYdbnqLmimNsuBEOYq0YsxIUA/oMd4p6WVyTCYvsTqu0ovO
waYP1n1y7GrY7UTd6sWeWcU3fOYS+Gg+pBo2CbDUxMLEyJQgOyigQLtRgA5L
xbSnG8Hw9U9UwRsBXnwmP9OOEJg8Pq2+s1kAfe3Ug69nXC73CTrXIcCJn55W
rfMg4Id7mtb3CTAp47QrHSOQx+4rvSQXoCh+O+3eSYJdt02rKV0KQbf28UVB
BH9UFAovrKKQdH84N/scQXOP8Uq11RTWWRkkuP5GcETX8PdNaylcrLnr8fI8
QWCWnvW1DRRGLgTbpYUQpOXTeFZ2FPr7uHREEPS+SSad9hQCdEe95TNeNb54
TYAjBcKoyHgYScAxXXiFfYBCrdOv+ppMgmdP5thL3Slwi1IiR6IIZnfHhLM8
KZQlqb/PiCbYo1DirDxOwbbX3P5wDEHr1ik1B18K833j6M9jCbSPRmzt96Ng
MVGQExxH4MFU+If6UxhIj11jGE+Q9Xdo+qLAmX9RKvl9Mx6qIfzscxQKG80s
Ui8T/Af0todK
            "]]},
          Annotation[#, "Charting`Private`Tag$302398#1"]& ]}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0.9215114480739652},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.85, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.95, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.05, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.15, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.65, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.75, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.42, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.44, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.46, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.48, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->{{37., 5.}, {22.00000000000003, 4.000000000000128}},
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}], {576., -116.80842387373012}, 
     ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}]}, {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[600], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.8510558722791877`*^9, 3.8510558839502335`*^9}, 
   3.851058062551507*^9, 3.851058913590639*^9, {3.851330085988905*^9, 
   3.85133010923724*^9}, 3.8513415068252378`*^9, 3.851341897196062*^9, 
   3.851342269025888*^9, 3.8513424779823065`*^9, 3.851342553235388*^9, 
   3.8513426167481365`*^9, 3.851342768806308*^9, 3.851575684130927*^9, 
   3.8515849506964283`*^9, 3.8515850499917965`*^9, 3.8515855028995247`*^9, {
   3.8515855754257545`*^9, 3.8515856354139233`*^9}, 3.8515856926828194`*^9, 
   3.8515864932117014`*^9, {3.85158663095928*^9, 3.851586643271215*^9}, 
   3.851586862071417*^9, 3.8515869549280915`*^9, {3.8515870008427415`*^9, 
   3.851587017845268*^9}, 3.8524570275355773`*^9, 3.852962505741949*^9, 
   3.852970927138775*^9, 3.852971023955714*^9, 3.8529710849652843`*^9, {
   3.8529715079830832`*^9, 3.8529715193478117`*^9}, 3.8529717790186796`*^9, {
   3.852971938053161*^9, 3.8529719473996706`*^9}, 3.8529720006457586`*^9, {
   3.8529720329032702`*^9, 3.8529720997995844`*^9}, 3.8529721845151157`*^9, 
   3.8529723049304485`*^9, 3.852972402155675*^9, 3.8529724771677885`*^9, 
   3.8529726131811547`*^9, 3.8529726897757416`*^9, {3.8529727563219223`*^9, 
   3.8529727845741196`*^9}, 3.852973151314173*^9, 3.8529732783244963`*^9, 
   3.852973347628791*^9, 3.8533042105237184`*^9, 3.853305371288211*^9, {
   3.8533055835916767`*^9, 3.853305621872224*^9}, {3.853305669694626*^9, 
   3.8533057342676783`*^9}, 3.8533061363791513`*^9, {3.853306182617694*^9, 
   3.853306190456072*^9}, 3.8535855576844482`*^9, 3.8554770978508615`*^9, 
   3.8554802714103203`*^9, 3.855645860673297*^9, {3.855645917978985*^9, 
   3.8556459545631533`*^9}, {3.855645992532096*^9, 3.855646000690302*^9}, 
   3.8556460319537582`*^9},
 CellLabel->
  "Out[365]=",ExpressionUUID->"a82394cd-1385-4788-be80-35af26a85aa4"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"\[Delta]plotStoredLen", "[", " ", 
  RowBox[{
  "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Epsilon]", 
   ",", 
   RowBox[{"{", 
    RowBox[{"Orange", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Show", "[", 
   RowBox[{"plotStoredLen", "[", " ", 
    RowBox[{
    "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Epsilon]",
      ",", 
     RowBox[{"{", 
      RowBox[{"Dashed", ",", "Orange"}], "}"}]}], "]"}], "]"}], 
  " "}], "\[IndentingNewLine]", 
 RowBox[{"\[Delta]plotStoredWid", "[", " ", 
  RowBox[{
  "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Epsilon]", 
   ",", 
   RowBox[{"{", 
    RowBox[{"Orange", ",", "Dashed", ",", "Thick"}], "}"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.831796238546591*^9, 3.8317962804162827`*^9}, {
   3.831796377524206*^9, 3.831796379670414*^9}, {3.831904034461627*^9, 
   3.8319040401857185`*^9}, 3.831969412079014*^9, 3.847871560380559*^9, {
   3.852972144962739*^9, 3.8529721512482758`*^9}, {3.8529723240103235`*^9, 
   3.852972340096059*^9}, {3.8529732246713696`*^9, 3.8529732383588605`*^9}},
 CellLabel->
  "In[1482]:=",ExpressionUUID->"8bbabab4-acf7-4f1f-a836-dadb8682f893"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
      Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkchpXu2lxD1hKlIpfIdamfo1LpojhdTKF2U4yGoeOQy3baxWxq
mDomCWW3GW1OW9E0JtGPzBhz+WoGg2G+LnKt1qKUxqWd/eM97x/v+zx2PyWG
xczV09Pbo8v/nbn6QbH/7CVInEq51GbBQy3N++SHbUyIHOwYC7TmYVpNnUcZ
kwns88LF91byMCVEIpu1zgf55EtPhiMPE+i9M43+BRA+bpTm5c/DDVFL3Dl1
LBAbx1Wfj+KhfWUA20l7BaijDFc1h4cLg/6I9EkpgkytNCV3wyMsixEGr75a
Dosc2eZdFD56r8/jb7XlwlPJBHskvgZ5B/j7bly+A9Fi3+8fJAtw8G5S7ZkT
94CDBxV78h4j89dvWfTkKshAqnN4Xi3qiZgL+nsfQmp3jFfB9Sc44Be6+vN2
PmyxPxz4sLwOd93/6tL2mwACnZLvNrPq0eBJvO3Iv7VQt+5gUAzrKYaIm6fb
PerhTfeEQV064vT8A4mHqQgzk7H8YNcGzKap+pYON4C7fZT0dkUDhnR9YoQv
egYO3604vGR5I25aNmnzGJqgZsIRb+U1IpUs1KMlCUHPo6DReLoRO5zXdOXm
i0BNz31vdeIZ0reX3MKmZphmqn62aHuGO3vnxUT1iYHtaF0869uE+3aEWVn/
IAGvqniXcm4Tsrb7Wa3bJ4VtbltKc5YJ0UhsZnQ9QQYXtprSexKEWG/c/tWJ
K4dLsbSaKpUQKzUMtZ2YgMiWjNBNniJUBKr0T719DhnnBdVXC0Ro4qt/ud9A
AecqXFP9x0SoMTQvkZYo4PfS0LgFu5oxgLCyRR8lRPx1wXi0shn9Dp1u6VYo
wWbTi/6ahWI8aCc4fSe6FWxF62MNI8W4WDmRx9C2wkJzdvohgRg1DS4cy4tt
oPVaYxGztAV3Z1X3KizbIftH78j6yBYMt3UsuVbdDoO8omINrwXPzrm+1zRI
BZ8LK8Ot5kvQWzKdUUaqIGJOdtYURYKmyghOd0IHbDajUZ0qJcjk6o9vnumA
L5L9Ta8/S7As+ubj6qJOmJEnMc13SpGI8MpUr+2CkeLQ2MFCKRb61QsMhV0w
HDZMWTEgxS/9l61okWqYy306RnrKML31WGrWBzUYVDWSOVkyLOTY7S1jdIND
fbB/okyGz/kaW7plDwwa55geN5Ujh91nTq3ogYTxnrduEXI0prxknAnUwPL8
Ke4qjhxvRLV+dFNoYKC9SH50WI5KR9+mqlYNjOnnUFjv5DhvouzKRpUGSpVL
e5rey5F6Mc7dp1sDa1Z+fOg0IkcfgV7i5j4N7KeFiL6My1Fh7PZu96QGzvT+
eapgWo76oouv41aSYGfwic8zJNCbNXb/vT0Jbyg5JQNGBFKPHDpHcyChV38o
2dKEQMWYvU2SEwla33XaDDMCS21qj6R5kvDCREgNWqHj04Y6cneQkH5zSCW3
JzBuy96KRbtIsMejQzOrdP9lvJS8PSRQ2PX/uDoQOJd7ziw/jIS2gN1K1loC
XyjNw9hHSfA4QkyFO+v2skw7i2gSqkw6udkuOn9s7+i14yTEufUEPXLV+Wb/
Lig9SYI6UX3A3F3HS0yjbeJICPjWIQv20PHss67l8SQ4y1SeqRsJ9Dr2asYu
gYRfLnSybnsSGLt+G3GLTsLiUfJVpxeB/wEBjI5s
       "]]},
     Annotation[#, "Charting`Private`Tag$310686#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.014156776511059444`, -0.2282056658840477},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
     Automatic, {{-0.225, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.175, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.125, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.075, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.245, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.235, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.23, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.215, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.21, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.205, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.195, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.19, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.185, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.17, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.165, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.155, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.145, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.135, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.13, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.115, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.11, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.105, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.095, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.085, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.065, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.055, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{267.26890756302566`, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0.014156776511059444`, 
   0.46}, {-0.2282056658840477, -0.07848856143207937}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.831969413678219*^9, 3.8319694205120993`*^9}, {
   3.8478715422781897`*^9, 3.847871563167247*^9}, 3.851055820344549*^9, 
   3.8529718924062185`*^9, 3.8529719520289955`*^9, 3.852972005140253*^9, {
   3.852972037065936*^9, 3.8529720825240107`*^9}, {3.852972124300188*^9, 
   3.8529721519649067`*^9}, 3.852972189504061*^9, 3.8529723432595215`*^9, 
   3.8529731614399843`*^9, {3.852973229371439*^9, 3.852973238811805*^9}},
 CellLabel->
  "Out[1482]=",ExpressionUUID->"aa1950f9-4bbd-4080-a99a-817efc8d7798"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[1, 0.5, 0], Thickness[0.007], Opacity[1.], 
      Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVy2s0lAkAxnGXRFRIUjLKtLXksiFF0oNcVku2e5GEpjAyLUojo6im0ap2
UiObVWlrSroqhzalw4z7Gncxb1YnsZgx874UIjv74Tn/8/vwWISztjI01NTU
AlT7v9rqs4zGLb02dPyukanFkeHKpZTPjil0uM6r1zujclpUxp96KQ4wrd54
USNFBvbOzBNfOJ4IGREXTqs8UrfgkIyzFTWBHqkTp2Rw4HXs7eeEY61EvoI8
I0Mjo6S9lxOHXoNNOf9myHCzxerqR04aKgOVZuM5MrhZFa6Y9MrEsv0t0fvL
ZFBPIsfGb+ZAZii4uPyDDDyReODrpzyUNZAzBjXleCBNJmf2CHFnUHPVJis5
XiZvHNXjFiCAK1ja5S/Hsx0lvM2VT6Ae5+S0PEEOU+LQonYUotmyuirxuhxf
7uUKpRdeoKzG2kZSJgf9VbrnvTnFmP+Pdb32gBzlRlOdivCXWBiq3WpnOIzE
YO1j7IJXYBbGp9o7D+P4gIhW9f0bXLsR7uQcMYwv+7g9fq/K4FdqvEgrYxh7
hk6/vDz1FgsXh18ZKR6GSFl35atzOdTKy3OqeofBXNQpo4dWgO7m02mmo0Dx
AY8A21wRhM0ia/YSBdybYqw/V4rxbV0pL9tJAVYEqZ+nWwV1gb90KEABYUz5
6GHfapjxNxlYHVTA9NruoLHYGnB36rgZcxRY3ecrYjyuhXfZ9FsfgQLpu78+
4nfWQdwzi2b+SIE+j4lsYroe1pRYVi1SYGjztl9nb2jAyEmb+fXdCixA8VSy
owSWko0mEWOqfz/lzGiRYMFy3cBQIyXUN7cmhMQ1IndtX8dqOyUEFQsVz7Wa
kBFbanreV4lp/3Q5504TaI3NXbsilDj7Kdjm7rpmMC6Ic69zlDBY3xL9vq4Z
9+dJN9zJUiL2NtuGx2zBvKxL9i7PlRhYnGrLn26Bp1n10KoGJVzuvniqd7MV
O+yyHrwdUuKuh//RXqc20IMqbxTokDDJ5rk0VLVhIiHs447vSOzVIE+tjGxH
t3EnLd+TxOvkUu3eyXbMjdLn+oSSoHSKDA1zO+DM9CzMSSFhu2W7WcD6d2Az
L/OL/iBxNn/7wf6Gd5j82W/7zL9IPDFOcxxldULbVehO7yIxxjd0D9PqQsc7
SV30OAnvGp8AIqsLr/0NEw6YUGDMv0/UrJFCzK/wXe9M4Tbr8EOTWikmw9oX
/7CLQv9vg8TDeimU5i6fS1S2exY110sihS0tqs1rN4XiEQbrSKsUmrWO94L2
UKhj77Ov7paCjIznc4MpjJwOfJE0IkX60ayk7lAK3tfsSwkagcFlgcKrkRTO
lzyWxS8l8CmS5WoRRUHSaWuuu4zAM7+Q1gKVg2grT66xJJBZecu0IppCbB7d
45IDAZZB/QAZQ0FQYCRy9yVACIS3tvxCoaueP9rmR0D2d+5lQuWlw/orDvsT
UHhEpEfFUci3n30uewsB7zfbeKnxFF4XzfAjgwmkhTfVPj1KQbMjjc3bR+Bp
qcOg2zEKP46r5ZuHEWhcst+gRuUm1yndnw4SsH9vEfMhkYJJyAnXnkgC32yK
8mKPU9ibMs5MZBJoP2TSPaFy3o3EnDmxBIbOeVucY1PoKxutu32EQBjXPcoo
icJ/Dt15Yw==
       "]]},
     Annotation[#, "Charting`Private`Tag$311938#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0.9215114470760808},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.91, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.92, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.93, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.94, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.96, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.97, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.98, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.99, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.11, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.13, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.17, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.19, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.21, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.23, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{267.26890756302566`, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 0.46}, {0.9215114470760808, 1.2173036681564542`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.831969413678219*^9, 3.8319694205120993`*^9}, {
   3.8478715422781897`*^9, 3.847871563167247*^9}, 3.851055820344549*^9, 
   3.8529718924062185`*^9, 3.8529719520289955`*^9, 3.852972005140253*^9, {
   3.852972037065936*^9, 3.8529720825240107`*^9}, {3.852972124300188*^9, 
   3.8529721519649067`*^9}, 3.852972189504061*^9, 3.8529723432595215`*^9, 
   3.8529731614399843`*^9, {3.852973229371439*^9, 3.852973238997579*^9}},
 CellLabel->
  "Out[1483]=",ExpressionUUID->"38e65ef2-622d-4d56-b368-7f4679976e45"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
      Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxgdZlS7IWmtjGke1udRmQ4N6226sW2JDK6RDRbmVa42KXTmZ
vjFkwjCuQ4kmJMntrS2NSaNxzeX7bDtGN6q1m6LQzv7xnue853l+P8ahCI9g
VRqN5qq8/5NlUp1rN38R2Bt6euNTRPgpzPrwxC4ChhM1jDWSRRh/u9lSQBDQ
bs4W886IMMZJ0jG/kgNPXsvt6uJEGB4pn7tnlw4XX/RIpkJE+IP/4o3CZi5I
RptOsd1EaHzNnmf6KRPOFDInafoi1Nhe7GcTkw32k2+qtauuoyD4wW6Ty0VA
7IFBK3EVWpul1e+klwE/ULe79WMl1u2rdy/IqIBYs9FOdctKfFEV1XgySATT
hXrPbwVeQyL5S2LkiRqgzfi5vhFWIK2N+GpMfhPUBqbPO41cxefMPSYfHOph
2U8n7FYxrqLzjRmLnt8aIDNWntMacwU1m47R375rhBk3Y5/d98rRSfxwttey
Baya9rTVGJbjrPq+CJ9QhGqDpLJHSWX4e1ifYsmru2D7gXzHooToNPA+1XPh
H5CSu6k911GIW5ZNG92B+yCdX3turLIUQ6ksWljUA9hO35hcoVeK/eZrBs5z
2uBxysqChPQSjHTIK8X7DyE6g1Wko1KCP8sXBPsrxCDNvblN9Vwxujt6GKw0
lICmyEVgP12EXAemwffuj8CuZMulydgi1BLravHDO6C2aNz3sUoRtmj3zpiW
PYbNSaoT40sK8RqZOsgQS8GLZhrhblGAsm19akdGO8HRZZ26lY8AdTarZYxp
ysBCz8y5Ii4fyeV6eY/yZHDPNZNuXpWH9lIDOtp0gdDpjd/ifj4yvY+3D8m6
YJT/9azhYj56MRqOVwR0g4aJ6Wf/vbm4qGsqLfVTNxDlPiNSTg6Sdy2E+uwe
cFmtnxg9ko0uibVymX4vzK6eqwq0zkZP+rq8nNpeKIwbZtmmXMYEFb7biu19
YDtZ7HVLwUNryexpAdUH/NM7nrbY8XBF137hUHg/2DBsJdySLCTK1P7ZOtcP
tw2z1/O0slAQUHinNvsp1D37EtQRewml+61Yg2sHYE3z2Klj45mYxWxpWP5g
AN7JDknFPpn4cSzDIMxvEHTKDxwxlmbgqe6DcYkTg5CwaqGDwC0Ds4QMN0Hq
EERb+DUHSbjYWU/SI/WHwVmzVbPUnYtCnkIvtHwY9przd3/blI7av46kntxG
QmVH0uUL7Rws8O/+d4OMhP5NON00QWDXus33a7pJ+KLTyH3/ksAFU4LMH/tI
aMHnJRZjBIayQzbaDJFAGmZbFVME2jTQIrYqSFAYFOpwOgmUaW947TJNwoK0
MsGZagLV2tjPQlZR0NjhndYYTaA1d/LGuDEF6mwPJ9Uopc/X+2zYauX/jJ3s
FKbkJ42NokwpWKo47UsGE5hv1Ogbv4mC6OT86+reSj7+Zf95RwqS05ht4UwC
Q3a4lS90puB1ulSl1Uq5X1YXk+ZKQS6n/NZSSwJVy87qcjwouKH1KllkSuCT
Lj0P3gEKPuz7XDP1nbIXsBjfBFAg81S94qiv9B+V/50TSEEDq0snX1fpm7+e
nn+YgryXF9x2LlXykhUBRiEUaEx7GuUuUvK8hPVFxyg43HEl6K06gVYH/5xj
hFMw2R7D2KlK4FGzXdLSSAr+8hL9wp+/iP8B8SB/6Q==
       "]]},
     Annotation[#, "Charting`Private`Tag$313189#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.068, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.066, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.064, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.062, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.058, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.056, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.054, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.052, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.048, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.046, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.044, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.042, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.038, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.036, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.034, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.032, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.028, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.026, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.024, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.022, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.018, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.016, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.014, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.012, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{267.26890756302566`, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.831969413678219*^9, 3.8319694205120993`*^9}, {
   3.8478715422781897`*^9, 3.847871563167247*^9}, 3.851055820344549*^9, 
   3.8529718924062185`*^9, 3.8529719520289955`*^9, 3.852972005140253*^9, {
   3.852972037065936*^9, 3.8529720825240107`*^9}, {3.852972124300188*^9, 
   3.8529721519649067`*^9}, 3.852972189504061*^9, 3.8529723432595215`*^9, 
   3.8529731614399843`*^9, {3.852973229371439*^9, 3.8529732391790934`*^9}},
 CellLabel->
  "Out[1484]=",ExpressionUUID->"47d2b44f-2ec4-4bb9-9588-fa63eab0a86e"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8510558463936677`*^9, 
  3.8510558464335327`*^9}},ExpressionUUID->"2b984e92-3729-4465-972c-\
62fe4b47b220"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8319694063148174`*^9, 
  3.8319694063626895`*^9}},ExpressionUUID->"0b15ca5a-35b5-467e-93be-\
e8bbe9ae0609"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"ppp3", "=", " ", 
  RowBox[{"Show", "[", 
   RowBox[{
    RowBox[{"\[Delta]plotStoredWid", "[", " ", 
     RowBox[{
     "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
      "\[Epsilon]", ",", 
      RowBox[{"{", 
       RowBox[{"Dashed", ",", "Thick"}], "}"}]}], "]"}], ",", 
    RowBox[{"\[Delta]plotStoredWid", "[", 
     RowBox[{"g1", ",", " ", "0", ",", " ", "0", ",", " ", "\[Epsilon]", ",", 
      RowBox[{"{", 
       RowBox[{"Purple", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
     "]"}], ",", "\[Delta]widthConfidence", ",", "pnostoredWid", ",", 
    RowBox[{"(*", 
     RowBox[{"pnostoredWid2", ","}], "*)"}], " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaWidth-vs-time-400.pdf\>\"", ",", "ppp3"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.847871622812597*^9, 3.8478716408252554`*^9}, {
   3.8515757811450834`*^9, 3.851575805729239*^9}, {3.8515871531580486`*^9, 
   3.8515871724686174`*^9}, 3.8515872446119423`*^9, {3.8529733751193275`*^9, 
   3.8529733756540565`*^9}, {3.8529734184220786`*^9, 3.8529734745503*^9}, {
   3.852973514800596*^9, 3.8529735401340866`*^9}},
 CellLabel->
  "In[1656]:=",ExpressionUUID->"4056a179-af27-4b64-8800-b7baa22f0ab7"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[Large], Opacity[1.], Dashing[{Small, Small}], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwVy3080wkcB/AVnbokZbR2suzVkYfogeGVfIscJ9QNp0J0oYwxpOQpdaJL
E7IQizIuYkmSir7Kc7ZsmIb9unuJ6OqFLok8dO6Pz+vzx+fz1v0tjBmwlEQi
uSzm/47bVJm7c+EyUA4liaIvCPErmxH4wZ4LnvfFFbREIUY/rNvO53LhXrkn
szVGiFFO7R0L2mkQN6e8ZT1HiKGcwflnO68AR715c+thIW498v02QV06ZGqN
WzpvFSK9zJpn+DUTpvY+vDkzUIEqtjd9LKKyoTtKlNBvXoH8gKafNl0rBAr0
uo7L7yDD6FLNXloxkLyECdmFZVjtUXPgRkYplOervI6JKcWR8vDHkf5CILMV
VhGOt5F7/ls8J+IeXKw875DG+BNJzdzvhgfvg61b88XZ9SX41mr/pimHGpAm
0zfEqhXjvrszW7p/r4Xy2YNzujQBrnwSTBsbfwwbp0q3WesVoVNry1zP9no4
vFLedsrhFs4t8wg7yEJw1WcmPIi6iUls2ZDquwaQyx3PBOYVopN8MsVt+XOw
HhluoFYW4C61aZ1H0Aiq5vrdmtQbyCKySOzwJihSbjOOzM/HXmM9eXJaM6jZ
LnuxwiEPOQ55RdjYAiJhYMzYm1z8eVA54MhQK4zY7+42KsnBA45MqvaGdhjd
njei552N6Q5W1M0HXsDbC9qrlPWuoXorWf16aAeUzTw4nq7Ow/o1PTOGxSIw
y4m8ZjxxFcsUKX26rWKwQBMD7bFMlOyWKR1/8xLcVd3Wmc5m4FpLpYzhlRL4
tGq0JXohHRWrtfJe5EnguTx8j792OlqLqTS0kMKw+BZvw7E0tPIMaeuXSIHZ
aXNaVHoZf9WtDSn17YKsDhn5B1oqrpB+vpTytQuKq791iZL+QEXDFgEltRti
z/qn1mteROf4qkEJpQcevt/10b4uGd1oBnk5VT1QZ78rYsD9Ap5Zct1Vw1YG
XlOmhiEaSchon4vlEzIIYNLCEpvPo4b0kKA/tBe4/S5endfPIbdY6V+b+V7Q
LOH6N59LRL5vwaOq7FegutT7vdGTBBQfMo/r05cDXeXKVG5lHGZZ1deubpLD
c3NylUlmDH4ZzqCyffpgMEXbrD0rGmO6/E7Hf+gDutUy1ePiU5gl0HXlp/TD
UfTW95k8iS9rFDQOZQDSNLUoIS6RKOANabFKBmB6rdltHobjmsOvUyJ3K2Br
oxkuoXPwxpGuT6YSBcQedPeo9mOj1MCy8V6XAvxl+1PJ7mxU/szP3CFTgLfG
xPrTDmxkpQZts+hXgJAZAXYmbLSoJYXZDCnA2a+l4MtsCErWmP7jPK2AwMYJ
T0l2CCo1p/4dtJEAgUpYrY00GBnpH+++pxOQ0XByx7umYGR5eZ5l/0iApfWT
GV5tMEo+0nXCDQlQnvMJnCoIxnydx17RZgS81bGr7gpd9NGjvcmOBBTMdzZN
qwZjkJ1ryfJ9BLwaLXvWSlr8q1VHXXIhoCSbrJQ7ycKlxWfJaUwC7BpGfrFV
sLBTqsXkeRMw/FSmUXlncefH6a7zJcDDMcwgo4CFjBODEzlHCWji2SSevMrC
/IWKK/mBBIzNScf3xC76dg1fnSACnvaiinHYouedMSkMJqBtkuFLOcZCc7+/
5nVDCaBaiD5/58nCE0b24iIOAc/iyR1fnFj4H6Hodsw=
        "]]},
      Annotation[#, "Charting`Private`Tag$353540#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0.5, 0, 0.5], Thickness[Large], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVkmk81AkcxoXtULvOnbXCNJZ0CW1GPuGnsJSSKLYL7WenwjhK09LOjE1N
4xr3lTFiDTIxolYq+rUhdzszMaH5by2yJSV0mRw7++L5PC+e5/u8eig/RfrS
1NXU1Har9L8zza9d2jqfAqsTrWUxHDEqw6nHxt15YOvNcKSfE2PMzcZNAh4P
Hlrt1QlmiZGxs6Nr3jgV1jDcjXcwxBgRNTT359Y0OGy+qnUVTYw2gVq2wsZ0
aNYsOjjqJkYzkWPOOmUmEOE6xzo1xbhke8kRe0YevL4aKJriVKOA1vKDeW4x
bLsfl0SOrULq+qR6N3IZ5NuIjLI5V/HG/nqfooxKIJdq8QsFIvy36uTt6J/F
oLhvYXS0shJ58QusqFO1YDYaz7XpvoJqrbzFz4eug3XngnrRcAWOOuwx/+BR
D1W81I1eiyvQq2bG6tH5BiBpK6WvnMpx+Z0w8puJ26CZ22RpEFaGO9sezPZu
aoJ3SmN7kyohzn6xP/LHUISDIco8+FCKF8L7Rla8vAefdV3cG6mluLP/Hddv
6X0Ydlns5Z/4Ozp99cn0FjTD6JmuhVlZCYYS2WrhJ1sgaVH6tbMWJSjfsLr/
YmorGDWGBkclFGOUB78Umx+AJUHVO/DgMu4Y0qQFjrQBPSpaqssvQh9PXyNj
kw6gZ3C8EoIFmO7hYLTGpxMeBVFid9kVok6bgU5BRBdQN5hFn17Nxybd3pl1
Zd3wyjfJk7+sAEUK7gClrQe8dR1bqpdcQolLn8bx4YfQ9NGTZKKXj3pbNDKe
L5fA8riQsXLtPFRok/idfAmI6H1aNyxy0bHHiIz2UhCON2+WWOegQwC9fVAi
hU4f56kJ92z0pzTQK4NkoKhQ7vE9lYXLpO+TuEoZ8OSDTpiViYp7VkLD5Efw
UWTr5tGZgbtYdUMSw14w2ewxHK+VgX7ktfz8ul7oT7EhRC7pGLuowFt/ex+0
jr9d0DNIQ2rH7K8Cog/OpDtHWmbzUF96QDgYIYc1GYFFwi0pyCvTmHKek8P4
FR3B9OskFARdvlWX9xjCulbGUzITseeAHXPAsh9K/A3/CQtIwGyHpgbtln6g
cVosn67g4sfnGUbhRwZgg8/ebRUyDp6VBf/CGh8A4m7gnZj6C5gtpHgLuIPQ
IDvf0J58Hh/WK8hRhk+gtth1SSorHoU5I6TQ8icw9+lbYDHPoe7Bv7nRLgpw
iS5wJ0f8hkWBsmlriQL2HX/c7TTNRunaLc21MgWkTUa0Px5jo+Z7Qeb3fQqY
qJsZPTXExtDkEFv7QQV0J/qmVEnZaN+gFuk8ogC59/toq2tslOhaj+36pIAZ
ukkuLZyNGq3Jz0JWEcCueWkqfsFCavpkzSszQvUvQxv6MxaGHgqIC7cg4Cgj
IWh9Pwslk2amJ9cRUFuYZVjdxsJC09uHYjYTQOI4TjSVq/iYF/KLngSIpz98
+TWNhSGu3uVLvQh445o1OXJY1f/qBiNpNwHFn0mTf+xjoXpZnEGqLwHaPs6u
h9xY+JeU5JtzmIBRv7fW179T5QIm5ZsgArLLr75JXqnaPzH0Nv8oAQZ3Ke00
fdXefHVa4TECvMYqOo01VHyHfpBpCAEBcvr0jJKJ6jmxG4vDCBiz86f2TzHR
LvjpHCWCgJrTzlk3x5h4Yr17T2kUAX7zC8vyh5j4H82gfdE=
        "]]},
      Annotation[#, "Charting`Private`Tag$354787#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJztmfk/1en7x7VIi6ZNDVNDG6lUMylKdAljiWJUKrTY98pSlKUQIUuRfTv2
c47D2eyV25YkJYmyVZZE+mAwGim+fR+97/uvOH7x8Hgf59z3db+u9/t5ntcG
84uGVnOFhIQWzBMS+v/fLenzCgJKq1Dg4wU55jV+SDyf7tUnWYXEHM6KH2GF
INPSI3+p36xE3Vzls7bsCJRaM7Y0fbACpea/zd4vG4F6G2NbhfQrUOK4uuFq
sxCkV3T1ILJFqDTejqeyPBA1N1Q3esmXoyV9cpI544HIuHepmdLMA2RWmBZ3
TSMEdU+dHPtSdx/90dxxMkExCNkuT/cvjCpDegzO5wJxHzQi81nM9Wwp8rKJ
aVuzxQZdUVHI/mNrCeqIkzWxED2Fvh27oTg8XoSs21z/9l1ngfzt6+tyywvR
yNcI+RJdK7TYV8zYLrgAORty59y2P4fuxp4dkjnORyKKJoy3x85R++Uhex0Q
ydloT+2PgxwMwzazwi9R+2GjrIYEeoeLE7V+FvrqEuA+DdbUeplopaisvtoH
S2p9dGRttOTLrKk1tZ4sdHLQ8E+6jRX1+RnIOPCf+a6W+tTn0ZD5ofbmICkL
+Pn+SWjol4vZ7jx3+Pl+cejBF2On5TRv+Pn/USi/86yG0aw79fpQpNN7LHjS
wZ667o9k+w48kA1Xov52RTVG688Uz3dHQtRPsPRRk5u996j1uIKoXJujSXUm
9bc/ZFkGBB6QZ1H7DYXGP9t6PQLyqetRYFVqsmvz4Xxqv3Fg4Ga069qJPOr1
SRB5V/KV/WQu3h8wtf4YuX6LifcPvRn7S4azGLg+sGTZHA8jTQauH7xZVEC7
cZSB6wv314e8WzHGwPWHhA3yh4NvM/H5AEvitWXZciY+P9AVvoXq4+j4fGGk
a10u/3s2Pn/Y1+mVlXk1C+cDlK3qZyM+ZeD8wJPJAcs3qek4X6A4PCky2puG
8wdLeFVLJIzScD4hsSCD9biZhvMLQ3KH2QafaTjf4LfJTn3AJQ3nH6KjaW4F
Gmm4P+BCtmrLelca7h+Im3QsUgQa7i9Q0qrvm/zxflT/wfaS3/fEbknD/Qmz
/b+80FJKxf0Lm6ImZ9TXxCOqvwEOyBy81BJF7b8atOcWFtukRKKjoaUb64ar
4VxdycN+vXtUPWpg/tYTQA+NQY8vX7y7ePMjMH8+3LVyJpaqzyM4skkuZ4tK
LFI9Jy105HQt6N2ovDP/fRRVr1qQevemqUvyDirV7rgQEf4YlK+Im55eGkrV
rw7WZJ8QC1ANQ7t33+1qqq6Dlfu1DJJs71L1fAIXunacfiZ0D+Wu1dITm3oC
IcZKe1dpRlH1rYeNC0vSX70OQ5uFv5cZ7XwKClHjA7L+AVS9n8Jw77NH1U7+
KHmYtzXeogFqP40qyk36U/VvALXttIFDFr5ozRvbuI64Z3BL49cjfDUP6jye
g/8OJVVmtAOKqJQUkXz+HBI0NlVMB5+gzqcRmFaj3wZd/0A3T3xS4sx5AQfZ
/KWbFupT5/UCSiIXzOzebIUOHf7L5e+kF2A8tM0kzuYidX4vIKfo5v38Gjf0
/SCNMabQBB9CNK2/CnlS59kEc/WDxyS1vFCZ/PT7qKYm2BPD5KyWcqPO9yWU
Oa+StbpxHF2RNRLf6/gSZtcFLkFPz8PP834JykGX5qm9sQT537n6rQua4QTo
frTm6VLn3wwp2yzuVexxR6MrRG+5pzXDMucNjI3Z16k8NEPkmMnlrjNXEGuB
Tbm48iuwSN640nn/cSofr6CxU+b6y1YzsJuu/Le09RXc/1xx1qD3AvzMSwu8
Kx9kq666ANKj63aYOLeAnJPMxJiRHvzMTwtkctm6NL4T6ulzt/y2pBXKt+3e
ey3ancpTK+x2kqjMXmOPUtpeJiZntwJ3YL3sye0a8DNfrbBI4qH02xZTMHm+
o/ngoddw3HGmStpLlcrba3AS22XTYeaCfq0OWvy+4zVwPEBFQ9GXyt8bGNtn
Oln61h+9Ku495HvlDajMY7vVXPel8vgGArSaRWKNfNEd1sGrG1e0Qdspdws2
K4DKZxs007+IjZYEoyNp8Zzq3B/Xf1v2zDUxhMprG0S49/ZrawajRTETHy01
28HM2D/qQjt+vrWDxGPdQ+1Coag2RF9qQXc76Pgo6PBNw6k8d4DGZZ/fnHfd
Rv7XmUY5nh3Q8067Te0/fyrfHcDpHr01reiNwE04XHtNJwTrpNwqGfGi8t4J
M2eaij489EffbM8/GuR0giJP9SF3OITKfyfIN+zp/0y/g0rO3P8WotsF5goB
Hj9Ci+8XSMM4Y+mh42mAeWDLAC2kwTIZMA9kTAQap0gkAuaBlK3DOzLLkgHz
QNFvnhHrlqcB5oGBLk3lupg0wDywd+l/nPVVqYB5oKJ/r87ikkTAPMCboU+n
CScB5oE/IoXf/1KWBpgHWA2BL52ccgDzgNpVixjnZwzAPPB59FIHk5cNmAfk
o07xhD+kA+aB5m6lKqHYDMA8MND/dcvORXTAPHAkevxr68dcwDyQMn6Rc/Mc
CzAPlOXxBuj5DMA8UPd70pZFCtmAeSCra1nsWZ1MwDwwvjNHybA4EzAPXOz3
8cy2ywbMA3PrVjumPaUD5oEE697KhtFcwgO6WYFo35J8wgMxPuztWjQW4QHh
AwaPygfphAf87ioyqxyyCQ+4vZWvuuWeSXggMMneUX4yCTAPiPZ3vNg/6omv
g/F9vcsjMsGEB3zs4636oiMJD/z70tnzRmUE4YE721VN+o6EER7wOCkatnI6
nPDAPv6d0LK5wYQH9AL1n8iK2BMe6HkVIl49cQPXB/hHjUzmPAvH9YNuS0ZU
p1Ywri9sm9F0CWpxwvUH7qZBs3YzwmvgdleiAvG8CQ+EWBqk90ZeIzzwcmVo
uVeIBeEBEd8i/10rnHE+gO809du9wmCcH7DM3HZeZtc9nC+QcCvY+5d7NM4f
SMzTcvkgdxfnEzx2h/258iRebxnYh0jMob32x/kGU5OKkJZZX5x/MFxwuUP3
UyDuD+Bc7DPeOj8M9w+UBztkq7vexv0FerPalv1P/XH/wcqcw1bPeNdxf0K/
dJj7togg3L9wS3gyKn5bHGAeWDj8yutiaxpgHvDLXWxwyjodMA+w05MsEzyS
AfMA/aNeqZpRLGAe6I/gzCZJxwDhgS5pl96JWMA8UKvNdjg/lQCYB7xbzMaz
xGmAeWDh6cprH/7F/VEH29vbliSoMwDzwFSsWY9WFx0wD4SvWZzedTATMA94
P9V9+PwYDTAPTHeZ/10UTwPMA8wg3xVpvRmAeWAk5z7vy0AWYB5QrHWQ0fPK
AswD37Zs8N3ZlAmYB8bSyn9VWJ4NmAf2ebS35X5iAOaBxVMVQje+sAHzgNwv
Rw+PT3AB8wBrwq/jei4HMA9oF79tDaUzAfOAqNQOi6/G2YB54IXvzLewgizA
PPBUWsNR4VkWYB6wNHmM7v7oC8wD8adGxquycgDzgLVsEd88gwWYB3QMarpL
vDmEB6TNxit5hhzCA9Ow4+jUC3z/aIbcxrba7DgGYB7YMLpQbr4sAzAPdP+l
suFVEBMwD3wuNP9iUJILmAf0wjykdT6yCA9ELCwP5fXkEx7gGc29LWLHITxg
81Z1Incfh/DAsaLxY9XueYB5YD/rTzmr1FzAPNDkdWmOW2s+YB5QOvu20s2D
R3hg12r7oKk8PuGBEk75jjEuFzAPGJmVtqU/ygPMA9IDKwaUs3IB84Br5KjH
1ZA8wDwwRzu1vsKdA5gHxBVgJlmKC5gHOos9U04KcwDzQOg6KVOfSBZgHqia
fmiZWM8EzAOD1ZJtdogJmAd4s2Hvxx2ZgHlALLfoo2I9HTAPKDauuxZzMwcw
DyRbJKxTu0cHzANRAzEePktZgHlAOw2B5hAbMA+sMhxaLTXAAcwD7n7Rinml
HMA8oGluGhccyQHMAz53S2bf6nMA88Dp2tP/VnTk4/sFEimXMXMpYhI/kMy4
3hS6kEX8gFqzmam/ZR7xA5KO1p8uOOcTP+AnlrwvRzWf+IFHTM/VH1NYxA/Q
PCI/9hrnEj+w4vnQJbUZJvED/9hWbU2RZBI/4Pfgz7XKqgziB5LiS/MMDJnE
DzTOXdOgeDSX+AEJx1ThA2sYxA/ciawv8Qon3//Q18kTLoywLOIHjBPurHSc
YRA/cM2no2O7HJv4gXWZTzpjD3GIH9AXqT0z/0we8QMyDaExC2foxA9sfTfx
fkF/NvEDFfFB+8f8cogf+HHv8038sT7MA3uPq8x/VMsgfuCCpG1ORyj+/puE
7nR/akmQpOPnLcquOLVcfR9efxRq99+3Z3AwHT+vkfjqpW3qkhn4eY76htWk
9Jfi7/uuaMLCO0xLOZP4gcPpdtG3zejED6Td2+XjncIlPCCyWMqpKqyY8MCl
L/avtMPKCA9M8MczbGhlhAcsBgu6fr1SSnhgm2eo36rWEsIDHk8/0DWLSwkP
+M4cXnur5j7xAz1vHDImpR4SP+CqsFXey/0B8QN5p9ZtKn9fRvzAuQixTIeA
UsID0TdabMP3lhAemDdrFpA0UkR44LS37KNzZkWEB7Q0SpKLQ4qIHxiP3Oqv
tqGY+IGe1PFvabnFxA+oLLE8UXmomPiBZpfjtoZphcQPfDJuGWPM8Ikf2H/W
ia1hwyd+4H87Kyd6eHziB84rLBv9vqGA+AGLPclC2asKiB94YaO0nZbHJ35g
k80xrqs1n/iBJHOXxTUb+cQPqIhPKSxi84gfGKv3sKyL5hE/kHHPu2ukhUf8
QF/ru3nn/XjED3SEzvsv/iaX+AHH59+f9a3lEj+w7XZv/qUgLvEDX4OkOA2J
XOIHTkXqWRjnc4gfOGqc3FO5lkP8wKp6azEdHy7xA4lGc3WH/+ETPxBoe1xi
bGMh8QMzU4neLVIFxA/MXaU+NdrAJX5AtKc8nRbAJn5A03A6YG9WPvEDH+LT
o9tS2cQPJBywVDN3ZxM/kKrifLnRL4/4ATHX+UM961nEDww+7N5g9qPfMQ8w
Y8zeLqNziB/4b1hLsmM1j/gBu+pSG9oWLvEDqcGpCquO5BE/cMUr8sL/tJjE
D1xlv8st/cAkfuBmXYvw5TAW8QPSbDuv0y9YxA9Iz0icD8pjET/gf05xgd1Q
HvED452/9kx15yPMAxpcD/Uzi/MR5oHJeJuA0Pw84geOJYwNtVqxiR/YnS3r
UBvEIX5AbcNhJL2cQ/xA5bubCwemWcQPcLlRLRdYTIR54MunDze0F+QizAPB
l0WEcpblIcwDlsHvDWjhbIR5QL21IH9tLIf4Abe1qNOsikP8gHLLE8dMUS7x
A7HtKlaPt/AQ5gFrOeXYw495CPOAHbO+pmecS/zA/qiqNtFdXOIHDr485X9x
PY/4gcsnlykNPeATP9C08OlH7usC4gemRPZUqF8uJH5gVfhpd/9LhcQPeHoc
kfcsLiB+ILYmPWubaAHxA22gLaPF5RM/4Ny6JXq1E5/4AQOtnTcNrfjED+wU
MV3mcZpP/IBU4+fj31fziR9QYyWPNc7nEz/Q9rnrTnoSn/gBjbXvZNYEFhA/
8G+bTpYMo5D4geZwlojC0WLiB2K/vHQ5kVlC/MAZnxEFofoSJJgXCOYFgnmB
YF4gmBcI5gWCeYFgXiCYFwjmBYJ5gWBeIJgXCOYFgnmBYF4gmBcI5gWCeYFg
XiCYFwjmBYJ5gWBe8H/i1khw
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0vOfEAYAxuG7y7axbNtLa9m2XZeNdbfcatm22zK2zC1u2bbtns+nH573
/Qe+KZsHV+8cFBAQEEiQCUNYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIRnwQk
JBGJSUJSkpGcH0hBSlKRmjSkJR3pyUBGMpGZLGQlG9nJQU5ykZs85CUf+SlA
QQpRmCIUpRg/UpwSlKQUpfmJMvxMWcpRngpUpBKVqUJVqlGdGtSkFrWpQ13q
UZ8GNKQRjWlCU5rRnBa0pBWtaUNb2tGeDnSkE50Jpgtd6UZ3etCTXvSmD33p
R38GMJBBDOYXhhBCaOD3DgIDv0fx1X3hM5/4yAfe8463vOE1r3jJC57zjKc8
4TGPeMgD7nOPu9zhNre4yQ2uc42rXOEyl7jIBc5zjrOc4TT/8x+nOMkJjnOM
o/zLPxzhMIc4yAH2s4+97GE3u9jJ3/zFDrazja1sYTOb2MgG1vMnf7COtaxh
NatYyQqWs4ylLGExi1jIAuYzj7nMYTazmMkMpjONqUxhMpOYyATG8zvjGMtv
jGE0oxjJCIYzjKH8SighfANDgILC
          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
        LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 
         18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
         35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 
         52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 
         69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 
         86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 
         102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115,
          116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 
         129}]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwN0ncilwEAANDv5yau5AgOoDOYGVmJsiJ7haKQlZW99967MrJDvT/eDV54
5IuIqFAQBNHEEEsc8STwkkSSSCaFV6SSRjoZZPKaLN6QTQ5veUcueeRTQCHv
KaKYD5RQShnlVFBJFdXUUEsdH6mngUY+8ZkmmvnCV1popY1vtNNBJ110850e
eumjnwF+MMgQw4wwyhjjTDDJFNPMMMsc8yywyBLLrLDKGutssMkW2+ywyx77
HHDIEceccMpPfvGbM8654JI/XHHNDbfccc8Df3nkiWf+EQgQIoz/0opg+g==

         "]]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwV0dVSFAAAQNF1AElJUbpLBATp7u4lVBCQBenuzh/n8HBm7vvNDx0GDz4E
AoFnwkQ4EXwkkiiiiSGWOD4RTwKJJJFMCp9J5QtfSSOdDDLJIpsccskjnwIK
KaKYEkop4xvlfKeCSqr4QTU1/KSWOuppoJEmmmmhlTba6aCTLrrpoZc++hlg
kCGGGWGUMcaZYJIppgkywyxzzPOL3/xhgUX+ssQyK/xjlRBrrPOfDTbZYpsd
dtljn/dphxxxzAmnnHHOBZdccc0Nt9xxzwOPPPHMC6+8AWo8JHk=
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxgdZlS7IWmtjGke1udRmQ4N6226sW2JDK6RDRbmVa42KXTmZ
vjFkwjCuQ4kmJMntrS2NSaNxzeX7bDtGN6q1m6LQzv7xnue853l+P8ahCI9g
VRqN5qq8/5NlUp1rN38R2Bt6euNTRPgpzPrwxC4ChhM1jDWSRRh/u9lSQBDQ
bs4W886IMMZJ0jG/kgNPXsvt6uJEGB4pn7tnlw4XX/RIpkJE+IP/4o3CZi5I
RptOsd1EaHzNnmf6KRPOFDInafoi1Nhe7GcTkw32k2+qtauuoyD4wW6Ty0VA
7IFBK3EVWpul1e+klwE/ULe79WMl1u2rdy/IqIBYs9FOdctKfFEV1XgySATT
hXrPbwVeQyL5S2LkiRqgzfi5vhFWIK2N+GpMfhPUBqbPO41cxefMPSYfHOph
2U8n7FYxrqLzjRmLnt8aIDNWntMacwU1m47R375rhBk3Y5/d98rRSfxwttey
Baya9rTVGJbjrPq+CJ9QhGqDpLJHSWX4e1ifYsmru2D7gXzHooToNPA+1XPh
H5CSu6k911GIW5ZNG92B+yCdX3turLIUQ6ksWljUA9hO35hcoVeK/eZrBs5z
2uBxysqChPQSjHTIK8X7DyE6g1Wko1KCP8sXBPsrxCDNvblN9Vwxujt6GKw0
lICmyEVgP12EXAemwffuj8CuZMulydgi1BLravHDO6C2aNz3sUoRtmj3zpiW
PYbNSaoT40sK8RqZOsgQS8GLZhrhblGAsm19akdGO8HRZZ26lY8AdTarZYxp
ysBCz8y5Ii4fyeV6eY/yZHDPNZNuXpWH9lIDOtp0gdDpjd/ifj4yvY+3D8m6
YJT/9azhYj56MRqOVwR0g4aJ6Wf/vbm4qGsqLfVTNxDlPiNSTg6Sdy2E+uwe
cFmtnxg9ko0uibVymX4vzK6eqwq0zkZP+rq8nNpeKIwbZtmmXMYEFb7biu19
YDtZ7HVLwUNryexpAdUH/NM7nrbY8XBF137hUHg/2DBsJdySLCTK1P7ZOtcP
tw2z1/O0slAQUHinNvsp1D37EtQRewml+61Yg2sHYE3z2Klj45mYxWxpWP5g
AN7JDknFPpn4cSzDIMxvEHTKDxwxlmbgqe6DcYkTg5CwaqGDwC0Ds4QMN0Hq
EERb+DUHSbjYWU/SI/WHwVmzVbPUnYtCnkIvtHwY9przd3/blI7av46kntxG
QmVH0uUL7Rws8O/+d4OMhP5NON00QWDXus33a7pJ+KLTyH3/ksAFU4LMH/tI
aMHnJRZjBIayQzbaDJFAGmZbFVME2jTQIrYqSFAYFOpwOgmUaW947TJNwoK0
MsGZagLV2tjPQlZR0NjhndYYTaA1d/LGuDEF6mwPJ9Uopc/X+2zYauX/jJ3s
FKbkJ42NokwpWKo47UsGE5hv1Ogbv4mC6OT86+reSj7+Zf95RwqS05ht4UwC
Q3a4lS90puB1ulSl1Uq5X1YXk+ZKQS6n/NZSSwJVy87qcjwouKH1KllkSuCT
Lj0P3gEKPuz7XDP1nbIXsBjfBFAg81S94qiv9B+V/50TSEEDq0snX1fpm7+e
nn+YgryXF9x2LlXykhUBRiEUaEx7GuUuUvK8hPVFxyg43HEl6K06gVYH/5xj
hFMw2R7D2KlK4FGzXdLSSAr+8hL9wp+/iP8B8SB/6Q==
        "]]},
      Annotation[#, "Charting`Private`Tag$313189#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.13, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.11, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.8478716341480694`*^9, 3.851575810708466*^9, 
  3.8515871642387667`*^9, 3.851587246040289*^9, 3.8529733684506426`*^9, 
  3.852973419209597*^9, 3.8529734754308586`*^9, 3.8529735407801175`*^9},
 CellLabel->
  "Out[1657]=",ExpressionUUID->"cca8faa9-f33d-4f78-8142-17cce24763e8"],

Cell[BoxData["\<\"deltaWidth-vs-time-400.pdf\"\>"], "Output",
 CellChangeTimes->{3.8478716341480694`*^9, 3.851575810708466*^9, 
  3.8515871642387667`*^9, 3.851587246040289*^9, 3.8529733684506426`*^9, 
  3.852973419209597*^9, 3.8529734754308586`*^9, 3.8529735410689745`*^9},
 CellLabel->
  "Out[1658]=",ExpressionUUID->"17102ede-d534-48a7-8c06-51003778f5e1"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8317074244441357`*^9, 3.831707429451883*^9}, {
  3.8317960980838346`*^9, 
  3.831796127922763*^9}},ExpressionUUID->"c60b012e-b949-447f-a09a-\
aa60082796e5"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"ppp1", " ", "=", " ", 
  RowBox[{"Show", "[", 
   RowBox[{
    RowBox[{"\[Delta]plotStoredWid", "[", " ", 
     RowBox[{
     "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
      "\[Epsilon]", ",", 
      RowBox[{"{", 
       RowBox[{"Dashed", ",", "Thick"}], "}"}]}], "]"}], ",", 
    RowBox[{"(*", 
     RowBox[{
      RowBox[{"\[Delta]plotStoredWid", "[", 
       RowBox[{
        RowBox[{"-", "1"}], ",", " ", "0", ",", " ", "0", ",", " ", 
        "\[Epsilon]", ",", 
        RowBox[{"{", 
         RowBox[{"Purple", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
       "]"}], ","}], "*)"}], "\[Delta]widthConfidence", ",", " ", 
    RowBox[{"(*", 
     RowBox[{"pnostoredWid", ","}], "*)"}], 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"ppp2", " ", "=", " ", 
  RowBox[{"Show", "[", 
   RowBox[{
    RowBox[{"\[Delta]plotStoredLen", "[", " ", 
     RowBox[{
     "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
      "\[Epsilon]", ",", 
      RowBox[{"{", 
       RowBox[{"Black", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
     "]"}], ",", 
    RowBox[{"(*", 
     RowBox[{
      RowBox[{"\[Delta]plotStoredLen", "[", " ", 
       RowBox[{
        RowBox[{"-", "1"}], ",", " ", "0", ",", " ", "0", ",", " ", 
        "\[Epsilon]", ",", 
        RowBox[{"{", 
         RowBox[{"Purple", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
       "]"}], ","}], "*)"}], "\[Delta]lengthConfidence", ",", 
    RowBox[{"(*", 
     RowBox[{"pnostored2", ","}], "*)"}], " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp3", "=", " ", 
   RowBox[{"Show", "[", 
    RowBox[{
     RowBox[{"plotStoredLen", "[", " ", 
      RowBox[{
      "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
       "\[Epsilon]", ",", "Dashed"}], "]"}], ",", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"plotStoredLen", "[", 
        RowBox[{
         RowBox[{"-", "1"}], ",", " ", "0", ",", " ", "0", ",", " ", 
         "\[Epsilon]", ",", 
         RowBox[{"{", 
          RowBox[{"Dashed", ",", "Purple"}], "}"}]}], "]"}], ","}], "*)"}], 
     "lengthConfidence", ",", 
     RowBox[{"(*", 
      RowBox[{"pnostored", ","}], "*)"}], " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaWidth-vs-time-200mM.pdf\>\"", ",", "ppp1"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaLength-vs-time-200mM.pdf\>\"", ",", "ppp2"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<length-vs-time-200mM.pdf\>\"", ",", "ppp3"}], "]"}]}], "Input",
 CellChangeTimes->{{3.823090893667573*^9, 3.8230909058046417`*^9}, 
   3.8260970264070883`*^9, {3.82609710925487*^9, 3.82609717747134*^9}, {
   3.8260972078950386`*^9, 3.8260972773009744`*^9}, {3.8260974644229355`*^9, 
   3.8260974764541526`*^9}, {3.826097511935855*^9, 3.826097512397499*^9}, {
   3.8260976010807714`*^9, 3.8260976035419054`*^9}, {3.826097683486889*^9, 
   3.826097685773341*^9}, {3.8307591086232586`*^9, 3.8307591104110126`*^9}, 
   3.8307591658233995`*^9, {3.8318829233994284`*^9, 3.8318829257270503`*^9}, {
   3.831882957532152*^9, 3.8318829699558754`*^9}, {3.831883248666373*^9, 
   3.831883249965518*^9}, 3.831904196852003*^9, 3.832059265774366*^9, {
   3.834734839029208*^9, 3.834734880036337*^9}, 3.8347349934149976`*^9, {
   3.834738257039383*^9, 3.834738307031325*^9}},
 CellLabel->
  "In[2105]:=",ExpressionUUID->"fd71ee19-37e7-4c7f-8cfc-916909498f8e"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[Large], Opacity[1.], Dashing[{Small, Small}], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwVxX081HcAB3BSzEN6WGW6kC2p1hih0qs+6rqElKGc+yHHHYlIJ1MkIXma
Z5PRpVyZaNU8ZFd89SyR5+N0/JCk4ky0Mpltf7xfb32vIEf+HAUFBfv//P+o
Pv1pOjgNdwvLA1lsEalMmYwYPJ8Gh1Gr4UBHEYmcVlVsJGlQFFrV5O4REc0O
M1Xh/HTcCX+lMGklIt/HJ2pbFacjcc2jPvFaERHIzS1j+zKgU+nUnz5dSKbE
yeEa+7JRcWtRLbegkMxztvxnxfpfoOW1qClEfplU5Y/xpdRl+Jzb6L856hJR
Mpo8ZbK7CNIRfe7y7QUEK1qimxmluHRIjNhNQrL42JsPS0pvolakaqD1Oo/s
4ysx43XKkBSXbak5kEu4j4zvsx9UYEvkkleGnTlkxKnudoNbFeK49CXdqWxy
b3yKde6pGIo7v3C7wc4i/p+3Kl88XI0i9+rMVWUZxHMZ4+BML4F4f4dczkwn
PsamOae/uYff56aYM4ZSiYpan9aN4PsYSdtg47vlJ2If0D14pvgB7JbLrZqG
E8nM3F7bmOmHiDuhIwpPjSdvy7UCDlg/xlVJz/EJvzgSMXJB2hDxBFrP2c9C
kmJJGOe7vuCGOkjsK1pXFkWT5Q6qG8Tz6uHpLPgqQvEMWR0h1zVxfYbrdxpS
Ft6IJIFE9fGJqw2oLF4S9+WVcOKWGPwHv6cR9UEqkqnZMFKeNMCKMmqCki5r
aZBTKHFVc1hw0awZ7e7aMc9nBSS020Y69LwZ8T6pTKXeYFLHqhtjhbZgzuZ4
ntA/iIxOBpSGLm7FUbU9pktL/Ik1fq6oudOKVS/WvbTr9yXI5uSPcdsg5rC9
kwN4RM2Ytfb95zZkmT3Id/XnEjVe+RyNK+1Q06td1PzQjfTIbKI/bu9Ak+EU
/TjShezlnqSfvejAAj13qUaJI5mMMk64HS1B7VblQ6pZduTIoJo0RLcT4bvP
t69hMAnj5eHjNk86ETU9X4Wlb07yDMZvj/G6ULDnpu21jdpELFjcFTnbhdYx
yS7BpxXQdK/aaVAkxQW503XGazOYJca6XGB2YxdbapF80Aqpjh2V60e74WMd
X7nPeRcSVt+bEGW+QIHmaP7Tajvs39YmkRvJ0C874Vdt4YAD437KDp0yFOh9
S8nSHbFueLUsOqQHBvbq5oI8Z+S/jUwVavbCVL9S+XToATDjqdSWil5sv9ak
TDuxUe3nYS75gYaBJGfHP2OueB/rIUtxpmHiY3Jx+C9XrCnwiLF2oWHazxU1
z7giQ+LRUuVGY0DftiRXnQMf5sEjeb40LDITahYYcrBQx/OK5ykaEg/H7GR3
DryauUvf/UqjdiCiq7GOg5x33LuFJTQqc42EgU0cNCh7ebv9RuNyYtLX8yUc
WGz1utVYRsNSpHqY+ZID9Wte9jdraGSFH1LJnuGgPMb77PF2GoqD25Y1mlB4
I/Reb9RJQ+h1VNt2EwVdsXfbkJRG2Q6XoYfbKCT86a3PpmkY3lLpK7Oj4OHO
q7Z8S8Neg+XzI59CZhiPNzFCo54S1A/4U6jL5KmXjtE4s1I2Y3eMgmk9z1Xn
A42wTL0OrdMUfF/xFCQfaRTHUSdPnqWQr8AvSvmbxkRY1nh3EoVWBn+v9QyN
Fo3wLZszKKhs5H+YnaVRMUjY2ecp/AsRVWga
        "]]},
      Annotation[#, "Charting`Private`Tag$270920#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJztmPk31PsbwNEuRVSSVNrUzdVmKaWndJNclCRLXOVyr+43UopymWunRlKk
sc8wk30MM2ObrjfdJKVsdSWVlEq7NluWb99z5nn/D99zxg/jzPmc+byf97O8
zus82m5H9ngoyMnJzfv+8b//Tns4Kd0mtYQ93Uu/OyaNvDUcWxQQe4047VS9
u0knmTA0XfKUO/8hgepqsfsELKIiJ1nDW/UPGazsPmfQdolwuudUGAdfJUt0
c4/dU7xI1tX7bWlqqiEOOsarFzTFkdrCu3Ue2jXkun+jkaE9k9hfWLvr29Fq
EssMO5HGjybN7xYWakcQ0jG3uG7S+kjypfShxHJZFfHYpVlbZhJG1INZN/3r
rpCdnfwxlXFhZOPOve2ZnhISfvP5nZTyCPKLqkrP7SmVJOeIhuWIaRQJ7bjV
N5BXTjp7Y/hXpkQSHjdqwhLLMtLBUH14RxJK6r22zdz1TkzclH5b8a93kPS+
IlJlO9I2zzpAej8hiVr0QC/2faD0PsVklkv5zyEBQdL4BeT+8MP6lpwgabx8
8uWZuKj8RYg0vnwiNFTsiK4Ll8aTQ2YLXrV6a4VJz+eRLzbzB6pKGNLzsohz
V1vJ8V2B0vezSUJR0qepdQzp+1KIgUuy2ZhasPT3F4mccdGiI7YYTxwx7dI/
sFHeX/o8ghj25r3Uq/SVfj9BnE4eSy3QCiFy0j8tP+3GgoB4fA7Cp8xmfRYb
fw+rDNaN9oRw8f1QvVIversDF8+H2yMWt+beycT44K7hALdcJxPjhw125WqL
gzPxfnDXfaveZqNMvD8seuu43e4wG/MDO/LbrX7wS8P8wbX95WEVW9Iwv1Bd
X2su0EjH/IP/fVEWVzUd6wN2gb/4LRalY/1gHM9zfKUPG+sLew/kF+9K5WD9
YXhM87Hl9/ik/QG2Pe2vPg5nYv+Aiu/9u1YNmdhfMGzAZzOn4n0lkDpRoO1T
zMH+hK8jk7uf9XOwf2HjvnrfXz9zsL9hRGV0ar8BB/sf+gY869SK2Dgf8MC5
eEPhSzbODxg3TExvc+XgfIHpssANKqs5OH/guvSFQ64xG+cT0rPatzp5ZuD8
woPwV+Fdi9hEOt/gwNz2ebkH1rcW3HVKywbXsonR6ecxFanX4Zb+cCpvE1ua
jzro8P1rddFYBplZvYIR+60O/uactM0uTJPm5wZYLa/KfrA2hfT2eR351ake
QhwXdz3WSpbm6yaM5OpuPbwjmdz+seTA+oqbsLU/O3TfcIo0f7fgmNXvz3/T
yyC57n020+Y0gMfm9nc1/WxpPhvgcFyKa7IHh0SmGG976ncbdjvytab2sKX5
vQM2og4rllcGcWth6JfduwNrNqUKxKdSpfluhIq87swAZhLJCO9SNZvbBAHz
ti29aXdJmv8mSHKuFsYwEsl0dhhTUN8EGhtftzV6XZLWoxkUlPPy5zawSKBk
6XjNU81gs+r3NsEilrQ+zaD8nvPt3fsE8vrfusCI5S2Q4txBHrSfl9arBUaP
kjAdgzji+OnQ1w9tLZB99kTPIe5Zaf1aYXVdoMq9l2dI3TQlb6eoViA243p3
NTCl9WyFllGvi2HecVg/UrrfOuOyPguQz2+15DS+OKYB8tksnDd+KJINyGc5
v4+kVYEDyOd1e/wKtoyyAfk8q1VB56kPB5DPeybaFltNygTkc4GFr9u8lZmA
fC71/Wt+lUcmIJ+dB13GJqllAfJZr1r9k3pNFiCfzX1NjtZP5wLyuVluur/S
Xi4gn2349d+cT3IB+XzEe7t7UCkXkM+hqd5u3FU8QD4XPSYPSzbzAPlc43Re
ST+RC8jninbmFM0LXEA+e5WdNNyuwgPksyvjRHrNOy4gn6tONjawvDGeHKK9
uP8ntxw8n0cYf5pdgl/wvCziLdfe/ymBB8jnSg9zRsBkHiCfDygmrpzTkQXI
573mlocndmA+48gOlUedg8OZgHw25S44qLQRv58g9zsl45SfJAHyOXCahcjn
cxg+h7FLZd4vR7bh7+GPfeavLO1d8P3waOaac141QXg+hGj7nDHRjcb4IJHf
K0kpjcH4YdC/wFUx9yzeD6ynpCVc1ziP94fg/JZR0XAi5geigydMGDNIwfyB
d3ev20FGMuYXOhM+npfrTcL8w6dtnh+PrEnB+kBhc96ffd9YWD8o2zccYcm8
gPUF+ZIpzrpzmFh/iBOEMjPORGJ/wEHxjlnlmuHYP3C0+PTm6zHh2F+wnaEL
PhK8rwRA235Icu0M9icUWogXCrdEY/+CZiN7r5VpJPY3TGbv4bF9orD/Yb5r
+pPNZhE4HzCD5WZW3R6I8wOVZl4fXLJ9cb7gqJHjDRfnAJw/qA65oGFkH4Xz
CWbsy879T87h/ILR3+6X24RxgHx+cfXxjoz0OEA+T9uqtGGC0XlAPnNfmHmw
rpwH5HOMINtnw+t4QD43FdjO0DzNAuTz8uFG01zXVEA+/2eqdsdZdhogn5vn
//xjAj8VkM8+k5Nb1DovAfI5Z+zXR95XzgHyudki52yTTwQgnxvcLl58+vY0
IJ/l/rRj2/2cAMhn/fP2f6SuSgPkc5VN8H7HDg4gn20CqoYiBzIB+dzOX3jD
5R0HkM+VJdbKkxezAfnsGl/0PtUpDZDP7UrHYe3DVEA+LzZJCp0Wj3xrhj0d
AtP18pcB+aydN7u5aXcBIJ8nLjke66QqAOTzQUaowsvTAkA+9zhO2eq5RwDI
58Qb7tesgosA+WzBFS3Te1GI9SOb5yteTWkVUX9eobvTR/MPEfXnp1bOO3NS
RNSfGXPeZI/3ElF/1iXnlJnjhdSfjYLS84MXFlN/1r9qfLunpIj68zEVA63/
hPKpPy+Vd1C4GlJI/Xka503Xs+IC6s/Nqz4cZZsWUn8+7SBwUH/Dp/7MK5+r
xfxaRP25ZpmK7cagIurPDwutW9xn8qk/pyy48daRWUD9OWMdUTVuyaf+7PZs
B6utOZ/680jvKWdJbz71Z27fh55TAQXUnx19dvdpdRVSf1ZP2Gvs0sKn/rzy
2xu+hhGf+vOwsrXdB8VC6s+1A7FLmnIKqD+nN78PMKksoP48vP7ZHfXn+dSf
W2cP6D9dlUf9mWX+usz87xzqzzYHFDVZK7KpP2voqjc9YvCoPwcOrhuO9s+h
/vzM5hB7dbWA+vPpfffXmPWLqD8rm2gfdNYvpf48Kp8UmNkqpv582dJvXkyV
mPrz+u5C158MSqk/62R7thYFlVJ/Vrg0PSJ0ZSn151oDvZ6EaDH155HfWHO/
gpj68xyLTvP70WLqz+uD9K3598TUnxM/aTgpJ4mpPxdXvlx6Vk1M/Tk+UdfE
bkxE/Vl5X0wj20ZM/Xnscehbz2Ax9WfIzU194SKm/lxbG58zuEhM/fna6yH2
JEUx9WeL7AXmQ9/fj3xe4OMyv1Aiov486p6zcOoSEfXnB9cCszrshdSf90eq
b94pLqH+fJk9EmiVXEL9uaJCfva/90qoP7NOzNkUt1RI/bmNF6JkKRBSf14u
CvVu2yWi/jxj08baphgR9edco8EJkmAR9efj761Kb+WLqD/PuHzoi8eQiPqz
2qYZ3nMHRdSf16jFc+2LRdSfkz84vlT1F1F/Fs57tXL/9/ORz1eChgx6vwqp
P/OXHbCuiRVSf67aETvWwRNSf67dZF1imCWi/qxS/k/EkyEx9ecTVWFbhQpl
1J8HzKZHRv1QRv058kLzHTnTUurPuc+L++I5IurPeVFRB2/uFlJ/dlfg6Jyb
JqT+XKpY8lwjTUj92dhQ7sdOJxH1Z4H7igVqJ8XUnw+MO3XDblYZ9ecJj2x3
v9ctp/7c0JURKP+5jPqzmLk8wkWpjPqzZP26x8bCUurPsTYzHjt8v49svyHb
b8j2G7L9hmy/IdtvyPYbsv2GbL8h22/I9huy/YZsvyHbb8j2G7L9xv/7fuO/
cl980Q==
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0Oc6FQAAANB7L6GUd+iV/K0oKim5Dalo0CBaaO9JRWnRLhqKJEWlISoN
bdohOd/nx3mBMzYpHJ8eCgQCQaqo5gxnOcd5LnCRS1zmCjXUcpVrXOcGddzk
FvU0cJtG7tDEXZq5x31aaOUBD3lEG495wlOe0c5zOujkBS95RRevecNb3tHN
ez7wkU985gtf6aGXb3znBz/5xW/+8Jc++hngH4P8DwynBQkRQSQjiCKaGEYy
ilhGM4a44PD1aU5xkhMcp5JjHKWCco5wmEOUUcpBDrCffexlD7vZxU52sJ1t
bGULm9nERjZQQjFFrGcda1nDagopYBX55LGSFSxnGbnksJQlLGYR2WSxkAXM
J5N5ZDCXOcxmFmHSmUkaM5hOKtNIYSpTmEwySUxiIokkMIHxjGMIxflyYw==

          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
        LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 
         18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
         35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 
         52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 
         69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 
         86, 87, 88, 89, 90}]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
        LineBox[{91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 
         105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118,
          119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 
         132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145,
          146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 
         159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172,
          173, 174, 175, 176, 177, 178, 179, 180}]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwN0GciggEAANAvu8QdXMnPfjoAp7MSaVnJVplF9qwUMuL9eBd4YxNT45Oh
IAhiTDPDLHPME2eBBIsskWSZFGkyZMmxwiprrLNBnk0KbLHNDrvssc8BhxQp
UeaIY0445YxzKlS54JIaV1xzwy133PPAI08888IrdRo0eaNFm3c++KTDF9/8
8EuXPwJpIXropY9+BhhkiDARhokywij/w5VCZA==
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.13, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.11, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.52, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.54, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.56, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.58, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.823090907343609*^9, 3.8260971158859687`*^9, 3.826097150080276*^9, 
   3.826097330293825*^9, 3.826097477346693*^9, 3.8260975134017477`*^9, 
   3.826097605748675*^9, {3.826097637701518*^9, 3.826097686999531*^9}, 
   3.8307589984157023`*^9, 3.830759110905706*^9, 3.830759166689027*^9, 
   3.8307593379960313`*^9, 3.8307593719131784`*^9, 3.831883052981974*^9, 
   3.831883254606523*^9, {3.8319041768892355`*^9, 3.8319041979869556`*^9}, 
   3.832059266706685*^9, 3.832059321060723*^9, 3.832321390785267*^9, 
   3.834734367631693*^9, {3.834734844287501*^9, 3.8347348836303387`*^9}, 
   3.8347349941161504`*^9, {3.834738282894802*^9, 3.834738307793962*^9}},
 CellLabel->
  "Out[2106]=",ExpressionUUID->"9a9327a0-a9ae-4de8-97c8-9a2b45e33671"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[Large], Opacity[1.], Dashing[{Small, Small}], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwV0Hs0lHkcx/HJZaypZdeu1eRytpvKtpR03fRt18qlFFJRjOaWU7EdJlKp
FbqwHdKkbGnsFsbd84Room+qLWXUIJeZhp+VbUuY1ChC9tk/Pud9Xv9+Zgr2
+YsNWCyWD7P/OzCTjIxFngGRZcC8AA85Xk/Vx/VmngGT7A0n7bzleHTMdEoj
noEluR3rX26Qo1mri6ns83SIHvlUf9BfjotOpXDXFqRDriJJei5EjpLBpauS
us8CZ27P4QKJHEcVpw9P25QBp89vnvTLlqNxwKpPNgsvQqeJfV2eXo7VWTqx
escVkMpuPxrKyUdDR/2RxZ5ycP6uxCgYChBsmhJU1sVQKs6UPm4sQIuoV8Nf
F1OQvrqn6AOvEDeJDd1O2ZZD4OBH7oquQuT/5XQn8G4l2LOdNHWhRdi/ub5K
GVwNzeveZZi0F2Hd0Kj7yYcKsPmBWkNBMe4dd2Vn76mFNzVvrkgKi3HnN9ah
E10IO+Y75q34rAR3OTlf+HV2HXSYh7e855WgCafbqizyDozJwxzyq0rQJ1zT
e6zgLrwftt2VZ1yKE0Zd3olj96COLXDduqUU+yqswrd63AdnvbfRR1kpxvVf
VivjHkCvh5FVCynF2O3fd0cq6wGe5inXzirDGb6mSxTGjyDFP1LTHFyG9nGD
douDGsBrJCu+IbMMf0HT+wfzlHAsY8mUUFUZBqdE3hB3NkLNQ0/2TRaFFb/1
uMc7PgGxdYZKx6UwiONrnu2iguc5OT6rF1EYo/FSv3isAvfsexxDdwrr3et1
7jFNkGvOtd6zncIBfXhxjEUzrPB1nSOMoNADzlfeutkM+6J1CYPxFELG9iwd
vwW4drdy50kp5Di5L3g73gJmMooTdJWxqMJgWu5TGFIsa7KsoLBT65Xw4cdW
+JM1YjN+h8KN/EOk4VkrRNyW6fUqCvXxTslVCW0gcgm8LSEURvRy1Pvt2mH9
xZpwYT+F1s/3RHs9aAeRtrLlySiFl+YOVelEHdDHdmhoMqZRIbHoODrZAS64
qerbL2k0C6n+ea5cDRasNs5LGxpdUpK2XXbTgI3hyPnYeTSm+bdeXziggcxz
11YedqYx2b7uXY70GWhm5H/VvZrGLWta2gYdteBXftJz5Toatw7tZvu2a8Hy
RNT0Kb40Ory01ybs74RwoxuezYE0ZvUdTZOZdYHDp+awRXwa3U7tSGuq7AJp
lG5ydDeNtbt5S9v8CPz+07To15E0vk3iaVMDCKz7N11gFkXj/D94iR7bCCg3
RK1fzPhsG6+pOpjANW9P8wOMd7mFRlwKI2CcszfUQELjF7Y7c3ceIUBCcmZN
30+jQMW3fJ1PwOBAguvaGBovvObXXC0icDXrXqaAsZItEAaXEkg1TtYlMV7m
KqAbywmkpV9Oe8h4aqHAh7pFIHTO9Iv+B2isSBQej35KwO9+mFoYS+MrmXCh
YzuBci/BwHHGdgphyws1gcymt+NyxslvhDMDCQEXojHrZ8wLEdWu6iPwd+Kr
CclBGqWxItG7fgIxtdcHMxjXS0VTi3UEFmhnP6ti7PxIFGQ7TGD5jZ68McZh
/4hYbR8IKHTLTtgeYv5lieWpHwkUjDnxgXGztXijxwQBK+6T5XzGJsvFw5OT
BLhJlpxExv8BgJ+NNQ==
        "]]},
      Annotation[#, "Charting`Private`Tag$272171#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJzt2Pk/1NsfB/AJ8S3XGkV0i66km/ZV5dSVJVfJlsoaSbZIyVX27BVZEyr7
zBCZmEHkDDOMmWRpuVLiauV2o41yU33v99HnvO/f8H08xg88PD7zOZ/zeZ9z
nvN6vLXc/K09JGg0muY/v/73d791Qe6zLa3YubouY12fNfpr3Tftk8l8LHx3
1Ha+gg0O13AqUxjk4WXzY+g23T5YkdawsmQ5D1doyAa4+wTigmdq9QaRLbh3
Su5pVLAvXi08sbW7uxm3P5V4WqO8HbdW3BN4aDVjLdkFwQlmLsg+bZXl56Nc
7LV1IvOjxEHU83pBhVYsxnX+W37q43mgD5z+BotFTVh0PKNp++QRNCcyWxQs
aMRLXqnQVzkEok07bPsKDzdgJWl68qjAEzkrKw7fnnEDL4w/09s7q7Mp+tGt
iU9ldVi773nDcIgrLimOn/6TRS22GDKWyPvkhYV+RiqWr9k4dOZTxyOBx/D3
963B/jOO+7zQDqberxprXlkYG1zhTb0PC3uEZgXGCRyo+VfhfumTWfZ+x6n5
VuKDnwz++GWlPzW/cuyuvkz3Sewu9H0+DIzTt4xusd2Ovj+/BNdaCCSfzfVC
359XhHOwTRmbf5QaPx/7dowLR4NdqPFysdafy4z8zJyo+WfimAUqKbT4w/j7
589jXptK24zn5HosDotsjhjx2EP9H4TnW+QEndM/imnUj/PnMNebzxLJdZRo
49Hhb5tD7kdOpvM8+EFFZHy0fXyRhq0pnTwflczT1vH7ysDU/NBE9M4Co9dM
6vP5qN/hVr2OWTlVzyK0JSDlYpBuBXV/CTrmPHdljkslpuqDjLvS3iWWVFLj
lSPR28asev41TNUXmS5kZHXMY1HjV6Hpdl/a1r9jkfVBM+P7DC5zWWT9kHFa
RovVahZZX/TtyeL8LiUWWX9kZv9gBOWzyP5ACtx16arC69R86pDvhtC+hYJq
TO0vxCkdLrtUX03NrwFNT1LghepXY2p/opdxj39fblpNzbcJve1Ay7c0VGNq
f6M9ZS1LPzZWU/PnImMV7PsmopqcD1S7R7mAVV1Nzg9qd5SsfZRUQ84XkmpA
t/llbHL+kNEh613zUznkfCL/rcKBvb0c6n35aNTuZ/cwfw6mzjeaNaz6LuAN
m3r/ViR1o/VmwCQbr098frY+rw01TPlZq/wz3vd6CFBA7JHMsc21WIWrF578
WYDo+7Y9uBtRS9WnHR3Y4Funq1+L30z4+bvvF6LoU523K+I4VL1EKOqBqbzl
PA6+rX/ddUO9CLF2LBcFWHCo+t1Cekmd2D2Fg5kHJ6zk1DqQ7M49VwM3c6h6
dqAHiZdW1oeycVyugdGTE7dRr/64nE53DVXfTrQ2X1cnuqgGu90JX1N7vxMd
krvTxVZhU/XuQjlnFx1w+YONr8QMKZvM7UbB0wLwWDyHqn83kjrUs+kqi4Pl
80+fqRJ2o9MyL+5d8OJQ69GDokVzbdfrc3Bog46URkgP2tSplbNrL4danx70
ZdBz5tIuDv7zd0Fo7OI7iPdzY0XzJIdarzuIG1H6RL2Bg/e98xof672DLqZb
ei0s51DrdxfNVdp13fo9BwvkfjiyP/4uoglkO+Yo1lLreRepdCtHXh6C9cMx
s1bUjTOKwOcnp2z8JmMLEPF50ClQbbZ/ASI+y/WsqclkFSPi80sp84xBCQYi
Pp9RvtUSPE5HxOcZ4dnT5/BKwGdfEV/Dn14MPqMfj1aIwkvB5/iUYlWdXib4
vFx7rN4+qBx8rvsSIFzqygSfG/M4A3bZpYj4vCv7rcd7ZToiPtePXaJlHGAi
4vO+1NEV6UlMRHz2ST573G0rExGfFQ+6bz31oRwRnw2NZns8XFsFPqdvsnBL
28YCn3sSotyl+q+Bzw6rWfo0URn4/Ivhl1eM+wzweXTEF08YXgWfTWOVIptO
VoHPvYlHV7Vps8Dnc62at56uuYaIz9599t2cPWWI+DyYRosJzC5BxOeAinp+
0qN8RHz+4bHnBdXuLER83tkbSdcsTiDX0UN/xwamlSe5H2XZNNhXqhwHn2Ml
pr1k/hoHPq+LHmY2fkkCnx9FFDTNzo4Fnz8++Om5cfUp8Lk9S0pqb0cg+JyT
qBIer+gKPp8/25YSLgPfb0glzkVewiSM1BcpKkqpBVm4kvqjYcdJvcTcaPC5
37BKnolTweeWc/zVHcpZ4LNAg2YVsS4bfD55vvl6o2bGvz47+jpvrI0Cn+/3
bL7lst+e7C9k/HqOy8fnbmT/oXXn7LSvFEaAzyLGqZ5OySzwuaMvrDD3Zh74
zMmflCzQzwWfTTbH60s6ZYPPZts2dcqUZ4LPYwaMaWtrUsFnD/lVM5/kpYDP
ew+OG781zASfq04f8sf4Cvg8I+rAq33SxeDzkLviJTVaKfis7jlQnFdQCj53
1Ct059qVgM91vyhvOdxXCD73ray5pNabDz6bNvnGPNa/Aj4rhDNdPOflgc8X
bzH0pXIugM+bq+x0DBlp4DNyDNJ6t/Yc+OyTsuOP5Oex4DNbdsLL6nAE+Gxm
sjvRO/ME+Dw2umbIdmMA+Gx6O8RM6UMA+HyfoT//9VAI+LzE9ui+WFYo+Dwa
drZu7PR+8PnZZe+0xXHhiPh8xiSlrjA0CRGf/7yeNStOPQERn+nbGx9aZ0Uh
4nPqXt/K3L+iEfG563GKSHpVMiI+T6FlrzcVZSDi84H07VOlBlmI+HxEysJ8
T+EFRHx2kJ2o9Hmfh4jPlgnPdrmdKiTrixVyc9xecQohP/OH3M4tGCmG/Pzp
wvrzRyyYkJ+j+OXdXanlkJ/L9J56yWUxID/vCVsUntxJ8hgXu0hI6ynqFpL9
i3cEjCRYthWR/Y1HaXfCpj6WkP2PD73UUzwzUEryC57QzPu4zLOU5Busvi8o
zORiKTlf+JjNkbAV2kzIz0/LX0TS869Cfp600W1f5lkJ+Vlw3ktBc8Y1yM/v
e2VWLjG/BvmZ86Ok++ZrlSS/Yb/xyYFOzwqS73Cb3kmZ/vFykv9wSkuwZs99
JvEHF1udmZJezSA+4b20D4Y5GkziF2bMTc60jLlKfMPHHmk1SutWEf+w2kO6
JTumCvLzKSeDJ1n/PJ/4bD54YAHvBB3y82+tbMeRbYWQnzUl11r3H7oC+Tl6
9fyHHhpFkJ/j52ocThKWQ37WTiuICFlzHXz+cM9kYCCsBnx2lnuewr7MBp8n
rUOEWw1qwedf5UMc3p6tB597FlmqV/3dAD7r3tAbVx28CT4zJZVetl7CkJ9V
gnoene3gQn6OW/0fn6/OzZCf12GnNRHtXPDZ6av0KmslDD6rTdvw25uhRvBZ
Fiv5flNtBJ+PmdPouzc2gc+7/rb8UlDRDD4rXVe++GCcB/nZR9ojYe10PuTn
3MdTQs8VLeBzp1LlFDuOCz7XKb25kbiQCz5vO2H0g5E9F3y+uVReZvdxLvic
PGpO3/2VCz5723XOtrNtAZ/n5eRdnajigc+19ek620Z44POkf/8b18EW8Pnq
uPXwC79m8Fmjq0fkHcAFn9GC5IwZVlzw2VTe27liUzP43PJBLy4zrgV8Xrnz
XpWcOQ98zs4fkPE15YHP+Ne+IZokD3yWx2kJ8kt44HNZesx0r4888NljTe0l
qUY++KxaY9WkPsAHn0/27Sw9EcUHn4vLy+pDNPjg881P88Jrtfjg85RhsrHq
OT74bDtf/5OlUiv4fP9EcYZ7YSv4LLPT1bE4tA18PukYoi50EkB+Hmkqiph2
XwD52Xujw+cXfQLIz2bFszakDgsgP1u8LTx8ZnE75Oe8MEtLg8vt/+Znh/EX
SUgI+Tmu6PdU+g0h5OdkU7tMNykR5OfI1LfjspEiLO5viPsb4v6GuL8h7m+I
+xvi/oa4vyHub4j7G+L+hri/Ie5viPsb4v6GuL/x/97f+C/CzX6B
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0Oc6FQAAANB7L6GUd+iV/K0oKim5Dalo0CBaaO9JRWnRLhqKJEWlISoN
bdohOd/nx3mBMzYpHJ8eCgQCQaqo5gxnOcd5LnCRS1zmCjXUcpVrXOcGddzk
FvU0cJtG7tDEXZq5x31aaOUBD3lEG495wlOe0c5zOujkBS95RRevecNb3tHN
ez7wkU985gtf6aGXb3znBz/5xW/+8Jc++hngH4P8DwynBQkRQSQjiCKaGEYy
ilhGM4a44PD1aU5xkhMcp5JjHKWCco5wmEOUUcpBDrCffexlD7vZxU52sJ1t
bGULm9nERjZQQjFFrGcda1nDagopYBX55LGSFSxnGbnksJQlLGYR2WSxkAXM
J5N5ZDCXOcxmFmHSmUkaM5hOKtNIYSpTmEwySUxiIokkMIHxjGMIxflyYw==

          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
        LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 
         18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
         35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 
         52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 
         69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 
         86, 87, 88, 89, 90}]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
        LineBox[{91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 
         105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118,
          119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 
         132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145,
          146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 
         159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172,
          173, 174, 175, 176, 177, 178, 179, 180}]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwN0GciggEAANAvu8QdXMnPfjoAp7MSaVnJVplF9qwUMuL9eBd4YxNT45Oh
IAhiTDPDLHPME2eBBIsskWSZFGkyZMmxwiprrLNBnk0KbLHNDrvssc8BhxQp
UeaIY0445YxzKlS54JIaV1xzwy133PPAI08888IrdRo0eaNFm3c++KTDF9/8
8EuXPwJpIXropY9+BhhkiDARhokywij/w5VCZA==
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.23, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.21, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.19, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.17, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.13, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.11, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.07, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.09, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.52, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.54, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.56, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.58, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.823090907343609*^9, 3.8260971158859687`*^9, 3.826097150080276*^9, 
   3.826097330293825*^9, 3.826097477346693*^9, 3.8260975134017477`*^9, 
   3.826097605748675*^9, {3.826097637701518*^9, 3.826097686999531*^9}, 
   3.8307589984157023`*^9, 3.830759110905706*^9, 3.830759166689027*^9, 
   3.8307593379960313`*^9, 3.8307593719131784`*^9, 3.831883052981974*^9, 
   3.831883254606523*^9, {3.8319041768892355`*^9, 3.8319041979869556`*^9}, 
   3.832059266706685*^9, 3.832059321060723*^9, 3.832321390785267*^9, 
   3.834734367631693*^9, {3.834734844287501*^9, 3.8347348836303387`*^9}, 
   3.8347349941161504`*^9, {3.834738282894802*^9, 3.8347383079788036`*^9}},
 CellLabel->
  "Out[2107]=",ExpressionUUID->"94af6dcf-0f29-471e-b27f-d14e513842fe"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.007], Opacity[1.], Dashing[{Small, Small}], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwVxXk01AkcAHBH03R4RNi2w6IU7RukqWU3vl9HIZWWhnKN3JSzsVLEmAzG
/JooFK81bMe6OpZeatVGpUm1uVZq23lThMjcM3667O4fn/exikoNiNXT0dHZ
+Z//74w73NH5SeUWqr7TxSuVgm/WovPnGf2Qu826VsCXwt4v3MYcxhsI+jv+
xGlCChL3By0JDCUsWPZDw88CKZyPjrkSwdBDVo1Db+spKXDVG6/uY5jg6rV+
I69rpDDTUeMYzLBGh6kk453NUnCoeyZnMJxQs13izXwqhaan0S/al3vi6uQD
r6zNZcDmpl5wiNqB3m6VmvBQGXwaZ4u4twOwunmsIVkog3d2JQWXmoOxKKkg
8NJ7GdzwXfZbjncYUrOP1eUvl0OIp7KfXR+Jihc7ZKEectDj3jKtNYvGzQUx
1DVJcqi+sa2sMiIWXxVOWAwI5NCTpZCNDcdjrmDPJv+bcphaG1libJeE9tOi
7nMSOdA/XJ2sSD6IW7syHa9SFWAeZml/aCQFW63q9S87KYA1ZBdUUZWGiW0D
PiGhCrDrDuCuGkpHgxWnRIuLFaB8eLC63/AQeh6otCtuUwC9c+Ixy4mFTnOL
xwViBXTpslLupWRiYpCKcttACSKX/fZzFT9hmnm9YYyzEpbfDGeO/5WFOsFM
il+CEvK3+7E+GWXjkmXlTGmVEpgD1Re/0I+ga8UGzuR9JfB+mfVtyTiK3w3f
/cpHqwTagVuLfGtyMDPei5xeo4JRr4NXjO/k4jV6h7NDoArGY2kPuLPHcHS1
DUtVqIINYJujNsrHROfp55LrKjBLdf/z6JV8/CwepCVPqkDfNrD86x1stG/b
IxFaqKHlldlbmpiN3am4Reyvhs/0yLQzOQV4ktIULi5Uw8KSUF72Eg6ueWma
ONyuBss4f/P0Og66xtYkhkyp4Z+xnpd33I6jdQjMv2etgaDoGRqn7zgWR3QZ
UoM1kMlpunkurRAbt3yf7H9SA7trlwzaU7g4daunKLpbA5u8UiKHKrkYnTsp
1H7UwF1+oM0gvQjnRpuetG7WArXv3WEfURFe+GDbuSpFC+p2KmVpQjFacJ6Z
9jVqYcrOQl89rwQLfl06ZTKuhdrKtwK/qhIM44nSXn8zA7MX6YzZTTy8Nj0y
aBUxA0at9IZVPTwcbB6eEJ+ZAQcfWure0FIcOmLLXTQwA5r8luR3ZCnywgaF
vSYkZF0Xf5CX8jFfoRum2kXC8KheHvsEH5lnPTx0d5PgbLpO36SMj/ucmulG
P5JAZqQu3ljJxyrpR9dvA0nIdtRZmSnko3vZ2TfRwSQcbbJynW3j47kSGus5
k4S8upg8XTEfLf9o//1hGgmS3mL9cgkfbVzer3ueTgLqtBRZj/CRFR4kHMsg
QYepEXhO8NE3rPc6JZME9kqusFDJx62b4w95ZZPAqbrUuZBKYEN2vst9Ngmj
3Y+3Vi8k8KFZQOJgAQleWtmj9QYEDrnsvzDKIWEew7nfz5hA9z4XDwqXhEKT
R2+IFQQu8JAYevNIGHOfjrOwIHCndaMwuJSEbenGU5ctCayYbXNL4JMwv3ef
6pkNgQ+8BLUlJ0iIm8vNirQlMPs0M6paQEK3ff1H+XoCH5dnbGg6ScLaiO48
No3AuhaRQUcZCUXEpL6JI4FjAVHqJ+Uk/AvDM2ED
        "]]},
      Annotation[#, "Charting`Private`Tag$273424#1"]& ], 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
       Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwVx3841AccwPHzK9GWzq+kkmyZs+cOdUKNz8dDcvOjokMS8uMyq7v8mqwT
13GHu2/6gZbyyO9tkWp6ktIySyhLpovW5EkUnh5f5w73Taz98X7ez2tjjCAo
XptGowV86v+38Y7dbVuY8bB0bf1EEjjphtXV3D5Iqf2i7/Inhy1KfhVyX4N/
8Is6Ty0Shj0fNCRwlbCH58YTa5NQHRvXGMnVxsWYByx9PRIkqi3X9nGNsZnj
P2VkSMLc3YuOoVwbDBjrc7A1JcGh4gnJ5W5G2oGmu/F2JFzpiR1stvRC3sL1
S9V7SRBJBDUOMf5o6a2/PeYECQtvRZ2S1iBsqErsuVlHwjgj/2RdfSj6JNAd
l/pJuMWxuCHcGYGbnDcrry+REO6l7BNVRuOlkO2sZNY0aEtaTMvNYvH9LR/X
ZxHTUHrL50xJZDwaBzrpyfKmoTt9emps4BDWL2v6+kjzNEzaRufTGYnYuDyi
t2R0GtjUtYniI4ex97nijr+xEswjrFkpI3xM/n10KcBLCakKRkjx+aPIN+OW
ZSUpgdERJFmvSEIjs+X25tVKUD48XNq3MgUHP9CGfBRKYLe9e5S6ORWNBDX8
Qr0Z+EMrld/OT8Pnzt67I91moNPtIGup+Aek908OuibOgOXtA1Fvn6WjRhre
1VQ+A9nf+qUuGGVgy9bhto7+GYj6u7R2kf0jcv0TpN3LVFBQpeE0JB/H4nfm
BufcVcD8vsWQc1GIbpU1aZikgjfehxvp9zKxq6WMkVitgrfxzAcSzQkct+s0
Fb5UgRPYCVVG2Xjjo3NKGF0NZgLPv443ZmO9yWLQNj816NgFn13jL8LYKVb0
zzlqaHhpNsocEuF4UdGrP1vU8JEdffQn4Unc9njW/PNZNRjk7y/IWCXGkaQL
j9TMWbDm7TJPqhCjzXeyjsD4Wfh3rPvFPY8cTI3dqdBUzEJI7BxT/DQHxQ/t
W+z+mYU08ZXbZUdzUWByOrJrzRzsLl/Vz9KTYKHL3g2v9s6Bszc/WlEiwQ18
Q3pU4Rzclwdv6mdL0SXTJSzjyRzoPx0/5tspRYsqTubEinlQNevrmSTkoaV+
ffrqwHmYZFjpqHTzMe6Zh+J+4TyUl4wW+p3PRwv/HOOKnnnQ1LK5GucCrAt6
PJhA14DRb+xf1ncX4IiuQB66RwMOvkxB2H4ZilwetlWe1oA6u+HI+LwMOdKC
OC2FBtJvDlGkTI6DB0OceKspGHijnSU6JcedYzZ1MgsKXE2/0jE+I8d2k37G
9TUUzCcLVmwpkSPt6hh3YS0FGY60dWmX5Shtfel7zpqC41c2umua5FgSICtt
Z1CQVRGXpTUkR+e6SZL5DQXDvXk6Z4fleOo+T5frTgHSGqQ2I3LsaRz4UuhB
AS1KXej1To6c0Cp5N1IgWie5nKuUI3FvZO7QDgrE5+vaDPQJtKo97V4TSMGb
jkc7Sg0IzM9tte7ZRYH37FSX/WcEDodPrFLvpkCX69rnRyeQ7ehjsSOYglzj
rtfEWgINc83bR0MpGPN8z7OyItDDJHjlyn0U+CTRJ69aE9jFKOJtDadgWe++
mSebCCxys/WQRlDAW8pMj7Yj8E7osdbGAxR0sCo/kPYEGvg+5QxEUmAb2ZEl
YhKoXeY0QoumQEpM6Bg7Eug0fiGfcZCC/wDB/U81
        "]]},
      Annotation[#, "Charting`Private`Tag$273424#2"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJztmPs/lOkbx0dDVIRSYpWUpN0i0QHFVaGm5BDLWiLnHDIahhxiTBu16Ygs
rVMnHUToROJu01a7UbtsOYRoqx3nw6Bkt/Xdfa57/4XvD9MPer1f13ye63lm
Xvf7eu5by4u73XcSi8XSmPjzv///+Qd8srk7ts9lRZf5P5wbTnKsJrcbmzLM
CifZwkXqw9sY3hlGFDqrk5qCGCY8otL8i/TcDIbn8whLaWV8fB3Dgj3ko4vN
sZJp3f/yq1ASu3Yw7ONKhiGUXJpVz97hjswlWhF5delHGGaFELvMOL2XZQyT
YGLvviIs5TeGBUHk1ssj+4rfYT6QLHNIVj7F6mHyAaTW0HMV0WSY+BPL1LaW
BlOGBX7kkaOwwHYHw+BLXD67La3yHeZ9SGPjtyXn3mLei8QMGcU80O1l8p7E
taOr9eVmhmEnkd1/OdHQjWGWO8kXFayr3I+fdyXX9C+wewnWXUgl+3yK7DDW
nQiv+vdbX8j3MXVHkp2c8sxJjWGBPWE5iubmmGDdhtjPzE2dxEXmkMdt7Pba
LGQLYjFLWv+vYmQzYpTWojWcjmxEBlXXjKU6I2uTk22tyapzkVmsj7VVkxWn
0jrcd7Zi/zKH5sF5y/wcIyN6fZA1/uHFyc20P/CLNm3gOtL7gwxL1kG7IHr/
4C16+lh8gj4ftGw8+0zrMn1+iLjDOVB+BetOsCxIqLHmDtZdoOuFR39hD9Zd
YW+tsshidj9+//BoV2rECb1+/H0gsPVTiIxpP/5+4BtcrdO/th9/X/Dat9et
dT3mfeDWF8L7ti6Y9wViYiOMisK8H7CXpAv0jmLeH8rXv0mr/R7zAaCc6pd7
uhTzgZC/PmC4rRbzQTCH01u/rAPzwaA4OBreLMJ8CDjvUXLf1o15LoRd+fVx
xyByKKQ/POGuIzOA6wsqmpLaTLQHcP1BlvW8HRqWA7g+wcp66NBMtwFcvxAW
l9J5ctcArm+Y55ZlezZsANc/LP1woSo/cQD9AKPGUitmnmcY+HDPOb9V5ifs
z4cn+SLjsE7sHwGeW6ZVff0J+0fC/m+3Px6ZMcj0j4TY+bLz3FYwvHMvmFQD
2/trhllRMMpq3KCdwHBuFFxUevhhUjbDEA1u/JeX9hcy/CoaAr4qft1xi2FB
DLCS/DYZVDM8PxZ8upVFxU3YPxZkpt+2jxvD/vug5p2VIl9tiOkfB28Ph59X
Wc5wbhw0NmzbkgsMQzwU5ci6XnBm+FU8TFl2yT82EusCuKH/5lVeCsPHBVDI
mncy5iJ+XgC5H1/Lvq5keHkCVPBNL43XY55PpmQ2PeSgLyf8/Hnbmt8XrkA/
hpPr6lHhjY7d1M+ORancqZfQlzwye+/73bZ/dVM/e1s9XyW1CP23h7SW65pu
1euhfl61RXhHYRP6MJSo3FMV5h9C5hLl5fdy69vRjyFEvVWn4rxWL/VzR0dD
b8VS9FkQSbBbpGuqh34MJC8i2xz0PdB/AUTuAleTfxnz/qTo7bYp6c8x70fK
TZ0c/hjHvC95q3bytYIdrn8fUth7P6bsbh/1s3qvYLWmNF3fpEAoftosQ9c/
OWpQatLciXl30sU7djn1A/UH0TYPH1i8DNefC+Gl6sae8sfrOZE69uk+uYNY
dyS2CeU2xYlYtydGvX4VNpFYtyHK3N6QvF3IHDJdbqXjGfTJhJ8bOT7ypRbI
ZuTw7TU+GgbIRsRIsbUgVQtZmxi7JWoXqCKzWH7C5B/7VWgdzEsKeSn080ZQ
ZVYuN7qBXh8ei5YFmwTQ/hC5OOHCEH0eDgQMHXgvc4XeP7SoHsq700SfD3ji
iqHVLPSDI2RWdETUI0/4ec5h+fN17+j3Bx0ypVVTmjHvCrdvvh1Ma/vPz28y
xwy+7fnPz9K3/a+OzMbrecLkhmeFIg/0lRf8JeXVLof+mfDz77855ncR9JEv
tFw8t8DiCub9IPNe8gbhN5j3h+Il4rKSOMwHQJJOsUNPFuYDYXMoP6/hB8wH
gan5J62cd5gPhqdZab2J6K8JPx945uAhNkQfcWFqR+YsX8qhMJ/36JPtZ+in
UDhtxx7wVUA/7YGF7RtCc2ain3gQMnvm0kM66Cce7K7Zb8e2Rj+FwY2F3Gqp
fdg/HL5U6frq+iX0Yzj8ucFSGPEU+/PBLiv7qc177M+HHNbL5qO6Q9TPCweT
flrlOkT9PLZvnNt6aIj62Xvo3va+m0PUzxu/O3dG0I5+jIJW29GDIlkx9bNB
5YuVUV+IqZ/ba6YFLrESUz+nWI2qJjqJqZ/PVV+OlOGKqZ9TEqQrRPli6mfR
eymHDLGY+vlGZGIkT2+Y+nnn4YXpSpbD1M9DRQ3mOvbD1M+TxnermvGGqZ/b
L7Zd67+KdQF0HQhgx4mGqZ+nKwyfmqU0Qv08pnnc9YzhCPWzynXbISXfEern
RDNN1UD9TurnWYV1LbYWndTPBzt/qVLa1En9/KP2cM5lvU7q55lmV053GnZS
P2c3pjz8M6GT+nnOh7DXaqJO6udqPa+lIu0u6uf1gccPzDBE5hL9ioTJrsb4
/h5CEp2e587Yju/rwYQ0Hh4NiMP38yDSvWvk18V5mA8kQj3jp+PIE35Ou7d9
27Q0zPuT5vV7StSxPuHnht2FMrfuYt6X1Gi0LlJ/hXkfwn5gLzqmiPPIi9yf
uivJmoPv757Evap37qREfH/fSRLq8349XIPzzZ147/zp2TsFnFeuRK3dWzt5
Mc4fF5LR+l6vQx3rTmRdQspxSzmsO5LvZ5ewt9J5Z08yfpa+n5uIdRsSv9l7
6w/yOI84JKIoS83lILIFeX7K3PJUE7IZsS/jxBTXIBuROOXrmaxgZG1SOrn4
2fOpyCzWkgw/wdpO7KcNU7fqa8X0IhuBvuqTpTEdyGYQm6374lolsgWMKx5Z
PXoKmQMe58Tz0gT0/kH+7BE7Xgh9Pvgt+0lZnQN9frjxZ43Gky/p9wOfk67e
Rxfo9wczzrl4bllE9yew50lU5bsMun8Bp91uEQZtdH8DZ6cs99StpPsf+EYq
dF2PIc5vLzg6MLfI/y7dP8EMtkeV/2u6vwKrjL77O47R+Q7N8zfuu6GP89sf
DpYWvK7n43wOgNXsNU0pJ/uonxV0yk/W3sB5HQRd58sVo8owHwx5yddHPISY
DwEH7cwyaw7muXBLpDJOfJBDYZ7JzegPLX3Uz60+8rWKdH+wB9Rvf+BkRPRT
P88V1r3LOoHv6zyI1j/7zYID/dTPSak/N1kE4nwLB3arl85p737q5/7ld9uL
onHe8cFgxrWeitP91M9jNqPpzgXYPwJyzxwtjTuL/SNBPv3iAkXcX0z4OXWb
tejRVey/F4z6X3pb1mH/KFAsKR93H8P+UaDpffNushLOu2ho0LgqasF5O+Hn
tYFBReZqOP9iwIOzQHUH8oSfVzlrzo5WwHkYC/MXhth54/yf8PMbZ9n8SGmc
r3EQmPygdM5nuH+Ig7tS9x3Vl2P/eNixMS97+jrsHw8rinnz5NZjXQBxjTsr
H2B9ws/WYqsj7YCfF4DVi9XXF24ZoH72Xr3Y4w8Luj+RnG9Izjck5xuS8w3q
Z8n5huR8Q3K+ITnfYO5fcr4hOd+QnG9IzjeonyXnG5LzDcn5huR849/+/7/n
G38D/po1NQ==
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0Oc6FQAAANB7L6GUd+iV/K0oKim5Dalo0CBaaO9JRWnRLhqKJEWlISoN
bdohOd/nx3mBMzYpHJ8eCgQCQaqo5gxnOcd5LnCRS1zmCjXUcpVrXOcGddzk
FvU0cJtG7tDEXZq5x31aaOUBD3lEG495wlOe0c5zOujkBS95RRevecNb3tHN
ez7wkU985gtf6aGXb3znBz/5xW/+8Jc++hngH4P8DwynBQkRQSQjiCKaGEYy
ilhGM4a44PD1aU5xkhMcp5JjHKWCco5wmEOUUcpBDrCffexlD7vZxU52sJ1t
bGULm9nERjZQQjFFrGcda1nDagopYBX55LGSFSxnGbnksJQlLGYR2WSxkAXM
J5N5ZDCXOcxmFmHSmUkaM5hOKtNIYSpTmEwySUxiIokkMIHxjGMIxflyYw==

          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
        LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 
         18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
         35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 
         52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 
         69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 
         86, 87, 88, 89, 90}]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
        LineBox[{91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 
         105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118,
          119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 
         132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145,
          146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 
         159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172,
          173, 174, 175, 176, 177, 178, 179, 180}]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwN0GciggEAANAvu8QdXMnPfjoAp7MSaVnJVplF9qwUMuL9eBd4YxNT45Oh
IAhiTDPDLHPME2eBBIsskWSZFGkyZMmxwiprrLNBnk0KbLHNDrvssc8BhxQp
UeaIY0445YxzKlS54JIaV1xzwy133PPAI08888IrdRo0eaNFm3c++KTDF9/8
8EuXPwJpIXropY9+BhhkiDARhokywij/w5VCZA==
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-250., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {250., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {500., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {750., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-500., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-450., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-400., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-350., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-300., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-200., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-150., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-100., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-50., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {50., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {100., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {150., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {200., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {300., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {350., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {400., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {450., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {550., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {600., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {650., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {700., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {800., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {850., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {900., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {950., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1000., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.823090907343609*^9, 3.8260971158859687`*^9, 3.826097150080276*^9, 
   3.826097330293825*^9, 3.826097477346693*^9, 3.8260975134017477`*^9, 
   3.826097605748675*^9, {3.826097637701518*^9, 3.826097686999531*^9}, 
   3.8307589984157023`*^9, 3.830759110905706*^9, 3.830759166689027*^9, 
   3.8307593379960313`*^9, 3.8307593719131784`*^9, 3.831883052981974*^9, 
   3.831883254606523*^9, {3.8319041768892355`*^9, 3.8319041979869556`*^9}, 
   3.832059266706685*^9, 3.832059321060723*^9, 3.832321390785267*^9, 
   3.834734367631693*^9, {3.834734844287501*^9, 3.8347348836303387`*^9}, 
   3.8347349941161504`*^9, {3.834738282894802*^9, 3.834738308181322*^9}},
 CellLabel->
  "Out[2108]=",ExpressionUUID->"bbce8653-92c4-4815-b5a8-b1f3978ee28b"],

Cell[BoxData["\<\"deltaWidth-vs-time-200mM.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.823090907343609*^9, 3.8260971158859687`*^9, 3.826097150080276*^9, 
   3.826097330293825*^9, 3.826097477346693*^9, 3.8260975134017477`*^9, 
   3.826097605748675*^9, {3.826097637701518*^9, 3.826097686999531*^9}, 
   3.8307589984157023`*^9, 3.830759110905706*^9, 3.830759166689027*^9, 
   3.8307593379960313`*^9, 3.8307593719131784`*^9, 3.831883052981974*^9, 
   3.831883254606523*^9, {3.8319041768892355`*^9, 3.8319041979869556`*^9}, 
   3.832059266706685*^9, 3.832059321060723*^9, 3.832321390785267*^9, 
   3.834734367631693*^9, {3.834734844287501*^9, 3.8347348836303387`*^9}, 
   3.8347349941161504`*^9, {3.834738282894802*^9, 3.834738308433655*^9}},
 CellLabel->
  "Out[2109]=",ExpressionUUID->"571ccf8b-4a62-4c86-a23e-d33fd306d7b0"],

Cell[BoxData["\<\"deltaLength-vs-time-200mM.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.823090907343609*^9, 3.8260971158859687`*^9, 3.826097150080276*^9, 
   3.826097330293825*^9, 3.826097477346693*^9, 3.8260975134017477`*^9, 
   3.826097605748675*^9, {3.826097637701518*^9, 3.826097686999531*^9}, 
   3.8307589984157023`*^9, 3.830759110905706*^9, 3.830759166689027*^9, 
   3.8307593379960313`*^9, 3.8307593719131784`*^9, 3.831883052981974*^9, 
   3.831883254606523*^9, {3.8319041768892355`*^9, 3.8319041979869556`*^9}, 
   3.832059266706685*^9, 3.832059321060723*^9, 3.832321390785267*^9, 
   3.834734367631693*^9, {3.834734844287501*^9, 3.8347348836303387`*^9}, 
   3.8347349941161504`*^9, {3.834738282894802*^9, 3.8347383086531973`*^9}},
 CellLabel->
  "Out[2110]=",ExpressionUUID->"231e3e80-f7d4-4742-877e-5c6d5b3d3f29"],

Cell[BoxData["\<\"length-vs-time-200mM.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.823090907343609*^9, 3.8260971158859687`*^9, 3.826097150080276*^9, 
   3.826097330293825*^9, 3.826097477346693*^9, 3.8260975134017477`*^9, 
   3.826097605748675*^9, {3.826097637701518*^9, 3.826097686999531*^9}, 
   3.8307589984157023`*^9, 3.830759110905706*^9, 3.830759166689027*^9, 
   3.8307593379960313`*^9, 3.8307593719131784`*^9, 3.831883052981974*^9, 
   3.831883254606523*^9, {3.8319041768892355`*^9, 3.8319041979869556`*^9}, 
   3.832059266706685*^9, 3.832059321060723*^9, 3.832321390785267*^9, 
   3.834734367631693*^9, {3.834734844287501*^9, 3.8347348836303387`*^9}, 
   3.8347349941161504`*^9, {3.834738282894802*^9, 3.834738308848504*^9}},
 CellLabel->
  "Out[2111]=",ExpressionUUID->"c301b3e7-c8c4-4a02-a7ba-295a175ca671"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["R0"], "Input",
 CellChangeTimes->{{3.8234143219501867`*^9, 3.8234143221709447`*^9}},
 CellLabel->"In[66]:=",ExpressionUUID->"ff5b49b5-2064-4279-9743-19542cb3f31b"],

Cell[BoxData["0.00047189255036864813`"], "Output",
 CellChangeTimes->{3.823414322920725*^9},
 CellLabel->"Out[66]=",ExpressionUUID->"a3273760-3786-4dfa-a921-f9a77c5f11ef"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp3", "=", " ", 
   RowBox[{"Show", "[", 
    RowBox[{
     RowBox[{"\[Delta]plotStoredLen", "[", " ", 
      RowBox[{
      "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
       "\[Epsilon]", ",", 
       RowBox[{"{", 
        RowBox[{"Black", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
      "]"}], ",", 
     RowBox[{"\[Delta]plotStoredLen", "[", " ", 
      RowBox[{
       RowBox[{"-", "1"}], ",", " ", "0", ",", " ", "0", ",", " ", 
       "\[Epsilon]", ",", 
       RowBox[{"{", 
        RowBox[{"Purple", ",", " ", "Dashed", ",", " ", "Thick"}], "}"}]}], 
      "]"}], ",", "\[Delta]lengthConfidence", ",", "pnostored2", ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaLength-vs-time-400mM.pdf\>\"", ",", "ppp3"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8307590116675344`*^9, 3.830759022703295*^9}, 
   3.8307591040697575`*^9, 3.830759178976604*^9, 3.830759301742095*^9, {
   3.8317075037288895`*^9, 3.8317075158239417`*^9}, 3.8317083441350155`*^9, 
   3.831796738718887*^9, 3.831796774221017*^9, {3.831796839153262*^9, 
   3.8317968403775935`*^9}},
 CellLabel->
  "In[838]:=",ExpressionUUID->"3449f853-4895-418b-be53-374a4bb7f016"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[Large], Opacity[1.], Dashing[{Small, Small}], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwVznk81Hkcx3Fa7CMhtesqhJ0epaRRirHpky6Ro6UHs+tB7m7R2kqysxNF
iQ6R0OYoSVlHExk1H4OZ+Tl3HNHkmmH45oiox8Mkau0f78fr8fzvbRp4yiNk
kZKSkuvC/u9svnrItq/XwJr7NaVdj4Puy+bbkiOTIMi0+q9ZIw4+iJ7cIRtN
gkBhg7IJjYOuBzoML3clw7HxUYdQOgfFc26jh5k3QI3B5Pbv4yAtXz+31OoW
vL+ZoRofxcFGxZNle+SpsEEzP7hQwkGDv9s+HHe6B3IWq9w/9Tku6vipYsXj
fAgXj+lE61cg6+RpiFn9DxiFc4znj73A6bhCUxqvDMLUrBO08ipRUROSsray
HHxdF1uby7i4c8nYyPpwLlROVYoDFFXov8uO3nKGBw+GrlBOOq8wimf+m8cW
PjT/4B59xZCHwf6ZWvaatZBv+ictRQWRMTtlN6MhgKfawomsaUT63SJJyagQ
wHp35tXAapTZut1RQQp6nWw8s+uq8YK4vWlNVQM8oZskNpnzkXGSF+mc2gTt
4vF3+bF8lCon3952pwXCTngmn5fyMXt/zlG5oxiu+8s3MW1qUKZvuXPd5laY
qw81eRNXg3qBRZ3em9ogxUdw3/d1DfZtOES7ZNIOqrOTyb8b1WLGH99ZZph1
gNomjwNRR2rxmf0Kx7lVr0E9IYS+vbgWfROCDPw0OsFD3nxMNlGLc273Hz3S
6ILWb2nt56zq0CJdc/LDly64f08rKOlkHVYGTOyJH34DRZUBfTn5dfjzIz5T
dUgC46FmrMcDdeh2SkSLbXsLqzu8Gr43EKDXM3z6rr0b2JcUnH0eAqw6u253
prgH6o5EW48nCLCUJ7rt+rIXym/42t7mCjCL7Z1DqvrAc6NVwYpJAeqLDA6z
C/uhLLi46LOxEM/tXWNs7SyFjxEuZQMuQjxEuKEr66XwJJt/Ki9GiMn1JPEi
yGDW8tYZeqEQX4xoXu9FGeTeFDrGS4S4bn9z2AubAZBMlzjIVUTYOL6nk1E0
AIHeJ549thRhaFPFymKLQfAxw366jwid39fYP8gbBFPtKcbSOBGudRHZJ9Hk
oCUucMwrFuGWsTiBYZ4cZmZWd/MkIrza2G1uYTAEpRNbAyKVKJSMrD+x8e4Q
ODNe/tJpTmGEk05imfYw7KI+safdKbQZqbDquTQMAkMN265IChVCz/LPKgSK
3EoL/bIoVB5O0LsTTUDefNbj32oKsy6qVxXEEMhcY6cbwafQdtU1Py6LgGJp
U+vyGgrDmdcf9sYSUDcLoXvVUihtSN1Mu0bg14CMxB4BhbziXPfSLAKfZtlV
pIHC81Ev4xtfEeBpNGooOijU1d2+vhcJPEwvbk5/TWFZGbZM8AkE+qVfZnRS
ODJWo7NcSEBoESM930Uh068+j9lC4Oso33peQuHWXZ041EfgcmaBv1I/hW39
3kEzUgKNe9NysxccdkGitniQAIud27NDSuHD5z2uFoRAup0Rgy2j8Me1g92n
Jwkcaq1PUZZTWFIXzIqbIjCk+TYtZ8EuAcNmaR8X/qno3nIYojA2Y+Ro5QwB
+3K9CPYwhcY2xzUbPxMQVUkPmhIKue3jJT1fCExr99D5C/YKDzs4MU9A32eJ
asA7Cqc1Psx8+0bgJoS3Ko1Q+B+Io6sA
        "]]},
      Annotation[#, "Charting`Private`Tag$176598#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0.5, 0, 0.5], Thickness[Large], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwViXk41HkcgJXa3doZ1W4NkyZb2ZwdSo0jfZTUUtTSoZ5NkasnjKzapNY6
KuXocnTYItd2kGMcM8N8zPwWoWYnxMrRuOZrKCMVw1Br/3if93mfd5knx8V7
poaGhtM0/3sie673ps9x4NWmE9GozcXdC6YaEkLi4V5TrTqLycXMMKVt10A8
jOav9z+jy0WnPU1LLrYkAGfvPmOWHhelk84Dvm7XIGK7VNdnJRf1s3UeFJjd
AMOWzMZP5lysVz1eYN+bBNGPniXTXLjIvNcwfMLhT3D3tA/UjuPizKYVpYsf
ZoP2vNgClznFGB4QDOd/zIMH3UUzws8X40j0o2X6wkKosqioyhsqRpXY+6Yh
rwQu3xSszPUrwa3fDipMgviQkphzqb61BI/aWa2VnBbCKc3Y/mTXUgwVGh1y
2SCCw7ZpeofrStHr6F0tGzoFkQZrHIItytBy4r3VGK0KtvKMmbSnZbj2dm5r
/kA1XNxyS0Vj8bDLwjllFj6DhjYrpUUMD89JG58bCOrAKVRBxGoeWgYIQxyT
nsPUEr6tzIePshkJiZtSJMCZ8Gi2fs3HtJ3px3t3SEGwsIPNdxRgl87qrcbr
X8IKmuq0qlCA2p65zQfWNUCGQ1+p84py7Fx1RP/CD43wfp5tdlhsOd45pbn6
zvImuBJAK0tXl2ORzeIdk3qvIIbT6qtxvAIPxxxjutOa4RxjM91DUoGTzvdz
cmgtsCVGkp9kLUTTW3TlsLoF7DwNI7rThMjzGLK/JP8Xziav8kjURLTOEbnN
7muFJ7PVuaMBiM6cGv2ohtfg9LXR+G0p4v4ifNLf2AYmD2dZ+rEqUfCb8ba7
0nZw3nt51bqfK7FAWJPoVN4BFsoXLLOISkyNOJBOBJ3gbvQTrZ9biTo1TN+I
R29AoVVyprO3Es9sN1hq7iiDieGuzFvfi/AI4fvo1srA+6rr6Li9CBNqSWwk
dEE2g62TFyLCMgX9agd2QaLsWJQ6W4TGO18ElrG7QdayQ531SoT1b+2bLXO7
gZ248XeWphh9npfqPjXtgW/uwwDLXIyO78Q2mRk9wJifuS7BQ4yGu2ps4vV7
wbeTPhh6Q4wbBqOrlmT0wkm/GNM1YjFeqW8zMmX2wYaxTSa+Q2JsVZj4r7nd
B6QuzWfuUgpPOiyKLZwvh1S+o5aVI4VsRalZ+wU5xH5anL79FIWqateS8VkE
yONfBvMyKJwhj9FOCSNg3/6MUyyhMDVyruCv8wRkctZIyD8UWujFufPDCRx0
0uOYSykMcrua1RFFYG21wcGilxTK6pLW68cR4Fx3fZffRKHw6YPdBakEvDrZ
jMevKTwbWn6pvmL6N9qcuCunkMHYbNKBBK6x/OwOEQoLC1EyJCLQccGOweyn
UDEoXvRdNQEHB60nyQoK3dxrM9wkBHyrxlKuv6Vwo10z9nUSUHRbn7w4QmHD
mwPHxmQEIvovf9z2gcLAc61fzekh4B8QG6z5kcKs4nYnU0LgSvxD9z8+UbjQ
sKctWEmgf8/+sVAVhfl/e4VHvydgGLZtj8U4hbs85MuTPxDYvY9kjE531B3F
cd4YgfSCnda/qilcyj5Brx8noAynh5tNUshvfJvfriYQlBxdoZzu/UGBe4em
CGzULRjNnaJwhDY89uULARfzm8b+nyn8D8yrotc=
        "]]},
      Annotation[#, "Charting`Private`Tag$177845#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJzt2fk/Vdv7AHCNMpR0kaJQUm5KIW7CQjQoV0RJ3SglpRAyp6IkSoaQeSqZ
HfNUFuccZTjOOeZ5iiSSTJVS99v39dn7+fz0+Q+OX7zOa5+z91rredZe79fz
SJ23M7q4mIuLy38JF9f//29NWlJwr5SKva7N7shrcUGi2amewxupOPpmrf/U
RVd0plRfd//dKmy71FztZYEniqdPr0z6UIl38sqm6UjeQkOsiDYug0qcave+
RXGxFzpa5KaBrTHmtWBUW4+6o2YGjeWpWIFLD/4ZwhXmhMyGVp5T/fUST7Bz
ruyyu4oG509Of60px5c7jnWkWNsi69VJPoWhZVipiWU8Uu+MJmU+CjmeLcWm
ubylrlOeyFldOWWXbAnWEj7ct+mhF1o4flvl00wR/u7wMLx4zy3kc6WuJqOi
EHctknwz8MctxHtHyOzygwJc9Cj46YtQDxQccXZcxjgfa9ys3ndM4AYx3zz8
keeJTebLa8T8KDj14D7XZE1rYj45WOqLlEaIzRVi/Jn4zNStK1nG5HjTMZf+
SdN4QwdifKlYofzVwmFud2I8z3Fd4PastO13iOcn43PMubb0P3yI5yVgX887
6882+hD3j8HDevMG69h3ifs9xT+TYzPXvb5L/D4U1yxs/2v6iTfx/YfYpLki
K6nOi7jug4/Rm+dP6zgRnx3xfT1/Snb0ZcxF/FEDYm08Z8IxcR35eiwLGJlJ
JT77oL12/ULfK3MxcX/k7y7j1ry2gLgeivxmewsHlxdiYnzoapCS7rnuQuL7
MShdW19CIbAIE/NDclXZA8bixcTvk5FLxfX2SnYxJtYH8Y3wByy6UELcLxVd
l7ozlHe7BBPri5aK+860+ZcQ989Evcu/tj7mL8VEfFDwDcMXy5eXEc+jIHl3
07io9eWYiC8amitfl9RWTjw/H0mJPrE8KvgSE/mBfFk/7hSIvSTGU4ii93aG
vbR/iYn8QnVzQVHLfrwkxleCvCiz7SWnX2EiPxHju8qUdvArYrxl6J+dq9pY
Kyswkd/IcT49QEQSE+N/iQQPXEjeYFKJif2B+F+sZvIsqSLmg5HsmF7B9Jkq
TOwvFKM0jYSvVRHzq0QP9ty+1HC5ChP7EyW+kU+R0a8i5ktFFY1WfMN8VZjY
30juzKq1t5oqifnTkK/06R+3+yvx3w9LN9V8oqF1PHKsGJ4qYj3o6MhG1qyh
chV+c8MumFe6Gl0s/RK0ya+KWJ9q1PFrSmd8KRVrmm/h0j/1GvmZffIqMKcS
6/Ua8fV94J96TMWlh7ptHwe+QYFjalrJDVRi/WrQn5cZmCpJwwoKwb2NtBrU
dN5C20uDRqxnLTLXpp4t5afhDLGDR4Xma1Gn8tHFyTQqsb516MyqVYUBT6lY
etnPshM761H+TP0SPn8qsd71KIx5ZvVYOBXHfsqTjbRkIFHtsXibEiqx/gzE
fSx1hROTikU6rJ92P21AsdNbSntYVCIeTDR6Eo2rDVHx46qN3BuZTPREM2yZ
qjSNiA8LMYKsJ/MCafiuyZgqZREbLdL0/lL0gUbEi40aH7tkqXXSsJaeroNh
DBvt20MVeXSDRsSPjSx9TtsratPwT42EtGnlRlS6WXxby0UaEc9GxChwTVNJ
oOEyxR8DoY2NSPlqlEtsP42IbxOS2GwttHIvHTtvOyG652oTylb/47LPXToR
7yZkPDGVwWdBx4obcg3aljcjyQVdgVvlNCL+zSicbu3GEKDhz4L8910Sm5HD
iW7HrFYqkQ/N6FOEh+v0YhrOXH6pQlStBaVsCNm62IhG5EcLUlVlppoW0fDl
H1VzpW0tqFhHc6ZsK53Il1ZEN9liQTGl4y2fxXecvt6K+G1kI2v/ohP504pO
h86U7F5Ex2+HXS4s8LUhpqpXecYbGpFPbciuZTK004eG4zqbomNT2tDCumqN
bmcakV9tKKon294wioZPM3c0a2i1IweThjuDyTQi39pRg4dQ11kvGl5L8+Md
6G5Hb+dTDo6a04j860Btm0OpFXo03FI8pHXHuQMZVQ5yHVEi87EDea1trnbU
peGgTA23TYKdaP+qe2rvPMn87ETey7nervz9WT8xkkLL6ERCDpaBG3aR+dqJ
pNeofDaQoWGe8Nn3Fw50IdnUJ80nfo/3P/nbhUIcw79f3kPHr/0NJJYPdiG9
VJ/OW8/oRD53o5olJ1j01t/rdSv9xAuPblQwX6C6LY9O5Hc3klV21u53p2Pk
tCzwkEgPyg3OyRf9ff0/+d6D3Ma6rpsZV+MFa4vqD5QeNGc3GyLVXE3kfw/q
NTaR/xRdjUv+KV/wP9KLJJ8+NBpn0on90Ivad9zsLFKi4xtGIkpyI71In6cu
Xmw/ndgffchZy2Pksjkd7z543abhdh864Lpzo30nndgvfcj7ZI9sR/Vr/Gkf
I8lWrB9ZaSU6zarVEvunH6WLiS8X/FaL03dt7RIo6kdCWno8D47UEvtpAM1L
vuWlaNXi/DVVfqbbBtBMRsysm3gdsb8GkHX1xKOjcXV4zSNb6bQbA2i3G0vy
yrU6Yr8NoLMfz09boTpszy1eOU8dQHE9vBfrS+uI/TeAzArPp235Xo+Zd2pP
660eRAUZGzdv8G0g9uMginsrQZ/3YmK5BeevUf8MoivLP4e8CWUS+3MQJZye
20LbzcQBztKh4+mDyG/dDpG9e5nEfh1EkUfMthqWMvGHz4071b4Nos/JsbQU
Hhb5PsZ2WySn42VLwVtRUhvFLZ+Vgre2UyZNwsJLwFvjmmuNZWWLwVsbJNf/
cE4sAm/xrdwT1ZJaCN46vsl2OsssD7y1P2+l0/GJTPCWgdmWFR7vMsBbrNzZ
b1U1FPDWRC7NysQsH7w11Z65/suSAvBWstKLT8J9+eCtoXGpvvGofPCW+hKr
UeNt+eAtqfobP9wi88Bb/S5GQgt/5oG3Oj7dF5yoyQVvjR8zPI3fUsBbx0Je
OXY8zwZvpQ5LqC2NzwZvBW5QqM+/lwfe+vr3St7x5ELw1updruUFqBC8FcKV
WlOwIx+8xXftvGy8Th54a1qAHUfbkwfe+jjM43C5Ohe8lbxr4pyQAwW8NZp6
m8rYmQHeSpQfLszVS0CktzYX3d8tsMSKvI4CRTTWdL4IB2957iv7mXg1Abw1
nuW5vUc+AbwVxPLT8VNKAG+d0rVYOVGUAN4q1cQGQpax4K2dKt6jDeWR4C36
EsqUze1o8NZ0kIntXFI4eKuQW+4dI/cCeCsgyr9XNDaUXH90U/mCWUxuNBkf
ZNn39H24ahgZPyRoqKveWX2PjC/CMu9b7mi7kPFHLrEB7yNDLpL5gSxfWehq
3/QAbyXcTBoR5I0Ab1WGnFjDbR0H3jq7x1Ah1SIMvGVgc235L4YPeOtaQeAr
r63+4C3xP2QiS93jwVvsPJcC5ZEM8JbYaMJl1+154K0+OYNMBak88NZy65Aa
ka2Z4K2xTEGTvnXPwVt1j8fFL3Ylg7cYA1W9BonPwFt+H/L1gj2eg7deH1J1
a59IBW9dVNTAr4ZSwVv8W63lcXYSeOvGV4mqgX3R4K2Rph+o4WMseGsFY9Hz
3o+J4K0NzIvNV4Weg7csLoUnci9kgLdm1Kp+eprlgbd0Mg+lvziQD94yHvCV
npSigLdEEwuWKqlngLemt5t3KWzJAm+dPcQv/mMhG7wVNB985G/zdPCWRBq/
uGNzMnhLsWpDBSMiEbzVpruRCy8kgrditnwL/CieBN6SDPIyNRd+Bt6y25a2
XYKRAd5qNX1/Yy4lD7w1ayTzyflCPnhLYayGj3EqG7wlFrt1VPvNM/CWgDwj
IEImAbxF2/2kUMw7HrwllSiuVamfDN7yeb3U5GNbBnjL517C3euKeeAtkVJ5
aef9eeAt30sieN/tTPBWiJWTrgblGXjLTGWpun5fAngrf0zafl9jHHgrd/Lw
C7ljieCtxz2Grh7fUsFbdQm9w7xMCnjLM2jlj6AlueAt3jOqRZK/40F6q6zB
35H6Mwm8Nf9OimkXGgfeOrPtG/dcYiR467n6MZkvvmHgrRX2Y9eQ6BPwVhfb
Urds8RPwFv+hkZ+KvUHgre6GKo2Olz7grXO1E9OJ7q7graj1F3azfL3BW3Hv
rVw8nvqBt0TGy6X9DnmDtzSbeYWLV7mBt7qGUk44GD4Abwn3Bo5mfY8Cb70/
YlfqtDoJvLXmr0e/tngmgbduHbs5YqCYDN5KEI6kXbJIAm/9Yp+9oBYdAd4y
4r+pvNjCB7zFOpnRHdniAd7S9JSqtn/gC946uXkyq/TaQ/CWP3Ngp1G1N3hr
a9d584NGNoj01orz6p/vj/gj0lvaRy06LQb9EektlfYQ/NrXH5HeOn/jpYJa
ZgAivTXTPrT6Uv8ZRHprqrviZoVYCHgrUUaM+x+7aPBWv3u8FK0wCry1dvgd
/aRBFHhrccJCnObNCPBWJndZttC1B+CtRLc7Hj6nliLSW/qO6+v8FBwQ6S2B
RzM7svQswFtj7j21KilB4K066dWN+dRY8NbAYWuWsX0CeCvJQ8VIPS8KvGWL
VVr5dZ+At2bNU59uMwoDb50/KucofzUCvOU9yFV92iMIvIUjzmXyyBeR72s8
MkUfexZRRL7PcSzLkvnz3wLyfY+fSUxXSOrmk+cB3qZw8/auQTgvMM8djztv
juSR5wkuzjOsFAvKIc8bLFNSbHXNPI08j7AmEtthJZpKnld4tV3hGf++DPI8
w37FOvFHXXPI8w7rFQ5VXFegkOch9j+a8fXVpxzyvMSG7R7+/fY5ZP0CCyS/
GMM2OWR9A88of38vMZlD1j+wpkqk/m4DClkfwWdUl3a91aGQ9RMsaNlny++a
TdZXsPSTa6+1u9NJD2BrQV6rGN500gvYkKG0NuxBNukJfMCGGsd1Kpf0BnZ5
Wbaszp18XgIe0Ba4W+aQSXoFP1eqSd8tRd7vKX6vb3jJfUU66R3sVP/zzSnN
dNJD2CHziujt3Wmkl36/R/johRtSyPoVnnKdC9jqlQz1LWnuorNZx1OhvvV2
7saBz4fzwVv5lYN/Jh8pB28JGBy07eGrBG89ryx/hucrwVsit3oWpWRVgbdC
zUzCWINU8NYB97jN3cM08Na/r/adyregg7cmFLV7kx5Xg7eMrn/MGd9RA94y
sVMRcP9VB/WtrEf7z9G8GVDfOhusc/dUFgPqW1osOYVvzgyob62Tt9xWFMSA
+lbEAYX68EsMqG9F17Lt6lA9eGvkw9JT7o9rwVsOmw+ULN1ZC95qfpDemJxT
B95aK9242tGYAd4S3r9n7KQNA7y1WsXXFO+qB2/Zx6dHZlFqwVu8Xccunfxc
A94aUrddczStFrylwsINF9j14K22f8v3bn7UAN4yyJBeVpDcAN46sv0fCadJ
Bnjr6yu77nUHGOCtrqJLog996sFbpvf8dup11YO3WhToG2YrG8BbXY61PLWp
LPBWhta0/UYZNniLW+rvOtFNbPBW0KHvw6+7WOAtnX1CUToxTPBWt2IJ10Gh
BvCWt11MTmonA7z1REhru8cKJnjriq7NkvliJnjrleHd/Lr3DeCtY61PNNuN
G8Bb1RtbH3GFM8Fbs5nWaj/V2eCtgYhhe/doNnhrSHZTp04QG7yldNziVHw8
G7wVbHtvfWAiG7xVYTPDIy/MBm89bV6tMHOLCd7a9qV7SJ2LCd4akw/584Ux
C7xV+fjEH0fS2OCtttgk5UXnGsFblOsSn4RTG8Fbf3Q427270QjeMvB/80C+
gg3eiv6rTeDvSRZ4S/xXve6ZOBZ4S17eMsJlOxu8RVcpo9Dd2OAtX5YqY6iU
Dd7af9itqk+4EbyV058asrC1EbyV9ou293AEG7zFWyroZD/KAm89nzonxVjL
Bm89lDjv/e4jG7yVvNf7iltiI3jLTjymwqmvEbz1wdB+f9mHRvCWlIhFj83G
JvBW5B62W4NpE3jLUtSlt9CyCbx1dK1yVIB9E3jLYZxybxG1CbyVe/WNasto
E3jLK/7EfaGEJvCW1sDasZzbTeCt8Z3mPxLGmsBbSt0Zy5rXNoO35lSzfwRf
bAJvHZfOFnzu3AjeyqywUjtk2gjeCmbQVd+9awRvqf7K7xHWaAJvCQ2+bSt+
0ATeesZv5+T0VzN467U+dVd/fzN4y2hY8+hr7RbwVkRf7viqhBbwVveXu9X5
ky3gLeu/+2Jpy1rBWy3/HBl8/Psz6a33ov+KjvO1Qn0rhy8sRWZ9K9S3dnW4
iCcotkJ96/Np+r+NRa1Q3zLbNxFU/LYN6lsvjlc//EusA7ylcTl9j5hWB3jL
6vCudrmEdvBWMTU0sCymHbw1PZg59vxZB3hr+5zL6FBTJ3hL3WT8I79tF9S3
5E4ECO/264L6ls9cNq9yZBd4K3OCLked7AJvWaetHJlK6wZvWXYq/Dlp3wPe
ogQyXiWP9oC30voTTR0mev5b3wpNeigy3APeavbduitQuxe81R6mzz21qA9z
+omcfiKnn8jpJ3L6iZx+IqefyOkncvqJnH4ip5/I6Sdy+omcfiKnn8jpJ3L6
iZx+IqefyOkncvqJnH4ip5/I6Sdy+omcfiKnn8jpJ/6vfuL/AWsSGy0=
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl02O7EAYABeB7s20tL9ey22q5rZatbdm2F5bdvRn3ZtuuhWXbtl3v8/Th
PecPnJOqcdvKbcIEBAQEkk1kJwc/kZNc5CYPeclHfgpQkEIUpghFKcbP/EJx
SvArJSlFacpQlnKUpwK/8TsVqcQfVKYKValGdWpQk1rUpg51qUd9GtCQRjTm
T/7ib5rQlGY0pwUtaUVr2tCWdrSnAx3pRGe60JVudKcHPelFb/rQl370ZwAD
GcQ/DGYIQxnGvwxnBCMZxWjGMJZxjGcCE5nEZKYQRDBTmcZ0ZjCTWcxmDnOZ
RwihzGcBC1nEYpawlGUsZwUrWcVq1rCWdaxnAxvZxGa2sJVtbGcHO9nFbvaw
N/D7vrKShcxkIiMZ+JH0pCMtaUhNKlLyAylITjKSkoTEJCIhCYhPPOISh9jE
IiYxiE40ohKFyEQiIhEITzjCEobAwO/n+Kq+8JlPfOQD73nHW97wmle85AXP
ecZTnvCYRzzkAfe5x13ucJtb3OQG17nGVa5wmUtc5ALnOcdZznCaU5zkBMc5
xlGO8D+HOcRBDvAf+9nHXvawm13sZAfb2cZWtrCZTWxkA+tZx1rWsJpVrGQF
y1nGUpawmEUsZAHzCSWEecxlDrOZxUxmMJ1pTCWYIKbwDc8ToYY=
          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
        LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 
         18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 
         35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 
         52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 
         69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 
         86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 
         102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115,
          116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 
         129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142,
          143, 144, 145, 146, 147, 148, 149, 150, 151}]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwN0WciFQAAAOD3KKNCSUYqXkPJOIwjOADHMUIadlRkVYQyU2YKlRKFQjSk
Ur4f3wm+UH5hXkEwEAgUUUwJpVyhjHIquEol17jODW5SRTU11FJHPQ3copEm
bnOHuzTTwj1aaaOdDjq5zwMe0kU3j+ihlz4e84R+BhhkiGFGeMooz3jOGONM
MMkU07xghpe8YpY55nnNG96ywDves8gHlljmI59YYZU1PvOFdTbY5CtbbPON
7/zgJzv8Ypff/OEve/zjPwFRQcII5wAHiSCSKKI5xGGOEEMscRzlGPEcJ4ET
JJJEMimcJJVTnOYMaaQT4iznOM8FMrjIJTK5TBbZ5JDLPnOhWV8=
         "]]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwV0Oc6FQAAgOHjUlxBpIyQygyJE5VSOEU2IaspKqNdHLNCpZBSZkMS9+X1
432e7/cXGWoMNkQEAoEwB0QU0RwkhkMcJpY44kngCIkkkcxRUjjGcU6QShrp
ZJBJFifJJodcTpHHafIpIMgZCiniLOc4TzEXuEgJl7hMKWWUE+IKV6mgkmtU
UU0NtdRRz/6ERpq4TjMttHKDNtrpoJMubnKL29zhLvfo5j499PKAhzyij34G
GOQxT3jKM57zgpe84jVDDBNmhFHGGGeCSd7wlndMMc0M7/nAR2b5xGfmmGeB
LyzylW8s8Z0fLLPCKmuss8FPfvGbP2zyly3+sc1/dthlDyXgStg=
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0.5, 0], Thickness[Large], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVj3k01XkYh23TEdfWkaUcLXQIGWpKFG+UOtaikjGNJcqYopu0ZxDJjHWK
IZmKbJkUkmzdN3Rt97ru/f2Mnaz32732VBJlzB/P+Zznn885z4YTZ11PSklI
SDgt8/9+yZU7uftbHHjt8LhHq5fiQZWvVEJIPFhtWcgrWFeK2dem9gyK4+Fb
wLf0cL1SdDrUphXdkQAbDnRT+malyF90Fvu7J8FsIvn9V7dS1M3VyCo2vQ2f
zrfYP08uRc7nf1RsR1LA80cV++PKL1DzPjV92u5vgCm9Di2ZMpRq03m55nEu
eGxVOv5OphzDAoMhdNNTuOSlrXdYUIHvowo26LJKIJpBJmKjqvBz7ck7+hVl
QPxqzYsdXqGN/JjIkFkJJvl5xjGjLPTea2HCu8iCIQYn0sLuNV5hbfZw3V4D
HmtmREmqNejnfU/RUqEOyppOiLdza9D8y4zFHIMN5d7SoSbxtWhyt7CrSFwP
ffIuTRO76nBwp3OqDDZC9Kg1XB6qw+t8mqtX1QzSVwRgePsNmgeyQuxTuKBW
GPr1hSkbByQTknen8qDNY/GBfjcbHzpkBowc4IM/85bW/mv1OKhhbGOwTQC2
4v3j8woNqH6isP3YVgp8StjJFx43YP8WL92b62nQtUra5GvWiOkXpI3TN7aB
q8/RN+KWRnxuuebA4rp/QeoS+8N9zyb8OcZX05PRDioXw2tkh5tw0flBXh6j
A+TP9+vMnW1GozSFqemFDpj1pWIsZpqxwmfS9pawE5wNk8vFgRzclVfj/t1o
F7g5iJUYsxx0PtugG0l1Q9hTmeJTgVx0e45P3tE9kCPIcVGf5mLVJYN99/i9
MMusCboT1ILFrIZkp+o+qPOW3So73IIZEccySVU/pIkz17O9eKjRoOkfUfAW
OnlfznRSPLy8X0/7B/sBEJyu2Bxi04pepPLU2qYBeB2W+6djZSsmNJHYGzAI
rSvdJsJV+VguUkjsw0EwD75fMHOQjwYOLUHlZkPQGKG0azaaj5xx23bzwiH4
6CEXy6zm4ynuy7XPjIZBzbqbu/SRj/YTtZbZj4YhzP/J0CFDAeo7NljG646A
5lBB0FM/AW4fi2JrPRoBI5bGxowMAf7B6dlspDkKS/lrI0L4AuwSGZ75/u4o
CPfoxLrJUnjObnVsibIQfklpCzDbTaGZ6KVp700hrEI1bUEQhZ/rD5fNyxDg
bEtYOJdDoaQwRj31GgFF4d40404KM27IVeWHEnB1ac1W7qJw57o4z8owAlxJ
xcL3y850T8zpiyTw05aCorIeCgeaU7bpxhEojQ2PsnpLIetZ1sHiDAKUQ7WX
k5DCq1eqb3FeEWhX0Jvw/0ChmpqVYR8SiCmKCrb7SGFJCfImawjsZL6aNfhE
oWisdvWqegKJ1mzRxByF7p5Nj9x5BMZkXbLPL1C4Y287jvYv/ykzj/wmRSP1
9pjv3ACBonHVNC9pGoOud61YOUwgUJDfsUeGxpwXvU5GhEBcUZa99AoaVfWH
e4KnCJhkSUrErKSx6I1fWNQMgflMa50AORodfYQb/5olcPfhVRt7eRoj00UB
FXMEjqb0hjAUaNQ2O63AmScwKSsbM7HslfR4Ue8CAbeLpqk8RRrdmEFHJr8S
cNTyyHqmRON7xvTc0tJyj3nk4yRlGv8DErGfbw==
        "]]},
      Annotation[#, "Charting`Private`Tag$153726#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.014156776511059444`, -0.19461069323051253`},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.58, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.56, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.54, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.52, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.8307590246103954`*^9, 3.830759115561304*^9, 3.8307591795756335`*^9, 
   3.830759311426954*^9, 3.8307593428104734`*^9, 3.8307593753986597`*^9, {
   3.8317075049900618`*^9, 3.8317075167825165`*^9}, 3.831708344694384*^9, 
   3.831796808902957*^9, 3.8317968422960787`*^9},
 CellLabel->
  "Out[839]=",ExpressionUUID->"b72a04b2-256e-42ac-a6a2-c427bddac9d3"],

Cell[BoxData["\<\"deltaLength-vs-time-400mM.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.8307590246103954`*^9, 3.830759115561304*^9, 3.8307591795756335`*^9, 
   3.830759311426954*^9, 3.8307593428104734`*^9, 3.8307593753986597`*^9, {
   3.8317075049900618`*^9, 3.8317075167825165`*^9}, 3.831708344694384*^9, 
   3.831796808902957*^9, 3.831796842532205*^9},
 CellLabel->
  "Out[840]=",ExpressionUUID->"932b53c1-3e4b-46b7-8f02-ff97ce71f9fe"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{
  3.822659742922084*^9},ExpressionUUID->"195e7b56-6bc5-40f9-9dd1-\
cae42efac5a3"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"gRule", " ", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
     RowBox[{"g2", "\[Rule]", "5.9646572643958535`"}], ",", 
     RowBox[{"\[CapitalSigma]", "\[Rule]", "0.22596007807663557`"}]}], 
    "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Epsilon]z", " ", "=", " ", "0.055"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"g1", " ", "=", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", " ", 
   RowBox[{"g2", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", " ", 
   RowBox[{"\[CapitalSigma]", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]A0", "=", "0.0347"}], 
   RowBox[{"(*", 
    RowBox[{"filteredWidData", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}], "*)"}], ";", "  ", 
   RowBox[{"\[Delta]L0", " ", "=", "0.0347"}], 
   RowBox[{"(*", 
    RowBox[{"filteredLenData", "[", 
     RowBox[{"[", 
      RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}], "*)"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"timeSeries", " ", "=", " ", 
    RowBox[{"filteredLenData", "[", 
     RowBox[{"[", 
      RowBox[{
       RowBox[{"indexOfShock", ";;", "endIndex"}], ",", " ", "1"}], "]"}], 
     "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"zero", " ", "=", " ", "0.0000000000000000001"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"LenFun", "[", "t_", "]"}], " ", "=", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1", " ", "+", "  ", 
       RowBox[{
        RowBox[{"storedLengthFunction", "[", 
         RowBox[{
         "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
          "\[Epsilon]z"}], "]"}], "[", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"t", " ", "-", " ", 
           RowBox[{"time", "[", 
            RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}], 
        "]"}]}], "  ", ")"}], " ", 
     RowBox[{"Exp", "[", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"t", " ", "-", " ", 
         RowBox[{"time", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}], 
      " ", "]"}]}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"unPertLen", "[", "t_", "]"}], " ", "=", " ", 
    RowBox[{"Exp", "[", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"t", " ", "-", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}], " ",
      "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"bestFitData", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"timeSeries", ",", " ", 
       RowBox[{"LenFun", " ", "/@", " ", 
        RowBox[{"(", "timeSeries", ")"}]}]}], "}"}], "//", "Transpose"}]}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"unperturbedLength", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"timeSeries", ",", " ", 
       RowBox[{"unPertLen", " ", "/@", " ", "timeSeries"}]}], "}"}], "//", 
     "Transpose"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"filteredLSTD1", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}], ",", 
     RowBox[{"filteredLSTD2", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}], ",", 
     "bestFitData", ",", 
     RowBox[{"filteredLength", "[", 
      RowBox[{"[", 
       RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}], ",", " ", 
     "unperturbedLength"}], "}"}], ",", " ", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{
     "Pink", ",", " ", "Pink", ",", " ", "Blue", ",", " ", "Black", ",", " ", 
      "Yellow"}], "}"}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.8226504505722437`*^9, 3.822650587570216*^9}, {
   3.822650638731532*^9, 3.822650685337775*^9}, {3.822651751652624*^9, 
   3.822651764088847*^9}, {3.822651809715517*^9, 3.822651830625186*^9}, {
   3.822651882978142*^9, 3.822651888289459*^9}, {3.8226527777712092`*^9, 
   3.822652816866125*^9}, {3.8226529064269476`*^9, 3.8226529803211637`*^9}, {
   3.822653367675662*^9, 3.822653368663973*^9}, {3.8226534137783194`*^9, 
   3.822653420152958*^9}, {3.822653456121376*^9, 3.822653474817562*^9}, {
   3.8226535061698847`*^9, 3.8226535184680977`*^9}, {3.822653574362707*^9, 
   3.822653604584381*^9}, 3.8226559317346926`*^9, {3.8226599443693714`*^9, 
   3.822659950980683*^9}, {3.822660063982565*^9, 3.822660073782357*^9}, {
   3.8226603227096596`*^9, 3.8226603657276144`*^9}, {3.8226604946059494`*^9, 
   3.8226605176602745`*^9}, {3.8226605691845007`*^9, 3.822660571684819*^9}, {
   3.8226606381820965`*^9, 3.8226606781961727`*^9}, {3.8226607497268515`*^9, 
   3.822660780324221*^9}, {3.8226608213166194`*^9, 3.8226608777517257`*^9}, {
   3.8226609505051575`*^9, 3.8226609613491573`*^9}, {3.8226610028214827`*^9, 
   3.822661008996948*^9}, {3.822661043662241*^9, 3.822661063941146*^9}, 
   3.822661111222698*^9, {3.8226646252936316`*^9, 3.822664628351454*^9}, {
   3.823165904667133*^9, 
   3.823165928665455*^9}},ExpressionUUID->"4f7701de-ef74-4ce8-ad9d-\
b848ac09f5d3"],

Cell[BoxData[
 GraphicsBox[{{}, {{
     {RGBColor[1, 0.5, 0.5], PointSize[0.007333333333333334], 
      AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJw1z3tIU2EYBvDjrexijLws6I+0hSVdUKTCAvewUvojcmlFYOAwVhjZZKRL
07nr2c4mMRC7LMwplpZpaipWkjMkKhAHFUnmZVLJEGt65gWxzOQ9H7x8/Hg/
vocnLleVqQxmGCZldf7fa8d1HSkX2F1PxX7pmlGIS4aKt/4o8nghpO0t6so4
sq4Ivakvwxdk5FgN3vv2Xz2SR3ZroNmtf8RbyYobyOPNi2FNZKYYI2Ku9tVX
sqsY6kAPf5iZofwSOHsmij4JHi/BNvvmhx8nhfybmAh73rthWMgvRXfXz9mq
MSG/FD+cS0m2aSG/DKHdl5vnY+g/Rot1Q54WXw7ZpcXfoFxv+EMhvxzfP59p
mHIL+eUYaazfebxJ2Ovg7KuQGUxkhw5tCYEX7VrhvQ6W+Las6Wpyoh4nCgpr
h96QdXocla7E1UySPXoMVlf9YrfOUh8DzJ6snEAyucCAjRPOaKVgtwGx6ncr
GdvJIiPuy0NmlBFkhRESr6ygJpLcasS1mMh9XDyZMSF/wCgPOUmWm9ApUfUH
lZFdJpyNmjrf8ZjsN+GPLM1QNEiGGfLqB4OnFskOM2qYb8O39vDU3wzJrOXD
oWxyIoulsmXVKEfWsbjI92X+7iJ7WBy7W1+n85JjLRjNWLD61geovwVJr78c
LN5LdlvgHdh0JSGdLLKiMn1BzJ4jK6yo73+iCVORW1f3+tAeXwOZ4eBbDMq6
FyDLOXRqWI36wBz156CwS+6I0sh+DvyzIWn8aTJsCF7OF6eqyQ4bvI1jrf5m
8rgNU+a8EK2PnGjHloi529Gieepvx9IOR3ZdMtljR1RHBi9Szkv/AfJbPYM=

       "]]}, 
     {RGBColor[1, 0.5, 0.5], PointSize[0.007333333333333334], 
      AbsoluteThickness[1.6], PointBox[CompressedData["
1:eJw10GtI01EYBvC/GV1Em0homZepZRbBZkXroviEJmgWIysJsk1nCUZmktqm
zr9zc5u3zCxZlsxmlw+Ks6mltDUQQWjJwMqytJmEmagTJFEMKn33wuHlx/nw
nOeEpF8/c3kdwzBH/p3/e3X0N2Ha0GH/6DEbs2rkYY/uChv1a2bNjjx4nOSF
FM6S2Xzw/Gz7Cr+TuQUoaooYNlrI1gKscKoFi/fJ4lsQtSwE3WPJjBSehmph
bjZZL8WHJlvPUDIZMnT9eRdgO+fKl2GvdXp24KkrvxA+LRfSEnfRe7lFuGGT
WiZ1ZGsRzl+7mB/5jSwuhmEzPy3CQmbkULrlRM8cIOvlqJkPbM80u/JL4OMu
epM54covQbxuri/1tut/WHzhxhZ38ebWXMtCY2qdeJ9HdrAQuB8euVtH5pfC
K7y3brCLzJZi+kkvR9pDtpeiuarzt0hB5iqQvPNBT1ICOUeBl1NbV6wZZKsC
QUe7ZUujZO8yjGV4DnKOOalvGfxfLSXo8snGMgQqhiYf3SEzSsh4BmWoiixU
Ql3/diQui6xXwn0sPbxRQnYq4eSbx9tlZKgQ6WOced1IrlVh+fRiQ0or2aGC
/nGNSW4g88vh2fA8lPOQzJaj/lTS1EAb2V6Og86vkhNDZK4anBe9K5eWyTlq
BEu6zVXe89RfjU8BbVOjvmRvDaKyrrbHbCeLNRAlhPqlumzU4FBKsK/Mi8xo
wQ3LFkoYslCLHykbnxWsJ+u1yKrqN23bQXZqYXbrO+vPJ6MCqbHNTVuiybUV
2N+RG7TpONlRAflnsaXfdc+vRNJCfPU4yGwl4ocFnWGJZHslJILdop9x8zF/
AccWMTc=
       "]]}, 
     {RGBColor[0, 0, 1], PointSize[0.007333333333333334], AbsoluteThickness[
      1.6], PointBox[CompressedData["
1:eJw1z3tI0wEQB/AZkZrNJmEvpaaifyihpoauyC+VWYmhvRQxWZGWWm2Fb5f7
ufcm5NThIyJX+2OkaGb2dNBS0zRcI9CsIH6ZRiY5XyiS2EPPg+P4cAd353Ne
dCJ9DYfDifqX/+tyGHOgC2p+bnozEb1s5MJZI68VjJHZXKhtg6mC9Y4VM3n4
1uDRdTeIzM9Hb22HRRRPtuZjyj8uzCQiCwtQHXB8x95KMqcQD6wm6Z7HZGMh
smsCzxmGyCiCsKJn6OQimS3CoVcvnAS8SdpfDN1T77VFvmS+BDkpnbqxcLJV
AsfG6lBNLFl4A6eC39aeTiFzSsAduSNMvEI2lsAsZcKKGTKk0B+xdbyvIrNS
bG9otySZV/sMHP27+13byXoGFu8njT9sq/MMhtKTt84Ok0NKkW68bw+aX72/
FAUL18vL3aZWbC9FT5LKcyefzJdhZlt28KdwsliGgYU+s/Uo2SrD9PiH2Pdp
ZJ4cGbMFrHsOWSjHZnHo4TwtuUWO+qXcOJd6MkeBllFZd1cbOUGBpohhQ2Mf
2ajAKDNRaWHJkwqILrffnp8jQ4mDnuuqU7nT9L8ShmTuhXE/MqtEBlf+0yQg
h6iwxMv0UCWSGRUOXHz4uuIS2a5C09kNM91SMl+NNuar0r+GLFZD4rzpWlMz
2arGTd935rRuMk+DpZgRr6gvZKEGEY9iOvfNkVs0yNJV1WW6z9D/Wvz+o697
GUBO0CJwuMeyP5ps1MLFq3fxexJ5Uostu26lPBOToYPeretjq5as18HHbJMM
3iOzOsRLBDF+FnJIGX5liSLqBshMGY45Gc5EOsj2MlyN/NzKcZ2N/gunwjpG

       "]]}, 
     {GrayLevel[0], PointSize[0.007333333333333334], AbsoluteThickness[1.6], 
      PointBox[CompressedData["
1:eJw1z2tI02EUBvB/yZIKcmaUgY0JIkRpS/zQNPDRUlM0TYKVLVuaphlpzKnT
OXe/Rug0JMpciE4TvBBhqKSlYEatFYJpNYdiMbNaWokZWNnZC4eXH+fAwxOc
XZSRu5FhGP7f+fevP2sJLNPOa7v2fI1ZNyRYtQ9u8ttCdkkwLEjweRVIVpRC
kMxtiowkc8vgy38yYTlGHiqDpCsxrugkWVSOm/GMIb2QzEiR43459r2WbJXi
/ZFmR/A9b34FSvuTtH0d3vwKhBWqgg71e/Mr8WninKfzszdfhnK7v/voTg/l
y/A0v760NpwsqsIl59oVVjSZkSP38kio5zDZKkd2VbnQGUtGNXr3qYbTTpNd
1RiKOq6SSr17BXz2NijCr5NrFOiLnbthv+29V8C/Ps966z6Zp4QttuDHtJ2s
UCIw6ct42AzZoYTf4nLJWzeZq4LgKjsrdYFcrIK44/XYzKK3nwoNo7VZoaxv
/81WY2BKPx0VQhap0ZjCORsUT+5WIyFlyRggJDMaiOV185Z8croGHGFjWrOY
bNVg/0rroE1H9miwzN8QEdBChhaPBTYn6xm5RovnNjdfPE92aXE+eetg5hqZ
p4PalDH2c/si9ddBxvXlCCPIDh2iRuCTk0nm6rHMTMaFKMnFerSxR1c23iEP
6SGUvGtXd5LZBhSc6pmd6SWLDGD0eYkHR8jdBlxY8Hf3TJEZI1jbHp6Q/yKn
G/HiY4KfZPcS9Tfig7mkZQeP7DFi8k1qshVkmNDV5HumVUCuMWFzWPtFWRnZ
ZcKDA3Ouu3VknhmdDMdS2UZWmGFdnfWdfUR2mDEgiW7/Pb4U8wcVpTXP
       "]]}, 
     {RGBColor[1, 1, 0], PointSize[0.007333333333333334], AbsoluteThickness[
      1.6], PointBox[CompressedData["
1:eJw1z2tIk2EUB/DXIpUy9ENqRuGMxEtW0wrSYvunYJoDJUWMTZhmQiY6JZ3O
Od+5++YHw9TElTMio0wtdZEXMruhlZkhRZi92s0+KF5DKO2iZw8czvlxHvhz
/NJzT53dwDBM+L/639ee7QLWh1nhWkMBQhPjJL89yVwBCmOrZ7xCyGwhOo6n
cfGRZJ4czI3z4qYUcp8czhG3TLtyydIivDknqr6nIzPFcKnrvplpJduKcSm/
fia83ZGvQM+RwYshg458Beo903oFE478EuzM7rDKlh35SiQHJYn73ecoXwmJ
l5v/oQCytBTq4C/+zwRkRgXXcZ65KJlsU+FEaZQqLoeMMhxTbj4g1JO5MtQN
5g0kXnXsWQgC2xUmO7mSRaAiWsYNOf6zeO87+S7lO5mvRkhsyaf5P2RWjbui
6M6W7fPrHlYjc9VuqAgl88qx6qzWVZwky8pRffTyx5Yz5L5yjC3xHy4oyR4a
PM3uOy2uIUs1sG1dGfvaSm7ToGt0vKhqgMxokd/ckJrxmZygxVBvd3fKCtmm
hXF07rHMe2Hds1pc6Ypqag4lQ4cky88aNxG5UocXPlVPKjPJnA6/Yr6lhavJ
fD2Q5dTobCWzemTUR3Qs28nDegT47xtyHyHzDIj98MBPNE2WGbBD7jJ5x3WR
7jfA7KSJPLyH7GFEbxBXOCkkS40Iuu3T3ikmtxkR1pK3t1VOZkxICM7f9rqK
nGBCT8z0Nc82ss2E689XtmhekmdNmEp10Xn/IMMMie/9qLebluh+M6wTG1X2
3WTOjPTG/VmPhGS+BTlT/YJFCZm1YOFgbVi8gjxsQa34lXKkdkn4F330MX4=

       "]]}}, {
     {RGBColor[1, 0.5, 0.5], PointSize[0.007333333333333334], 
      AbsoluteThickness[1.6]}, 
     {RGBColor[1, 0.5, 0.5], PointSize[0.007333333333333334], 
      AbsoluteThickness[1.6]}, 
     {RGBColor[0, 0, 1], PointSize[0.007333333333333334], AbsoluteThickness[
      1.6]}, 
     {GrayLevel[0], PointSize[0.007333333333333334], AbsoluteThickness[1.6]}, 
     {RGBColor[1, 1, 0], PointSize[0.007333333333333334], AbsoluteThickness[
      1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \
{}, {}, {}, {}, {}}, {
     {RGBColor[1, 0.5, 0.5], PointSize[0.007333333333333334], 
      AbsoluteThickness[1.6]}, 
     {RGBColor[1, 0.5, 0.5], PointSize[0.007333333333333334], 
      AbsoluteThickness[1.6]}, 
     {RGBColor[0, 0, 1], PointSize[0.007333333333333334], AbsoluteThickness[
      1.6]}, 
     {GrayLevel[0], PointSize[0.007333333333333334], AbsoluteThickness[1.6]}, 
     {RGBColor[1, 1, 0], PointSize[0.007333333333333334], AbsoluteThickness[
      1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \
{}, {}, {}, {}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{318.3333333333333, 0.88963881834141},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{318.3333333333333, 890.}, {0.88963881834141, 
   1.3996743683194426`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8226603114647117`*^9, 3.822660342505698*^9}, {
   3.822660471155671*^9, 3.8226604950068846`*^9}, 3.822660571882307*^9, 
   3.8226606790788164`*^9, 3.8226608450990767`*^9, 3.822660880918257*^9, 
   3.822660983286733*^9, {3.8226610477702546`*^9, 3.822661059654609*^9}, 
   3.822661111930827*^9, 3.8226646150470343`*^9},
 CellLabel->"Out[70]=",ExpressionUUID->"27a24c3b-e99e-4d2f-bfdc-c53087198a7d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"bestFitData", "//", "Dimensions"}]], "Input",
 CellChangeTimes->{{3.8226609151746435`*^9, 3.8226609325093117`*^9}, {
  3.8226610692938538`*^9, 3.822661083758148*^9}},
 CellLabel->
  "In[549]:=",ExpressionUUID->"4a37f6fd-46d8-401e-bc58-e1d11cf6c786"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"57", ",", "2"}], "}"}]], "Output",
 CellChangeTimes->{{3.822660911464588*^9, 3.8226609338218074`*^9}, {
  3.822661069844386*^9, 3.822661084154112*^9}},
 CellLabel->
  "Out[549]=",ExpressionUUID->"d9658391-71cd-4f48-8c14-081a953f0af7"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8230815839633894`*^9, 
  3.823081595665828*^9}},ExpressionUUID->"61ffd870-930e-4f56-bf78-\
ee53c619872c"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SetDirectory", "[", 
  RowBox[{"FileNameJoin", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ParentDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
     "\"\<Figures\>\"", ",", " ", "\"\<Figure 3\>\""}], "}"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<length-vs-time_200mM.txt\>\"", ",", " ", 
   RowBox[{"filteredLength", "[", 
    RowBox[{"[", 
     RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<length-vs-timeSTD1_200mM.txt\>\"", ",", " ", 
   RowBox[{"filteredLSTD1", "[", 
    RowBox[{"[", 
     RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<length-vs-timeSTD2_200mM.txt\>\"", ",", " ", 
   RowBox[{"filteredLSTD2", "[", 
    RowBox[{"[", 
     RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<length-BestFitData-200mM.txt\>\"", ",", " ", "bestFitData"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<unperturbedLength_200mM.txt\>\"", ",", " ", 
   RowBox[{"filteredLength", "[", 
    RowBox[{"[", 
     RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}]}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8226499321900215`*^9, 3.8226500165308623`*^9}, {
   3.822650594186453*^9, 3.8226506286269627`*^9}, {3.822650712266425*^9, 
   3.8226507307781324`*^9}, 3.822651157260786*^9, {3.8226514924107733`*^9, 
   3.822651506673444*^9}, {3.8226515572900276`*^9, 3.822651609852448*^9}, {
   3.822651918489616*^9, 3.8226519897529125`*^9}, {3.8226520641061954`*^9, 
   3.8226520712016225`*^9}, {3.822652995067709*^9, 3.8226530055785646`*^9}, {
   3.822653387362462*^9, 3.822653403992469*^9}, {3.8226534377859983`*^9, 
   3.822653438416649*^9}, {3.82265349470671*^9, 3.8226534988238273`*^9}, {
   3.82265359877721*^9, 3.8226535993693924`*^9}, 3.822655938437798*^9, {
   3.822659947189801*^9, 3.8226599488852673`*^9}, {3.822660218660925*^9, 
   3.822660264084454*^9}, {3.822660583925171*^9, 3.822660584525565*^9}, {
   3.8226606289268208`*^9, 3.8226606347402925`*^9}, {3.8226611460376205`*^9, 
   3.822661174909378*^9}, {3.822661264380145*^9, 3.822661276181542*^9}},
 CellLabel->
  "In[561]:=",ExpressionUUID->"e48b7e25-8ab4-4f34-8678-6580533fbf1a"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Hidden Growth  - eLife\\\\Figures\\\\Figure 3\"\>"], "Output",
 CellChangeTimes->{3.822660623616023*^9, 3.822660691970312*^9, 
  3.8226612797011566`*^9},
 CellLabel->
  "Out[561]=",ExpressionUUID->"75d73031-d489-42e9-b777-5aab0016a845"],

Cell[BoxData["\<\"length-vs-time_200mM.txt\"\>"], "Output",
 CellChangeTimes->{3.822660623616023*^9, 3.822660691970312*^9, 
  3.8226612798048525`*^9},
 CellLabel->
  "Out[562]=",ExpressionUUID->"3b62fbdc-0874-4872-a15e-643d5746ac80"],

Cell[BoxData["\<\"length-vs-timeSTD1_200mM.txt\"\>"], "Output",
 CellChangeTimes->{3.822660623616023*^9, 3.822660691970312*^9, 
  3.8226612802117944`*^9},
 CellLabel->
  "Out[563]=",ExpressionUUID->"0519f32f-e387-41ec-b7bf-833896d98559"],

Cell[BoxData["\<\"length-vs-timeSTD2_200mM.txt\"\>"], "Output",
 CellChangeTimes->{3.822660623616023*^9, 3.822660691970312*^9, 
  3.8226612804272223`*^9},
 CellLabel->
  "Out[564]=",ExpressionUUID->"c452bd3c-9d79-4ffd-b901-4db8efe2b150"],

Cell[BoxData["\<\"length-BestFitData-200mM.txt\"\>"], "Output",
 CellChangeTimes->{3.822660623616023*^9, 3.822660691970312*^9, 
  3.822661280630643*^9},
 CellLabel->
  "Out[565]=",ExpressionUUID->"6beadc26-a7e3-4af4-a56c-2242f2073692"],

Cell[BoxData["\<\"unperturbedLength_200mM.txt\"\>"], "Output",
 CellChangeTimes->{3.822660623616023*^9, 3.822660691970312*^9, 
  3.8226612808460665`*^9},
 CellLabel->
  "Out[566]=",ExpressionUUID->"9cfc4ed2-b506-4565-a7c2-6c85a3a86b16"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"\[Epsilon]", " ", "=", " ", "0.11"}], ";"}]], "Input",
 CellChangeTimes->{3.853305925564866*^9},
 CellLabel->
  "In[585]:=",ExpressionUUID->"1d3d7efe-33ab-4672-8e31-97cee8a6b22c"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"L", " ", "=", " ", "0.001"}], ";", " ", 
    RowBox[{"endTime", " ", "=", " ", "0.46"}], ";"}], " ", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"weight", "[", "ur_", "]"}], "[", "u_", "]"}], " ", "=", " ", 
     RowBox[{"Piecewise", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Chop", "[", 
           RowBox[{"Exp", "[", 
            RowBox[{"-", 
             RowBox[{"(", 
              RowBox[{
               SuperscriptBox[
                RowBox[{"(", 
                 RowBox[{"u", " ", "-", " ", "ur"}], ")"}], "2"], "/", 
               SuperscriptBox["L", "2"]}], ")"}]}], "]"}], "]"}], ",", " ", 
          RowBox[{
           RowBox[{
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", "ur"}], ")"}], "2"], "/", 
            SuperscriptBox["L", "2"]}], "<", "15"}]}], "}"}], "}"}], ",", " ",
        "0"}], "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"f0", "[", "u_", "]"}], "=", " ", "1"}], ";", " ", 
    RowBox[{
     RowBox[{"f1", "[", "u_", "]"}], "=", " ", 
     RowBox[{"2", " ", 
      RowBox[{"\[Sqrt]", "3"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", 
         RowBox[{"(", 
          RowBox[{"1", "/", "2"}], ")"}]}], "+", "u"}], ")"}]}]}], ";", " ", 
    RowBox[{
     RowBox[{"f2", "[", "u_", "]"}], " ", "=", 
     RowBox[{"6", " ", 
      RowBox[{"\[Sqrt]", "5"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"1", "/", "6"}], "-", "u", "+", 
        SuperscriptBox["u", "2"]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"fbasis", "[", "u_", "]"}], " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"f0", "[", "u", "]"}], ",", 
       RowBox[{"f1", "[", "u", "]"}], ",", " ", 
       RowBox[{"f2", "[", "u", "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"refPoint", " ", "=", " ", 
      RowBox[{"positions", "[", 
       RowBox[{"[", "1", "]"}], "]"}]}], ";"}], "*)"}], "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"fitFunction", "[", 
      RowBox[{"input_", ",", " ", "output_"}], "]"}], "[", "u_", "]"}], ":=", 
    RowBox[{"(", "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"input", " ", "=", " ", 
        RowBox[{"positions", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", "1"}], "]"}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"output", " ", "=", "  ", 
        RowBox[{"positions", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", "2", ",", " ", "1"}], "]"}], "]"}]}], ";"}], 
      "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"ui", " ", "=", " ", 
       RowBox[{"fbasis", " ", "/@", "  ", "input"}]}], ";", " ", 
      RowBox[{"fi", " ", "=", " ", "output"}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"wij", "[", "ur_", "]"}], " ", ":=", " ", 
       RowBox[{
        RowBox[{"weight", "[", "ur", "]"}], " ", "/@", " ", "input"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"wi", "[", "ur_", "]"}], " ", ":=", " ", 
       RowBox[{"wij", "[", "ur", "]"}]}], ";", " ", 
      RowBox[{
       RowBox[{"uwi", "[", "ur_", "]"}], " ", ":=", " ", 
       RowBox[{
        RowBox[{"wi", "[", "ur", "]"}], "*", "ui"}]}], ";", " ", 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Mj", "[", "ur_", "]"}], " ", ":=", " ", 
       RowBox[{
        RowBox[{"Transpose", "[", 
         RowBox[{"uwi", "[", "ur", "]"}], "]"}], ".", "ui"}]}], ";", " ", 
      "\[IndentingNewLine]", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Vj", "[", "ur_", "]"}], " ", ":=", " ", 
       RowBox[{"Total", "[", 
        RowBox[{
         RowBox[{
          RowBox[{"wi", "[", "ur", "]"}], "*", "ui", "*", "fi"}], ",", "1"}], 
        "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Pj", "[", "ur_", "]"}], " ", ":=", " ", 
       RowBox[{
        RowBox[{"PseudoInverse", "[", 
         RowBox[{"Mj", "[", "ur", "]"}], " ", "]"}], ".", 
        RowBox[{"Vj", "[", "ur", "]"}]}]}], " ", ";", "\[IndentingNewLine]", 
      "\t", 
      RowBox[{"Return", "[", 
       RowBox[{
        RowBox[{"fbasis", "[", "u", "]"}], ".", 
        RowBox[{"Pj", "[", "u", "]"}]}], " ", "]"}]}], "\[IndentingNewLine]", 
     ")"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"funFit", "[", "u_", "]"}], ":=", " ", 
     RowBox[{
      RowBox[{"fitFunction", "[", 
       RowBox[{
        RowBox[{"tfdata", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], ",", 
        RowBox[{"tfdata", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", " ", "2"}], "]"}], "]"}]}], "]"}], "[", "u", 
      "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"pPlot", " ", "=", " ", 
      RowBox[{"Plot", "[", 
       RowBox[{
        RowBox[{"funFit", "[", "u", "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"u", ",", 
          RowBox[{
           RowBox[{"tfdata", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Min"}], ",", 
          RowBox[{
           RowBox[{"tfdata", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Max"}]}], 
         "}"}], ",", " ", 
        RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"lPlot", " ", "=", " ", 
      RowBox[{"ListLinePlot", "[", 
       RowBox[{
        RowBox[{"{", "tfdata", "}"}], ",", " ", 
        RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", " ", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", "Orange", "}"}]}], ",", " ", 
        RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], ";"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fdata", " ", "=", " ", 
     RowBox[{"MovingAverage", "[", 
      RowBox[{
       RowBox[{"filteredLenData", "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", " ", "2"}], "]"}], "]"}], ",", "1"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tdata", " ", "=", " ", 
     RowBox[{
      RowBox[{"Min", "[", 
       RowBox[{"filteredLenData", "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}], " ", "+", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"Range", "[", 
          RowBox[{"Length", "[", "fdata", "]"}], "]"}], " ", "-", " ", "1"}], 
        ")"}], "   ", 
       FractionBox[
        RowBox[{" ", 
         RowBox[{
          RowBox[{"Max", "[", 
           RowBox[{"filteredLenData", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}], " ", "-", 
          " ", 
          RowBox[{"Min", "[", 
           RowBox[{"filteredLenData", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}]}]}], 
        RowBox[{
         RowBox[{"Length", "[", "fdata", "]"}], " ", "-", " ", "1"}]]}]}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tfdata", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"tdata", ",", " ", "fdata"}], "}"}], "//", "Transpose"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"lplot", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"funFit", "[", "u", "]"}], " ", ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", 
         RowBox[{
          RowBox[{"tfdata", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Min"}], ",", 
         RowBox[{
          RowBox[{"tfdata", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Max"}]}], 
        "}"}], ",", " ", 
       RowBox[{"Axes", "\[Rule]", "False"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", "Red", "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Epsilon]p", " ", "=", " ", "0.01"}], ";"}], " ", 
   RowBox[{"(*", 
    RowBox[{"for", " ", "taking", " ", "derivative"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pPlot", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       FractionBox[
        RowBox[{
         RowBox[{"funFit", "[", 
          RowBox[{"u", " ", "+", " ", "\[Epsilon]p"}], "]"}], " ", "-", " ", 
         RowBox[{"funFit", "[", 
          RowBox[{"u", " ", "-", "\[Epsilon]p"}], "]"}]}], 
        RowBox[{"2", " ", "\[Epsilon]p"}]], ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", ".00", ",", 
         RowBox[{
          RowBox[{"tfdata", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Max"}]}], 
        "}"}], ",", " ", 
       RowBox[{"Axes", "\[Rule]", "False"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", "Red", "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\n", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
      RowBox[{"curveFit", "[", "u_", "]"}], ":=", " ", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"fitFunction", "[", 
          RowBox[{
           RowBox[{"positions", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", "1"}], "]"}], "]"}], ",", " ", 
           RowBox[{"positions", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", "2", ",", " ", "1"}], "]"}], "]"}]}], "]"}], 
         "[", "u", "]"}], ",", 
        RowBox[{
         RowBox[{"fitFunction", "[", 
          RowBox[{
           RowBox[{"positions", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", "1"}], "]"}], "]"}], ",", " ", 
           RowBox[{"positions", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", "2", ",", " ", "2"}], "]"}], "]"}]}], "]"}], 
         "[", "u", "]"}]}], "}"}]}], ";", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
      "Make", " ", "the", " ", "plot", " ", "for", " ", "actual", " ", "and", 
       " ", "smooth"}], "*)"}], "\[IndentingNewLine]", 
     RowBox[{"pPlot", " ", "=", " ", 
      RowBox[{"ParametricPlot", "[", 
       RowBox[{
        RowBox[{"curveFit", "[", "u", "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"u", ",", "0", ",", "1"}], "}"}], ",", " ", 
        RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"lPlot", " ", "=", " ", 
      RowBox[{"ListLinePlot", "[", 
       RowBox[{
        RowBox[{"{", "includedVerts", "}"}], ",", " ", 
        RowBox[{"AspectRatio", "\[Rule]", "Automatic"}], ",", " ", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", "Orange", "}"}]}], ",", " ", 
        RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"Show", "[", " ", 
      RowBox[{"lPlot", ",", "pPlot"}], "]"}]}], "\[IndentingNewLine]", "*)"}],
    "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"newTFData", " ", "=", " ", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"u", ",", 
         RowBox[{"funFit", "[", "u", "]"}]}], "}"}], " ", ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", 
         RowBox[{
          RowBox[{"tfdata", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Min"}], ",", 
         RowBox[{
          RowBox[{"tfdata", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Max"}], ",", 
         FractionBox[
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"tfdata", "[", 
              RowBox[{"[", 
               RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Max"}], 
            ")"}], " ", "-", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"tfdata", "[", 
              RowBox[{"[", 
               RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Min"}], 
            ")"}]}], "5000"]}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"newTdata", " ", "=", " ", 
      RowBox[{
       RowBox[{"Min", "[", 
        RowBox[{"filteredLenData", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}], " ", "+", " ", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"Range", "[", 
           RowBox[{"Length", "[", "newFData", "]"}], "]"}], " ", "-", " ", 
          "1"}], ")"}], "   ", 
        FractionBox[
         RowBox[{" ", 
          RowBox[{
           RowBox[{"Max", "[", 
            RowBox[{"filteredLenData", "[", 
             RowBox[{"[", 
              RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}], " ", "-", 
           " ", 
           RowBox[{"Min", "[", 
            RowBox[{"filteredLenData", "[", 
             RowBox[{"[", 
              RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}]}]}], 
         RowBox[{
          RowBox[{"Length", "[", "newFData", "]"}], " ", "-", " ", 
          "1"}]]}]}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"newTFdata", " ", "=", " ", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"newTdata", ",", " ", "newFData"}], "}"}], "//", 
       "Transpose"}]}], ";"}], "\[IndentingNewLine]", "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]plotStoredRate", "[", 
     RowBox[{
     "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
      "\[Epsilon]z_", ",", "style_"}], "]"}], ":=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"storedLengthFunction", "[", 
         RowBox[{
         "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
          "\[Epsilon]z"}], "]"}], "'"}], "[", 
       RowBox[{"u", " ", "-", " ", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"u", ",", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], "}"}], 
      ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Black", ",", " ", "style"}], "}"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"noStoredMinimal\[Delta]RPlot", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"2", " ", "\[Delta]L0"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"u", ",", 
         RowBox[{"normalizedTime", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], "}"}], 
       ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Dashed", ",", " ", "Green"}], "}"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]plotStoredLen", "[", 
     RowBox[{
     "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
      "\[Epsilon]z_", ",", "style_"}], "]"}], ":=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"storedLengthFunction", "[", 
        RowBox[{
        "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
         "\[Epsilon]z"}], "]"}], "[", 
       RowBox[{"u", " ", "-", " ", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"u", ",", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], "}"}], 
      ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Black", ",", " ", "style"}], "}"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fdata", " ", "=", 
     RowBox[{"MovingAverage", "[", 
      RowBox[{
       RowBox[{"newTFData", "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", " ", "2"}], "]"}], "]"}], ",", "700"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tdata", " ", "=", " ", 
     RowBox[{
      RowBox[{"Min", "[", 
       RowBox[{"newTFData", "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}], " ", "+", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"Range", "[", 
          RowBox[{"Length", "[", "fdata", "]"}], "]"}], " ", "-", " ", "1"}], 
        ")"}], "   ", 
       FractionBox[
        RowBox[{" ", 
         RowBox[{
          RowBox[{"Max", "[", 
           RowBox[{"newTFData", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}], " ", "-", 
          " ", 
          RowBox[{"Min", "[", 
           RowBox[{"newTFData", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "]"}]}]}], 
        RowBox[{
         RowBox[{"Length", "[", "fdata", "]"}], " ", "-", " ", "1"}]]}]}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"s", " ", "=", " ", "0.001"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tfdata", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"LowpassFilter", "[", 
         RowBox[{
          RowBox[{"tdata", "[", 
           RowBox[{"[", 
            RowBox[{"1100", ";;"}], "]"}], "]"}], ",", "s"}], "]"}], ",", " ", 
        RowBox[{"LowpassFilter", "[", 
         RowBox[{
          RowBox[{"fdata", "[", 
           RowBox[{"[", 
            RowBox[{"1100", ";;"}], "]"}], "]"}], ",", "s"}], "]"}]}], "}"}], 
      "//", "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"f", " ", "=", " ", 
     RowBox[{"Interpolation", "[", "tfdata", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Show", "[", 
    RowBox[{
     RowBox[{"ListPlot", "[", "newTFData", "]"}], ",", "lplot"}], "]"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"prateNoStored", " ", "=", 
     GraphicsBox[{{{}, {}, 
        TagBox[
         {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
          Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxpVSllWTSivRzMpug0hlclKvSEolq4NyiXRzG0YdYmPb3JfG
pTJa07isUSe7UVbSxL4V0oTPzJgZZnxfsytS6aJWiuOys3885/njeX4/elis
z/G5Ojo6+7T5v5Mtb/26ZeYCFA3fpX8p0+Ak2/HEG3cuBE00tvwi0GDi3SYH
AZcLmX0281bxNRjvKe6YMcsDBW9phhtPgzGcgemHW/Ihzngws+CCBu0Pf7Ve
2FQAlwzTcphJGmRUOxcxJy9CRmBMcamPBhe4VgSz4oth9Pxsh7OeBgXHW3da
8sohX5gSl3DsGTpa5zTssKiCfuejG8VSCut9G7xLC29AwHPTuFl3Cof/iBOd
PlYD3NFbw6I6ErmpsymcU7eBKFlQ42pLok4bV29o4E/YPuQULC/vxxdO+y3H
PRrgXm5bocnKftxTO2Hbk9YIWxmV1iMVajS4H2Xx7r0Igj/zknwZavRsfzwl
d2iG6Hqr2poaFU7N9409GImQit558S4qTGcrBg1fPYAJYnj8UGcfevaNZR1Y
+AhEyZWrGUf7cKvRF/N70AIpz8zDPcZ6MZK6rMOOawV1/ddWt3J6UWlj1ZeZ
1waR9DBfU+te5HjwK7HlMdxtm9TJfqzE3QPzjh8ebAfiat7u3VFK9N7lY2q2
Sgw7DtjkOxkoscDDyfR776egN93h/rBWgYvbly4uiemA/twoh/EgBTbT5BPM
qk54m+M9qpqvwGoyS0Vv74LQOF5ZR4McJS4K3ZPPCRipMNGLjZLjks26hUMG
EigZ46w2NpMjuWg5/ylfAqT+I4mVvAedu0wtkCUFXk1lGDu7B538o5+oJVKw
vcNr9nPpQT96Y/SNEBkcYRsF0mZlqC/9lJM1KYMflpw32imSIfnAVrgitwdK
pNkzr87KcG9K3YBkhRw+nRmazXCR4QGLtfwrdXKIyC+cejlHhklzSryMXRWQ
sNnEcI1Yio7iqbMCSgGni/V3RXClaCw9JFTHKOFMv0Ojp78UuVW6H7dNK+F1
YrrBzW+lKAgpu1dX3AuGJpFb97yVYNehTcmq7/pgZ9PnswZNErzs1Ny4qLUP
Ulf+s4yVLcHPQ4Wm7GAV3G+mSLmfBH+UhZ5JeaOCCY7FkpVM7V9I9xJkqeF6
cD5n0Xg3Eg2kBWdFP7h9PFVfXd6NwqLB5ZHX+iHN8oX93v3dSAt4lnXahYSF
5a3UxQkCSw/L/rWTkEAbnlaqfydQunZzy20ZCUf5FU/Sqwmc90lwcYOCBNWG
d0PrbhAYmRuxnqUmwY6WWpl2jUBWo07stkESslIuM+0qCJTQ7F7v/UICaXYs
PI9HoG5b7t8RqylYk1DzG/s8gY4FH2pHGBQM18Tor/pZ6wv0P8deQ0FXRy+/
8yct/4FhHsekQLdO6GaTTOBVc1Fg4kYKvrFfW/Y2QcsnvlRm7qJg5COZkRhN
YISb17WFeyh4wba+zozS/o3q43P2afkuxhgZQeDcqnNL83woqGYZ0lxPEtgt
Xe5TFERB6V9iP6Mw7S5IppuEUHAnIETxMFTrDx8YvXKEgndqwbn4EK1v5mb+
1RMUdGYt86eCtLzYOMQ8ggJOvVd6YaCWL0paVx5FAavNnnIPIHBTqGaaHkMB
Q3T/yORBAsOt3bsqORSsv/SeVutP4H+8hZRH
           "]]},
         Annotation[#, "Charting`Private`Tag$328145#1"]& ]}, {}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0.014156776511059444`, -0.49413874905405325`},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.45, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.35, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.25, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.55, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.54, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.53, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.52, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.51, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.49, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.48, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.47, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.46, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.44, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.43, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.42, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.41, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.39, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.37, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.33, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.31, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.29, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, 
            {
             AbsoluteThickness[0.1]}}, {-0.27, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.23, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.21, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.42, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.44, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.46, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.48, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->All,
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{0.014156776511059444`, 
       0.46}, {-0.49413874905405325`, -0.2370508992745726}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"endDataTime", " ", "=", " ", "0.46"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"p", " ", "=", " ", 
    RowBox[{"Show", "[", 
     RowBox[{
      RowBox[{"\[Delta]plotStoredRate", "[", " ", 
       RowBox[{
       "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", 
        "\[Epsilon]", ",", 
        RowBox[{"{", 
         RowBox[{"Black", ",", " ", "Dashed"}], "}"}]}], "]"}], ",", 
      RowBox[{"\[Delta]plotStoredRate", "[", " ", 
       RowBox[{
        RowBox[{"-", "1"}], ",", " ", "0", ",", "0", ",", " ", "\[Epsilon]", 
        ",", 
        RowBox[{"{", 
         RowBox[{"Purple", ",", " ", "Dashed"}], "}"}]}], "]"}], ",", " ", 
      "noStoredMinimal\[Delta]RPlot", ",", 
      RowBox[{"Plot", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"f", "'"}], "[", "t", "]"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"t", ",", " ", "0.04", ",", "endDataTime"}], 
         RowBox[{"(*", 
          RowBox[{
           RowBox[{"tfdata", "[", 
            RowBox[{"[", 
             RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], "//", "Max"}], 
          "*)"}], "}"}], ",", " ", 
        RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", " ", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"Filling", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"0", "\[Rule]", 
           RowBox[{"{", "0.01", "}"}]}], "}"}]}]}], "]"}], 
      RowBox[{"(*", 
       RowBox[{",", "pPlot"}], "*)"}], " ", ",", "prateNoStored", ",", 
      RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"SetDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], "\[IndentingNewLine]", 
     RowBox[{"Export", "[", " ", 
      RowBox[{"\"\<rate-plot.pdf\>\"", ",", " ", "p"}], "]"}]}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8066468560587*^9, 3.8066468560996003`*^9}, {
   3.819803353199603*^9, 3.8198033604542522`*^9}, {3.8198034138965282`*^9, 
   3.8198034440307074`*^9}, 3.8225555780862403`*^9, {3.8225556114051256`*^9, 
   3.8225556188910856`*^9}, {3.8225556810061088`*^9, 
   3.8225557014454656`*^9}, {3.82255573749404*^9, 3.8225557963642406`*^9}, {
   3.822555831844349*^9, 3.822555892130372*^9}, {3.8225566357001705`*^9, 
   3.822556673116107*^9}, {3.822557068842987*^9, 3.822557106459565*^9}, 
   3.822557641891282*^9, {3.822585405532974*^9, 3.8225854253329973`*^9}, {
   3.8225856116287785`*^9, 3.822585622364068*^9}, {3.8225857282050133`*^9, 
   3.8225857375230937`*^9}, {3.8225868493075695`*^9, 3.822586862858354*^9}, {
   3.8225874064852247`*^9, 3.8225874594665346`*^9}, {3.822587511981119*^9, 
   3.8225875144584665`*^9}, {3.8225875856770306`*^9, 
   3.8225876074188795`*^9}, {3.8225876488051777`*^9, 3.822587685653428*^9}, {
   3.8225931583838725`*^9, 3.822593158694765*^9}, {3.8226344582609015`*^9, 
   3.8226344758668175`*^9}, {3.822634553013209*^9, 3.8226345669310074`*^9}, {
   3.8226445378433533`*^9, 3.8226445668319635`*^9}, {3.8226445987517867`*^9, 
   3.822644631397354*^9}, {3.822645145928314*^9, 3.8226451799430428`*^9}, 
   3.8226655195214944`*^9, {3.8226659941403112`*^9, 3.822666015091281*^9}, {
   3.8229165863031535`*^9, 3.8229166109113536`*^9}, {3.8229166537747126`*^9, 
   3.8229167103344555`*^9}, {3.8229168584313912`*^9, 
   3.8229168785655413`*^9}, {3.822916915878764*^9, 3.8229169161968937`*^9}, {
   3.8229169597663975`*^9, 3.8229169843895473`*^9}, {3.8229170157037783`*^9, 
   3.8229170177174187`*^9}, {3.822917085254798*^9, 3.822917157924451*^9}, {
   3.822917229047456*^9, 3.822917261933527*^9}, {3.8229172943418655`*^9, 
   3.8229172975263233`*^9}, {3.822917336067274*^9, 3.822917338759053*^9}, {
   3.8229173848547773`*^9, 3.822917389077485*^9}, {3.8229174428237715`*^9, 
   3.8229175941810975`*^9}, {3.822917694850875*^9, 3.8229177471352744`*^9}, {
   3.822917888445541*^9, 3.8229179571827154`*^9}, {3.822917995288782*^9, 
   3.822918126485939*^9}, {3.82291815727061*^9, 3.822918207805462*^9}, {
   3.8229183331263075`*^9, 3.8229183453487406`*^9}, {3.822918422302947*^9, 
   3.822918435676154*^9}, {3.822918607021586*^9, 3.822918622119186*^9}, {
   3.8229186620863276`*^9, 3.8229186669961696`*^9}, 3.8230703552475524`*^9, {
   3.823070413951536*^9, 3.8230705248951654`*^9}, {3.8230705670722675`*^9, 
   3.823070587511383*^9}, 3.823083741374338*^9, {3.823083990887169*^9, 
   3.8230840069263678`*^9}, {3.831803245124467*^9, 3.8318032480793867`*^9}, {
   3.831803278086437*^9, 3.831803328285562*^9}, {3.8318034566415577`*^9, 
   3.8318035560285344`*^9}, {3.831804608492592*^9, 3.8318046135188065`*^9}, {
   3.8318046656493893`*^9, 3.8318046852145023`*^9}, {3.831804746367444*^9, 
   3.831804771863841*^9}, {3.831804865613062*^9, 3.8318049221523705`*^9}, {
   3.8318049629720917`*^9, 3.831804964360383*^9}, {3.8318050318405185`*^9, 
   3.831805049263631*^9}, 3.83180507998122*^9, {3.831805114448475*^9, 
   3.831805123833997*^9}, {3.832064092841089*^9, 3.8320641220785923`*^9}, 
   3.832064152663501*^9, {3.8320642332395477`*^9, 3.8320642355679164`*^9}, {
   3.8320643033193383`*^9, 3.832064322562329*^9}, {3.832064774519906*^9, 
   3.8320647994223084`*^9}, 3.8320648372860823`*^9, {3.8320648746337748`*^9, 
   3.832064903430729*^9}, {3.851341639005885*^9, 3.851341673483428*^9}, {
   3.851341706757806*^9, 3.8513417652754154`*^9}, 3.851341795405201*^9, 
   3.8513418404764795`*^9, 3.851342015325837*^9, {3.8513422142044663`*^9, 
   3.851342227003013*^9}, 3.8513422868377943`*^9, {3.851342321926784*^9, 
   3.8513423233554926`*^9}, {3.851342378644489*^9, 3.8513423787462444`*^9}, {
   3.8513424181832275`*^9, 3.8513424271311555`*^9}, 3.851342522003405*^9, {
   3.851342651349846*^9, 3.851342655259288*^9}, {3.8513428182991524`*^9, 
   3.8513428927629814`*^9}, 3.851575831419133*^9, {3.8515758991214457`*^9, 
   3.851575925761692*^9}, 3.8515765540293694`*^9, {3.8515766402690988`*^9, 
   3.8515766412042646`*^9}, 3.8515767001634955`*^9, {3.851576828747726*^9, 
   3.851576937514708*^9}, 3.851576968838525*^9, {3.851577060542899*^9, 
   3.851577061188592*^9}, {3.851577342158332*^9, 3.8515773423160095`*^9}, 
   3.851577440717915*^9, 3.8515774758232675`*^9, {3.8529725479715805`*^9, 
   3.8529725608836603`*^9}, 3.852972660982588*^9, {3.8529728356914186`*^9, 
   3.85297287674594*^9}, 3.852973023914592*^9, {3.8529730893217683`*^9, 
   3.852973114971573*^9}, 3.8529733158932953`*^9, {3.8533058385999374`*^9, 
   3.8533059781744413`*^9}, 3.8554771436346593`*^9, 3.855477175747676*^9, 
   3.855477248832185*^9, {3.855477278833639*^9, 3.8554773028664627`*^9}, 
   3.8554773355884247`*^9, {3.8554802370931363`*^9, 3.8554802372337666`*^9}},
 CellLabel->
  "In[705]:=",ExpressionUUID->"c53d76f3-b1b8-4f0c-95c8-522c2389869e"],

Cell[BoxData[
 GraphicsBox[{{{}, {
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
       NCache[
        Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[1.6], 
      PointBox[CompressedData["
1:eJwUWXk4lG8XRsoafqgkCUmEklSSHFHWSEKSJCn7vo1lZjBTyZY1S5J9X8a+
O2MrSaWSiEoSUkmSVNL3fn/NdV/nPPe5n/t93uc95xpJOw/Ty2wsLCw3hFhY
/v/7ImdN7dWmTqS4LSpWDwZAQ8q1Vse6Tqz69vWG0rMASIvm6jGs6sSDb+fY
Kp8EQFBY9KPd5Z0oeOBbquKjALD25x/6r7gTDZaWDMv6AkDDJeHNYl4nPtvG
IibfGwASthumX2Z1IqOal6ukJwDYzFO/Nmd0IvdLp6aprwHwXn/L8p3UTmSr
W1Xt/B4APRqZLGFJnZgg+Hlt7s8AKNwnyWUf14nVxX930v4EwA3ZvP90oztR
mPF2xe5fALhs3Sm6K6ITf19mCdFaQ4ITgiVS6+md6K+ZWirJQYLdHIry89RO
FD9VeZWFhwQCK5X7ngd3Yv/PC1xv+UiwMK+sXh/QiZNPsw62CZJg8EPdsTQf
on7aQYHbG0lQ90rVKMSjE3u5pRJJoiRIedJifsGlE3eV2DPNxUkQ2K1ho+XQ
ic4qbKnKUiQ419RxZcelTjThWd7ML0MC9YpjHpwXOtHWTl/nkxwJxHPvB3yy
6sShS+xb7yuSgCXVIPSxRSfu1vl3J2cvCSaiH0VUmRL+xLs9IO8nQXeYSXyS
cScuXWi7a3mIBPn+z9MCDDpRSeCh2L4jJLjuYpFjpUPwvW09uf4oCZxsR0qO
aHWiFNt1mD5GAkNz6xoJjU4M9dfx79AjgaLB25Y1akS9rc9zV/1JwAd23VP7
O3H1oJWZoy8J5vd96H+wtxPPeSxJPfMiwTNZxxdlisR+ugr51T1IULv10+ub
cp04ss9dtMCVBLcE3ae8d3TiPFNfW8CZBAEc3+bMJTsx3VktMsiBBGdXfH6q
biXylTS/TtqT4PC3pX9bNndiodA575N2JNg6Fcj5T7gTOYWihJovkODfqxWB
CYFOXNk98Ez6PAnGn1A39/B2ItVhF+OmFQk6u9mkijgJ/ta00t9nSJDXdHVX
FHsn6uwW77lsToJrFZz73FkIfzzlHm3TDATH3KjDp1Y6kJF9zCTmfCDop/Id
U1nuwCw7hW3LQYEgHxN/YtNiB7K4OXTZpgbC+nBh899fOzC05Z7K/bpA+Oqf
cv71JwJrUejyzwNhwEX0CnOa4NtqWREzHwjVtnfcc993oGaZVf2X9UGQZC4R
cO1tB5o4JacbygeBv0Eu1Wm0AyUyHc4V6gWBJchEnHhJ5HP3LrNcCYJDKsVx
e553oEAJw9uSFgRb5BTSBJ904PjC9gflWUHwd2tl9o++DpzXk1phaQ+Ct4LK
JcP3CD2tFTymo0HQwVFX3dJJ8G3q/5m1HAQ5KwdbMtuJfDs75pcNwUD/1twV
1kzEmZmXVfcFw5WpI/329R3IjFSeCjUJBr1R5qBudQcOhJkev+8WDLsGtF/v
qiD2J9QeyBMVDDw99z6sLyHWTz/MMioKhi9N+nPz+YR/3dF6MT3B8KSif+l5
NqH/vqr+g4lgqMo9+a/+TgcaD4gnVN0PgcTUZxzpaR04J9L7Pqs7BHxjzAXI
yUS8Q/9sXEcIWIQPi9jGd6Dzg9wFansIqAack9SO6UCDvUOVHi0hIOr6Rk7m
RgdOLI/HXWgMgRXbi8pcVzsQJLqTT9aFwGvzSbXPoR1oXUhth+oQQAMH7Sch
HXggVohHqTIEsmHWsJrUgc8GqcESZSFAU3EzS/btwL3B3fz/FYeAvdy8Ncmz
A/XC3t1nLQgBHXGfy+dciec1PZS7kBMCskJLbhqOhD8W7BvDd5CBmzPQX9Ke
2C/7J3HuA2T4vPKHwm5L+JX3yCZBhwyPv1GuT58j8rNPfRI5Q4bKKda4vjNE
vItLKdOBDPGj9NTy0x24/EP1tBSJDD4DHNlxJ4nnkS4vnx9BBvOeyGIfww4c
lvW/J5NGhgPN66stdIn1T7W3FxaTQaQyrvmQNhHXHdSUaSbD71yhLjEg1vtZ
bMvrI8NY6q2H/9SI+AVGu8QoGdpjNg9OHOhAJZFZ8YxPZLgbnjHWo9yBIqws
mhtXyBAWsO1D0e4OtDy/IHmTlwKXXHO+RO0izm9fZ/e6rRQ4fnHHkrtMBzq2
OsuSFSmw06Jo9ZQUcT7JO4wWjlCA01CeY7848f7w/9x7xZgCs1DBLyLagalP
V14N21CgX2WvyJ8NHRh30FzbwIMCFXK1Em/+I/wNGbNuplIgTvygXMd6wo+E
irNycRTwEmrem8dFnDfdKVJKFgVOcx5Ru76W4LcZ2cBWRYH9f1HLmbUD3eqL
T2fso8KmBS1Do79M5N2486a2EhV+TfWcVvrFxN9urAuzClR4NapnLfSDiYfa
VUMS5KjQOvDQfmmeiT3rHimqyVAhs8fYbeQzEwt129dNSFEhtPmpX+sME1+G
8nJEbqOCXaUZ5e4kE82rG3Yri1FBO+/ltfBxJkqNIfmVCBV2pFndvDzGRJ1V
6cXwDVTgiH2dojfMxHqR6Xh5QSp8DLfNkh9koq/8ujODfFToC3hfxDfAxNAD
4dpkHiqUuV6p+vaQiVPXmxp2fqRA7MWPTYP3mWj37gbf1XcU8LRw7WzoYqJx
c9uP9yMUMDX82peOTExwZD7RfkaBfZrez8ktTCTeBMm8Pgps2P9j1LaBiRM3
yBPsXRT4KUea1K4h+NtGNl9pocCI+J/PMpVMzFh74/79Ggq0CFF+cJUSerp3
zMqVUSCDk3X1cwETexPtwqPzKED5S1s3kMPE1BcrN79mUMB2YR1/TSYTzZLX
CJ1OpoDW9I1Nt9KZOBlF4mmIoYD0GK9E4C0mCp86F7jlGgXWPr0pa53ARNXZ
EutQCgWmewT3QiwT56/51H3wp8CD5uRDUpFMHHZPoxkS56O0UkRr7TUmxi4c
ul/lQIGYvNsGM2FMFDspGipiSwH3NPHTD8lMtLrRVU61pIBJbPa5ikAmuotL
WE6bUECZJm0f78fEfpEoj5P6FBAmFbr6ehF43Cqu8SgFllx3+Z1xYyJdV/P+
djUKvLxYTlZzYqLa/NKNjxsp0GShdG3rZSb2zYlmFgtR4LZhTSzLRSY2KVYM
OwlQgKx5IOW9NRPZyhmHdq2ngM3+prv3LJlY5yrVMctFAc1d6kXFZkxE1zUe
pesoILUNGdEmTNxdflrbdQ0F2IW1mjxOMHFZUUhDkYUCU5w9HaZ6TNz19eiF
OeJ97P2r27f/GBNb598WVP4iQ/FC3zMRTSaWKH8R9loiQ9S00eifw0xcqHUq
Vv5OBrexgfdvDjKxIMDcfvErGU4+Pf25Yx8TGUGM4/WfyaB0b2gxbw8TI4Ze
fE6yJYNgy9m/1+WZOGNy5LijIRkWK8fWuuwkMEfbsSPEfTaUd4HPeDsTs5Qf
hghJkqExbWLj3m1MtBWq2vyJhwxpsZe3CW9hokDUG6nupRAIps3s/LmRiRI5
I7cz34XAeZKL0itBJjJXUsKD+kMA3OZU2/gIPYPjL880hICkndfRLG4mxlnK
3j5A3K9sZxb1aeuI8yGd1r8xJgQmDQNMr7AxkfPyHtflgBCIDlusS1hBnBmc
CRy1CwETl9/3LBcR5/3u/0CjEBAyZxkW/4zY2P7gbb5qCLzUWPdx8j1i0eXZ
gzHbQyBdlvd3ySjiuKTOqh9fCNgICvJ4PUfMWvt3r+2vYJBa2SR28CGRP/Pp
meFkMHz4sFXxbydiBGv1pOqTYCh+sl2jqxlRNTDXdGdzMLg2yZ28UY3ImfNN
b1N+MCjl7rE9WYKY6qJvzRUXDIvR+7025BD1/vD3LgcFQ4P/4fDRNMR7Tqzb
P/0KgiDbo4nZ8Yg8Ejq//iwFgYaBbp7DDcSKDd4LvItBwKZiVKcYhphpcJVP
/FsQ9Gw9fe87CXGqnWq0Zy4IbnCcfdnkiRjlfbFS81MQnPhmM0N1RKRc3qVi
OhMEAqP2v47bIt5PeTV66UMQDHY7c/NaIrpweRf4TQRBSoXnlmcnEe2a5xOv
vw2Cc6n+Cqm6iJUlFnlpY0EgHh5yxAYQzV7lviwdCYIJl3Bj6YOIxvrDiu1D
QVBgHnFhdjeiRN/ogdONgeAEsZ4MGUTGsJmBaEwgKMolhfmLI2r2TVRNXwyE
ecH0BPWNhB+n+kQbDwRC7crdXDY+Yv2hU9ejeAKBNJVf27sWkeW1E7fdONEf
DpT2xP5tR4l5ocTDdUQ/2FQ1ZPajHW25FLeLRBL9X27DtOiXdvS0nmv8aUP0
ezFty+OTRL5vndmrfSQwCOjiKhxrx9A8/yXkJMH6iw9E3QbbkbF4JLPodQA8
NXgiv6+/HbPOrT2RVB0ASSov1H91teN88qN/4dcDwFJ81Ahb2lHzWHqTr3UA
iHG+s7la044D9TaBTnsD4O23KQ/D0nYUGJOFi+sCIHf0c+h/uQT/hbU81qP+
cKVnIf5lOlGfYfj6LMMfdlUu59xJIPKfOtRbXfWHudTVmkuRhP4Jj1s2Vv5Q
Fc7eIxdO1N/m6Ht5jz/4unIPfQ1sRyWGgJMHuz+oWghM13m1o0m52IPgET9Y
gY3LwU7t+GBel+9Fri+gnBiX1sV2nC15dCEh2xdoQlKinGfb0dLkfP/Ju76g
83en/GOTduR5t3R6/R1f4J5WVE/Sa0e+8+lLfem+8Hhgn5GVZjtad+vWRqT6
QnzzIRsJ1Xb8ufFftM4tXzDPA4+pPe04YsYMZU/yBZHY46FlO9uRhRJ1szPe
F8YCDOO9t7UjKcG2KfSmL2RdPJWjuonwLwFWNWJ84ZLhmZpVvnY8SZa1+Rvp
Czv3n+/uXteO2ae3jLRE+MKs+KUXkattqLtBxCPomi9UcDpNmSy1YaiXY6X1
KR/wXnD/uXGOwNzuRRM7fGD/mC/n6w9tKODJxev22xt+9QRtzn3dhp7tWwx/
P/aG1srQXU4v2nA+dENkZK43hKZdO7znEYElPw5tJXnDMVr0iR/dbchcWHew
9oQ3cLglnG9pbUPbjfIlRpLe8NAi1T2slsj3e79n9ocXxGpmUnXLCP4rCr03
+rzAdFde3Po8Qk/oRh+Fu16wUbgk+/ltIr8rVemZjxeM/K2sTksk+N7WswTr
eUHGdF3XhShC71PP9zJbvcD2acvgDlobjlPvD7/45gnSLR0fPgUR8aHW8ev3
PGEm7/5SlTeB543/qN/2hNLYRxwk5zbUNDWV/eHhCe6k5yIadm0osX/FgXHM
E5TtRuTYrdowi3yx0X2zJywZvlXrO0Xo66bp2I55QPP+D4Zx+oSejykHP171
APK2T9YWR9uQJbp5H2mPB2hyfXMTO0TE+Rct1o+4A/v3JcqEUhvey7ExiQp3
hd6xlZtFsm3IV51mcIXqCtH32LLdJdowglbsfDTEFU4yOKtVRNpw16ZYhlig
Kwim83X95m/DJVddsWU/VxiiCQ8yOdpwiv6i/Lm3K6S7iX649q8VeS+oXq70
cIXzZySWTvxsRYs/HlpRrq4geVSGQ+hrKw6cDTnu4OQKk7sUREamWtE96Ly7
9hVXKBJWlrv7phUPnBdq23bJFVxXD6pdHmpFBbbMvSsXXGHPzBFD+cetaOD0
9+GwtSssPNW2/tbTiqGejkJ3H7pCfYu+W0NbK8r2nI3cMuIKQfknKeS6VlTt
udqaOuUKGjfNb2qXt6Le850fhBddgTXwXBZXfiv2Plj36CarG3TbXax6kkGs
t9lbysXvBhEnHDqTk1pxhm0XKVzMDU4ccHt+LroVPS8lH/wt5wYCEj6TkvRW
1Px74KPnQTd4zhX4Yzq4FUWsxGOmjrnBre+UdRU+rUgyl9t+ztQNrF7TN/m6
tCJnlnnp4wtuIH4/UlbtEhHfnbPjqJsbTDDiDrGcI/Rk8iVUB7lBfvotg3um
rRj3O21eKsINHOkZ56INCH0Ox44mJLuBgnuOq6kWkf9TgM6S6wbzZ4rIImqt
6Jgu0+TGcIPaoxWxb/YSelR3j4+0uUGAfO3dPDmi3kTnr2MP3UBtQzPDWbIV
G3k1eCqH3WB1FTuUNrdiKusJFpEpN+ic6Xm2JEDkr3NepX53g2vPHr5v5ST0
658KnWZxB/3Wp4vhLIT/9t3SBnzuwFvwcq3+cguOuFizbQtxh4Gbrzfyz7eg
9dzrza0kd0gKfL/zxXQLxnVbWp31c4czlz6q3n7bgo5z/V1LXu6wxeir/sWX
LfjVRc0iyd0d3hz4YbXzSQvuOJL9n7KLO+RI/HH5cq8Fue1Yl544uMMVblZy
TXsL3npltcbd3h3kFtfFBta34EBB+SHei+7w+TXvXahowfp7v1JLzrsD474g
Y21BC+qrgaS+lTv4Vol0PLzTgnRWyrNpC3dQvS3+LD65Bd3E6suunXaHP3Tp
92diWtDW+tj3ijJPaHfftbj1agtm8Rc2RY17Qril0trJECI+cPabvbAX6Ggd
2Fji+/98F0814n7gVlDf6enagkzJeG7eEC94tEFL9YB9C0p0/n05UukFcf90
9VfOtSDLj56h3PdeYPbRyKrzNMFfZrPOeZM3iDw/7RJhSMSpq1cUDL1hrPVs
iLE2sX713fIsxRvuFlyIET7cguM3Vlryq73BLu5y5itlAu8yYVhPeYNMkEtl
1i6Cz3DsBb+oD8xe8mJekSL0lWcpoJEPVBgFPFUQJfgvZNQ6h/mA10HyxMJ/
RL53v5tgnQ+oSNK+N3IR+aBoWT/jA8vcN9iprC0YWvPex0LMF1oXYzcc/9WM
LA8DmAsnfYH6JkmG5xuB2WPUomi+oN2bfvDpTDNqsva+39bgC+uqs/RSxglc
2jzMmPWFvtsFZ88PN+P4kebuI+J+EHu1zHn7QDOGnonrvHfKD055VAd/vN+M
85aXe7eO+cOGs43RldiMxo8StW6O+MOwVvsdv4Zm3Pnh9SjLS3/IUOiuOFzZ
jOQs7STvQX+w3diHrIXNqP2v22XyqT9sZxkYuJ/ZjNdY7ewsnvjD1McX72Ju
EXoKRUm9/f5Q8nx04XRsMwbOz5Wp9fmDe9u7NaLXmlHq9RuW8vv+oFw4LTxO
bkYDt1mfbT3+8CPuy44Cv2acyfpvXUKnPzQGfT/g6kbsn2TWwM70hxD7X7rK
l5sxYaH6ekCbP2ga/7Nctm7GTAHFgNlmf2BXXevcbtaMSu9kT5evJ8F9SZ5g
+gkCz+Z+Lj5Igkie/6INjjUT52eiM/ciCYx/bLwjoE74oSoC6VEkEHwrVjG0
rxk9V9ipMUQ/NdQrhRnyzchQ1CgivyVBWrXsgN12Yn9r6FXOXIFgnbH7neyW
ZuJ5yqSb7QsEiWsqC3OCzZh1ydPu8PlAmPRQW1PHTfg/ReXedj0Qis5qCgez
NaOJhl7CP0YguGjr7Dj6uwklzj7+NfYqEHYrnjjAsdCEnjTBow3sQbCw0VT3
0ccmzIoXdozdHQT1LJaWie+akDEw7G5nGQSBs+edzo40IZNhY74vPAiODF4K
2va0CU1im7ewlgUBS7tT1IfeJhz/uNTx8EUQdBd6ZJQym3Ce77pu4r8giIj3
K/dqbELbLMGKM3LBYBgc3H6QQdR3cvsocjoY+C+HPflbSNS/Nc79MiQYnhlf
H++624QsntvXJRQEwy3VmG83Ugh+ht0pw4FgsJJKZDO52YQPOE1zxtnJsJU3
TWjj9SZManw5fpuVDOM/MqXHKE3I/8pa98xqCOS9zduf49+E4PbuheCfEHB8
UKLj6N6E4t6Xox//DAGFGsaZ3VeasGZmxjlyMQS+ZtQ7Lp5vwq8DLl4630Kg
+lprYLM5UX/X3F22uRDw9+yMDDVqwtAlj6X22RBQs+q9rXO8CQf3ffMNng6B
Ve3HZbxHmnBowmuL6mQIdCgOtj1TacKINQsfF8dDgL7p1eNUhSb8luw1XvU6
BPRYx9/aSDeh77szBj81yMD76cO8tFgTCnTJHZrTJ8PA4CfWT0JNqGJs5f3e
jAyJ7d8Eq3gIP+tqpIYvkMGi6Of2gDUEv4TL+4fOZBBN+Kty5E8jpr77r6fd
jwxvgtforPneiCaDYsgIJUPOZa4zD2YbcfzA1uHsKDJcPsnveHOiEfOazfkS
bpFB9tCGQPNXjejI/Z9dWDYZPkttidzyrBEHvig89ygjA4NX8va7B41oS668
eL6BDD5LMmWFHQRfQOp6g04yHBxXaHNrasTeyKmh/Y/I8PuB8uN9VY0YQU1v
kxgmQ3uN6ttfRY3Im1nZwf2eDOF3NOYxqxH792x7//0LGY5fP8Z6LZXQ+25G
cmyZDJxeBoIn4hqx9s0HShcxr/dbmWwXjGhE6YzgpWI+CsQds1AZpjYiPcY+
5uZmCpjttj6eGUDEHa11fKUpsEnEzsLeoxFDeLY+sNxDgVesjg67HBqxFZde
qalRIPOTG2nephElKzyWn+VQwO6Fz416i0YMnR5MOnuXAjIYmB5i3IiWUr/P
jd+mwMciaqmWTiNm27w1ckilQFnC1VZOjUa0y6A7zyVRwDMk6tHj/Y14c/Rj
lV88BVSuxL9JUmzEg2L80n9jKLB8MuWr1Y5GNLVZZNIjKdBy6A6L5NZGfJud
FsF7nQKU7bn/TQs34tTUalASjQJa64ulynkb0VpROlUslALrflbs82FvRAM/
rvG8EAr0jdceO7TSgAXtFaaKgRSI6Ws2//e9AUO5hOfr/ChgUsu80vOpATUW
/zr8K6eAcOa9gKj3DRiSsPPY9WoKDF/vjzg12oAUJSvga6BAhteztE3PG1BZ
ZUtLUgsFLpwbLnnd14B0T4V+USYFpI6/acntbEDHPz7eWd0UmNo92e/U3IDM
2fSKHQ8oUCIy+3pPNZHfc4VS8ogCbmzzcz+KG7A50nti9zMK7P38419LdgM+
y+18VT1EgcUXfwTC04h8CUOHA6MUaERWKb34BpygCUY0vaVASDHHPr4bDchY
ETmiPkkBSFx/bDC0AdPfX7jWPkMBNrKQeTqpASO8P1zS/EKBe1c2X7H1bMAi
/vIXHd8oEGmyLUDGsQH5XrWOai1RwFhtR8TnC4Q/U8f8u35T4D9p+bTqM4R/
Z5wLtP9RYHD93hLSyQZk13vr2LWGCqk/D7Ro6DYg51OdKi1OKli/U+9nhwbk
vnwjs4OXChIPtV73HWhAwY3cBzX/o8L7Wr25uN0NWLZTKb5tAxUKMo3/Wcg0
oEJy66nbhlRwjjAT2CregOMzbA6celTY7W0l+X5DA/Yv0or8jlFh4ZytcvH6
BlxuhI3vNalQd/yKtsfaBrTef4BhcoQKpD2uZvv/1iOLs4N/+yEqqG/2vvxn
sR7fWjx3VDhABZY1JP+Oz/W4/CfweroyFbo/k69fn6xHi7PnnnHuocL1IVqq
0Vg9zrgH6AfIU8GAeaNYaLAeG9Qff/6wkwp8JTebRx7WY2fnhVYzaSo8S0x+
eLerHnlZFRq7JKhwi3x77HJLPd7bdzM/kuA765D9Rb6mHoWvSEXl7qaC2KnC
1W8l9ehheFyqXZEK42rl/I059XhqJWXNsAIV8qRrJCjp9RirWPvoG1Hfga9p
77GEepS6YxnDQ2D55XYt7sh6fPjlqe6OXVSYe9d9eiCsHmUnen5ryFGh+mGf
/a3AerzezFtkKUsF/7oBP2uvemxb+9nYm9B/6O7QNSmnepQoyvgaJUOFlYix
lBnbevQ+KhWZv4MKTO+JogrLekxdQxZHYn9065kmX5N6fLO/uGx4OxX0dOb6
1PTq8ahwicqCFBV4lBZHWTTr8cjF0HoeAj/e/PvzvYP1+Ehnm/IOSSokrGFZ
jd5Tj1nq+YUahD8WX9byn95Zj+v8EzdZbqOC6Eseic3b6jGeX5XqJU6F18z/
9r7dWI8Fi9rjkVupkFWySSufrx7V2Z/K5IlRwT5p62mXdfW4RqY6uG0LFWQp
2+33rtZhR/S+fy9EqfDZQc7v5486DPucYLRI+FV5as+1ti91GOnKP2ZD+OF9
eH8K7UMd+vdIpzwg9ndgx+Ei/dd1aPrzGUWF0Pub72gT/4s6FGMTTbxL1G9f
1ul70V+Hzz/8es5N8IdNnBi93V2HpBzvo/4bqXCs3/TzxdY65FWlj74TpAJn
veXfnbV1eL1gd44RPxX679rwzZXW4dIXr+QmHircvGG/rTa3Ds35jOt2EO/L
aR9npaDbdZjK0cWawE6Fjec9j2om1uGTkYGgVRYqvNLxN10XVYff6AESLn+J
+1gp5FJ/eB1yxlJqCy5T4KJouG9CEIH7uA61GFFgB3vEVUvvOpQ4yJr7fD8F
Zr7E3BJ3rkNGbOv1L1uJ+/hlYuHkRSK//vcmrnXEfdyR1lhytg5lE06clZkj
w77Suw88T9Vh1oMkw+NDZPiZlP/qgH4dhhaafrncToZmSumnFU0if6DmSEQB
GSiOVSudqnXIwnivXhZLhqOmDetvKNWh0tL87FN/MqxVbxM/KUvEw5/r/rIh
w4MdXXs2SNQhU//GaSldMkTzP9Ac3UTEGwX4jPaQweTX41PZ/IS/9u4BgZvI
IPR+0M6Bow7j3mXeLPwXAi/7X/ko/qvFVL5ki5dEP3G7fpz+fakWPbOi+jkH
QsAmayq5aa4WIzKmvh1uDAGpyM8F1KlaZE6K93hmhcAHn4WG429qUa+9R6cw
IgSKzy/38gzV4vgj13NvPUPATXd15OmjWuQc4k3efDYElPayf0rpIepNXvK2
OBoCi6LcK+fbalHqqnn868JgaGAXWC9dV4ss78Pni/OCIXhug/hsGYFlOgP8
s4NBY3jLHkZeLUobC+3UzgwGtk5JTf+MWnQ957/KfzsY7pXuPKWeVIsDRp/+
jqUEw41kRTu26Fq02+G9oyQpGIyo+3x6abUoPMHtFxAfDAJOh+ixwbU4Rav7
fCw2GAZNIdnMpxbfcXtHC0YFQ6r68QJRl1pc8dc0G78eDOdkDBvG7WpRq1fi
WAU9GLYJnOotsKrFvFVB65CwYJj4ZTHialqLCqKbMgwowVDw3npW2aAW5+tP
WO49EgTOj+z+LB+tRSXnAI8KgSBQbHDkxUOE3131BbsnA+FblvvWq3sJf6cP
/6lqCITaSN/dhnJE3Dc2QzUqEEi+QfCfJLE/ddmgTptAOGwTavJSpBYFPLmT
TyoHwj/daxfvCNSi5pbST2/XBkLX3mjvS5y1GHo+n+IzQoJrWxJocixEfdFP
RtzlJDBYm5r09WcNMlZDz+aFkmD91zv5dV9rkKllk33UjARPh3Prg6drcLyM
tmNiJwmSO4vvH31bg7Zm3z5c/RMAlmWVwxwva5BFqHBC4UkAiN2q+/jocQ2a
jORseZkTAG+pLb8T79WgJ8twHN0/AHKdOnis2mtQIKZca79BADicvi8mUU/w
m59V+rg1AHYdeaQ4VU7EI8Ossr75w5zMc42yfCKeTO23IuapKoGRk953alBJ
v/6aSJo/+P1+Y6uaTPAf2B0+4uoPqpOTXqvRNRg68J0lQ9MfVh7NhnfTa1AU
HJNfbfUDZsN8YmRIDSpkWrjab/EDWvZSnolvDUona9rNifiBbtRK3UbXGmST
lgkgbfQDbj+2+2OXavCeAUcpm7AfPLbhHM45V4N+XJN/o//zgwQ9vo+Op2uQ
07bVYxO/H5grC//ebViD4cZxLDm8frBZTJTnh1YNfhi8wFDg9oOxtRJiLWpE
/e+7qA0cfpD1dYdimHIN2hR/c9Va6wf2I/Iaurtq0PdnTeAjNj/Y2bX35Hqp
GvR47ZVvyeIHn8oO2j7fXEPML/dPCL8n5vNbR7zS/iOexy9lvfuNPuAdqh1+
gasG5x2iFyixPrDfWT9xByvxfPtpZw/Z+8Cv0yfzPi1X47z/+VdLh3yg7Yh5
XdV8NXqirnsDvw+E7jx3L2CGwAur4sEfvOHYfxdfHhmvRpP/bD4ebfEGjj9X
ZtYMV6OSa8UjnnhveDjp+uvBk2rMUj3cP3zFG24+9uaOu1+NLLp/J4vUvcG0
kbTFAol41NKmEEFv2JhDURBrqEZbdpnLpjNeMBJFPzJRQfB5RfXLt3vBHb9I
46ICQh9V1pgzyQsuXoi74J5JYNk/H6edvEBa/5anyq1qHGD9c7cPvGBGOSPs
d0w1CiTv9GRs8IJSsZwE5tVqjINUq7RPnuCxrij3GpmoL/XqwtUOT1CeL689
4VeNzAHRMN8UT1gaqekRdCP0qgnUXnHzhOaupqFhe0Kf3gc2a21PIJfjdKY1
Efev/W622ROOpvQs25tVI6Wcw8j1uRuwhz3kkj9RjSlZbtafn7hBr/NT0W/a
1Zh5UjzVtd8Nos1eyjccrsaI5s0sX3rd4KTGa3Xyvmq0enchya3HDYRk3xtp
y1cjb/e82VyHGwz999GGa3s1Ftv1H/Vod4P0P3MeT0SrUaFtwWq+2Q3Of1gM
TRasxtTnl7K8GtxA8snv+HPc1TiVv03we40bfGhkyZVkq0ZxFRmGL8MNinLW
1U7/qkJlSkDQUpkbuEbz9pR/q0J1upAXqdgN9vgLDvl8rMJtOr8Tf+e7wfcL
ItOH3lUhkzVZMTzXFRr0xZf/DRP4lMwNHoorBO2T5ro3UIVxLe5zKZauoLF1
l2h0bxVmHbJYlNnnCqwcSvKmzCq0va7U3bjeFXrm96uLNFYhw7PaxGjGBW68
Omz0prIKTZ41JE12usCJ7qM2eYVVKPH9aCLljgsIVOh6ON+twgFnV8MtJBd4
nmIUqpRC5N9gtjWbukBK2On4pVii/qOts9aKLmDlcjan9RqhryNigJXTBcTN
L9SEUwi+pX+exRPOMKFxuVvPn9CjGv7wdJsz5Mu6vOBzr0JNutA4S6ozOAl6
TQ1ersLQiNIKhrczKKz4/0w/X4XjreoHLxk5w/yHEM6L5oR+Ge8gEVlnqH0S
vnmnERHfMOk/wOYMAU0Ru74cI9YX/5WPeu0Eh3NjD9eoE36wCmXoNTrBanTS
iUCVKhQQK+7lTHSCTv/086BArC9eE//QzQmu2Wa5r5WuQk++6OxEPSfQNyig
PtxShZPcmoEypo6wXqUsLl6oCjW2an/SOekIA1urs8/wVGHvwMswhxOOkMTR
WL11TRVSdqyqR+g7wplvbV3vfzPQaUu9WLGOI2wZ7RosXmBgePU/iT5tR3jb
/eCDxywD+2Zf6X/SdISciidL+ycYqNatm8Kr4QhXUl9wrIww8LWGDtfuw44g
Fz4q0vmUgXVWQ3dPqjrCF5d3chEPGNi8adnKa78jVJlPqxl3MHDKr1QtUdkR
fOGLoXATA/X95jXq9jiCqtx361cMBoqAxzb2Qkf4I/jLLauIgfMaGide1DkC
rqxSrmQxUFbAbzW32xFoU+xxCqkMTB2+ts/7uSPoDHBnL9xkIPOb/kaYcATu
ZoHqxutEfqndPe5vjvAod2MXhcrAYXyt/eKfI8THiA0eC2Cg6rv+uEw+JzAL
kPrA7cHAorPeZVe2OoHIRdmlgSsMnNkze0tRwQnGDHZzpNgwUHPtYZPvak5w
V0VF5LwFsf6P33CDvhNcEleT227MQMvRm3uCLZ1AhlNT7eNxBo7fiTI/4uAE
s9+OG1YeYaCEspPBqp8TVIwaWvvtZ2DjNRm+droTePWccjusSMQ5+7JCiOe/
v/IMhXUHA5cfGLGp5TjBcur5m/fFiPxSFeUlhhO0hl/KihEm9hMVurcKnSDU
1anqNC8Rz9dY4/LYCbQtPDo3szOQpW9LzHbivPGFzhbgz0okLe3/9uqTEySd
Xuo1nK5EFmGd/PjfTiC2k+3Ty6FKjN8rWpIf6gw5v9evt79XiQnPt36lkJ1h
1+PNe+brKvHqY19ryyBnqM7ecSokvxItpLYt7A1wBlW/vT6cyZUo8kSMwePr
DEy9I8lJ9EpsG3S79cHTGXTE9BskfCvRaJ9gPro5w+OvZiNllyrx4SzXWJqz
M1h02f5RPV2Jin/MDvs6OMPYLdetPVqVSLH/3mls7wz2ziQ4pVxJvF8fvOUu
OsPsEfrF15KV+OzoLkN2G2fw/i+O5vRfJY7UdRq+tXKG35O383+wVOKj8Arf
5jPOENpYeD9svgJFLp6mbt7jApzRNR/Xj1egrIuv6VN9F4i9gDzpTypwQHmv
3XV7F9i476GiDFYg5z6qw2GqC2Sse3myuqICHfPIV76kuYD0qwkvjcwKjPDb
f/ROrQuUlc8l9sVUIPOyNZvhExdQDvtdZ0Em8PHNhUsfXaDZbN3whCuBpSqU
sthdQVNW8Le7dQXOsDzK1N3mCr1/tor9MaxAzaWQb58PuYLJEzmN64crsPdN
m2ycmSsM5ey3FZKvwKyFmGN7PVzBxv9o+F3RClQq/XJs4IYrTOob5clzE/vx
fS3nlucKrlvP3mv4VY56DIvvHOgKi/P2M9ofyzFr1CY76///Z3V7cg8Ml6On
v5HKwUVXYEsNUbDuLcdeW4GSh3xuEOESYTzTUI6prEvrbP7//xQkefoWliOT
pcRgTtsNbglmJbCklCPLrv/8Q2zcQHyqtDb6Wjkum19v5Qx0g4KmhiER/3IU
aE4+kJDoBgoxXct5l8txuKalPsbFHWptn4juNS/HnK1jUR8d3EFNZVS97Vg5
bvj48uZxe3fo5Ji20Vcpx90bKzuzbd3BYHQh9MX2cvyYd1F61dodBipWcy4K
lePJ5K+1VmfdwTKcu+cLWzmembb0bTB3hzfmG6cDF8qQ5fYdO2FTd7giJ8W1
bqIMzRltVC9jd5hbUZRPeFqGJjubHj42cAffgUNG4h1l+OXfTR0FXXdYyT3u
UcIoQwU1rfkb2u4QHnAq/kBWGW4betI7De7AbXi+pvNmGZY/Vx04ru4OceJO
L4ypRL3389Jh2R4gsuD785V7Gc6vLX2R0u8BWT2hmx1sytA2ZHi85KcHyKRF
H/5uVIaOyiUq5//zhArX1PPUI2WoeafK8L2MJ6ho5lF5FMtw+UIVw0HdE1qF
GNkpYmWotH3QfvaUJxybbunazluGDGWmo4uDJ/Q13/9Q+acURaIyWmdDPME0
9jmH+qdSZOHXtXVM8IThi2/lel+VImfmvdOThZ5gu/+ToVlfKWY9EUuxafOE
Gc6fbuNNpTjvrr/r5TNPcB9ji3MtLkVGzon1xjNE/1PJV72cWorDdGnNrr+e
EEITHaRHlGJR01DnASEvYD8jsyRAKsXlTWbJRbJeELlLWeSOQynq7bzdIKLh
BYKrR9TkzhDrT4jKXT/tBelP9a3rdErRUunil++OXiCRb045eqAUB2rZ/9hQ
vKCIdDHr0Y5SbFSr1uhN9ILdJ9w6z24oRROzH3/2FHtB/bbAyQ/sBHZ58jGZ
6Ac1vtPXeS+WoPJnMcNsG2/ovhcnu/q+BEV7Asucrb3hRHqGQeTzEjSpCNql
YuUNz9yKXDd2lWBv4baev2e8wepobWxOdQlGVTmG3Df3hglhJmN3TgnGPTQ3
iT/tDY4zD581x5fgmx9TmudOecN8y8tFnbAS9FQSM95x0hv8b77f+NyzBA2C
fwR8PeENq3ZfVS/YlqD7kHd7k4E30A/8sfp0sgSfH02SpOt5Ay83BzkASvBq
29lsYx1vSHoteHfNnhIM1u86svmYN4hWiXfcFC/B0MzwyF0PfCCHvuv9Fj6i
3tOG2uG/PiBreWBt0d9inGd7+ClM2RcY8lo7Vb4UI/PCyPGdDr6g+s9InzlW
jErNBTd7b/tC+7OzLif6i9GW71zP5QFf0Cm4HDPcUowSnylTq+x+0B/oVWlf
SqzHt/OJh/zAzIj8dD69GD0LXk5KuxPziMSN7yGRxTggdrazKscP7BaTNnAF
FaNmsMsNtZd+MHs/62CyUzGy9HKoIY8/eN4uOyt5luCX2j0IxHy17N4YXK5H
8B17e6bV1x8oWt13DqkWY6i8aI9KsT+s2ziAPTuLMevT+Jbi1/4Q+3H03alN
RL6ekfVmwQAQbpte82ZdMQpcWHftqk4AZMR93+G8VIQmLV9TvwQFgJT9P92l
D0U4EBmfdKqScPYgj3P4iyIcP9lLqnofAMo8m6L5eoowzvvU5fUiJGh8I1WR
XluEWRHCq/YnSKBZvXtAJq8IPVNPFDcR8+29q2oL1YlFeOlx0aaeLUFgfFZH
GGhFaKcz2pYuEgSDCqYHHnoXIW/l4RjPDUFgzWJjecauCC04+67qCAbB5HOn
oPenilDP9FqhGD8xzxf6ZXgcJfREey4s8ATBQlBY+x+lItzeGHHlAWcQkIxj
xq9LFCH74OM1WWuDgEUqjU1YoAijx7X6/NmCIOJHnnTWv0Jsez3ZZPQvEPge
MHQUvhbirYe1z6RXAuFWRqtj45tC3FBSLbyyHAhinr2Rxx4XomrgG+rzH4GQ
pz1YNtBWiGyHVIVLFwJBYdP4Y+vyQrTl7g3QrwmG6tlP8zMZBD7oWCz8ORjU
2n8K+kUXYpxymfyodAgw49fsZw0pRAmLW+p3zoeA3mX+MzEuhegZdXPC6lYI
PFbdErj5XCHO/90kJPwkBCx4d97ONyhEk7qPA70cZHjzVrltr1ohMmVrxAI1
yWBfo/G2Ta4QBWT6f0gHkuHzNQNWg82FyPh12rq/igzeVhbbhzgLcbz8hInH
LBl+K9odt1suwPkftU/Xb6dAOKu7w9x0Adqmxo4XnqMA54vAG0EvC3BcdSTk
SBIF4oqulq67X4ASdukFj/spsDEk/lFCPYHVu86fW0uFzJN3vooXEPjSlZz3
R6ggs734v9LkAgwVDfF18KdC2VLtvoNXC5Bl0mhwqoIKKn1M8y7fAvQMyGNe
nKZC853+gJP2BWhZNyP9mT8UtLyG00ZPF6DAIwPlHQqh0HtsssVBuwBnlpce
nNMLBROR+dfflQm9agVr4+1DYfjTn39UqQJMbG+ZdFANAxvkkOIVLEDNca8/
RgfCYCpB6FgqawE+VctTVFEJA9cr265If8tH/cemwaLKYbB4SD6CMZ6PRenk
SRalMAhZf7BEfSAf5+5KO00rhgHbO63+XszHzW90uR7Lh0FkrfGcWWU+KppP
d9fKhYFAhJXAu8x8lF27JuP2zjBIPXdF2S02Hznm0mPDd4SBxB5vs1/kfBzg
r8xw2h4GBWwU/6tu+UhxhnsmkmGwe+hG6n/n81Fw1ZBHdVsY1BYnN985kY/D
w6SOTdfCQJ2cPSanno+Wt5xviieGQadJ+WqdfD4K+yfkS2eFgYF0k4TWlnxc
9NO4K1ceBs9+dms95ibqXd+UqtgcBpYPB+ytfuehmWHOVaX7YTCeOXZt6mMe
nnj2yE55MAyueM8UeY/k4VhFstK+d2Ewd3yxb7U3D13Lvs0pz4WBPzFGRzbm
YZn0yzt7/4TBymce/k1FeciSYHRkD2c40Jmb9uam5OGkhOUj+Q3hwJ20/fSe
63mYOv3daKdUOCQ47PFr8SfW80uh5J5wED18OEX3Sh6uNE5IbFEPhyw+3abn
5nkoxrPPR0g/HGQnTEcvHM/DvC8i9dwW4VBRZ/P3k0oeWgvnfmS5FA4Hbjhv
I0nnoa908/olj3BotfY/yi6ch61OW6VmQ8LhmFL4pbg1eSggriP9+kY49K+J
vSr2PRfHpX0lntwKB9OXaYVFE7lYpuG1npkbDq9K8h+oPMtFevmKC4MRDraU
qk/Mjlxk5cr7bbydBjOn2tYbVeXiVEJU3A8JGnjueLBnJCsXj5mcOZ4hToOl
5cFTl+NyUfIox2ZtMRpQ+sd9vlFzMfjybZ7ZzTRgz/qcTPbIRZM2oa3xm2gQ
7bPcwHUhF3P1PI1UN9BAWJf9VbJxLvpzVGW8FaRBuqjAiqRGLnb/esF9XYAG
UnNbxCsUc/Hmtrcpu/loUNSxU1Ntay4Okvq1h3hooJS8z+4eby7eWZvJR+Gi
Qb0j0E1XcvB1z+nlHRw00FA3LHjzKQfvNH1hecxOg3v8Z3qdR3NQs9JU74Mq
DU68t5td6svB2fsnQ38cocFgvTsvrTkHebcsPFirTQOryKDd/CU5mK59tnqD
Hg0mzl8zuZ2Wg72/H27cYUQD570J3jtv5KD6U3tOFVMazLNnJtWQctCkWvOq
1hkakIaL68ExB1c+tMeYWNNgtbRu+OGZHDx2WEHK5iINrlE7fp/RzcHhJgct
lys04Dv9SGzyQA5xHl3nAlxokCQzouEpk4OPnx6WoXvSQOz3pO3Khhxs1hv8
eNOPBjmP5sMj1hL5pw4cuh1Eg13ZK3nCP7KRom4nXEClAcOX837WZDau3DsT
zKDTQFVP+KPCYDYucou4N9+gAXOLBE9TVzYuv6/73BVLA52v8orHa7LRZFX+
Z38iDR53Hjz5NCcbxRmRMS9SaWB2S9vrfEI2ytZoVb2+Q4Mxp5OJH8OyMSu1
0+hDDg3sj5yr8/PKxsGJmpzPhTSYFXB4yXoxG5cEdf2/l9HAe9L7V4xJNvY/
o7xrGKfBcgNli6hmNm7/m3lW+w0NQqMijxTsycaJeJWFx6M04Lxw64Lytmzk
i4dSqxEaxCrnhLXzZWPGb6RPDdFg47qKXIPVLEx5XEfxHqRBxkhTz9CXLPzN
K5m2+pQG0uU903avs7C3jnUw8gkNSkKfcn3tz8LV3jN7Nj2igbLZa/ng1izM
1NlemttHg+adH404yrKwZLe9rlIvDTT/LHok3s7CzWGi7G09NOh9zJKwLSoL
l47ovNPvooFxDm9taVAWDq7b/Z/xPxoM+YkMHXTOQvVEcTuxdXSw0Zde7jqb
hRPrJ8Q+8tJhUkxJ1EQ/Cxc3xbvVCdHBdf6w+phqFvouT0iEidJhoUvXxlE2
C0WSCzROSNIhKOV06OKmLBQ+otyxUZYObC4XckI5snCmnq9sfDcdBMhDEZvn
7uKSpM9q8X46SEjP9e99dBf7Qj42eqvTQeHh2v8Myu6isuSJUTVtOqh7bzW3
iyLy92dfZjOgg97m/WlBznfR8sDMmQcmdLBknnidoH8XvdMkq2+eoYOjg71k
qexddLx+wtfchg6+fCGXuzjuou2Yc6boZTrQ6xKLR6cysfuEr9JbFzrEWZd+
+d6TiSr36LtyvemQtaZrL29+Jr5K04u+EkgHRskrP2l6JtrcEbKQC6VD66mF
JvVLRDzvQsSna3ToX+ZaNdPKRLPYru3lMXQYviup5SZJ8KX9EnFPosOMzqFr
V1kyUcbDIGn3bTosfzHpu/P2DiassTT8mk0H9mRHvvr2O5jn9/O89ls6CKuH
mj6+cwcjxEWulI4R/rxPuTUVcgd1sqvihF7RQSmy8tXquTv46m/X6+CXhD97
74tvOnwH9VROGk0O0uHE8Bu7PaJ3MO7Y6bcnntHBmrpUoPsrAxm7BxLrnhD+
yPB9ujCcgSULPc7ij+hAerRjD6khAwPjVOyv9xH++B7xibuVgds5xULn79Mh
aYt5Q5FfBuafDWk/20OHvE7XP0yzDGS/ar6tq5Pwx4kOI/syUDmyMEeBSQem
QAbtm2AGhlr/9jj4mPCnoeY+18JtnN29vH+RqDdm85BH6ultNMvhd2cQeGbt
+5NqjNu45GTS7Urg5bLfiaY3b+NkT4WwHIE5zQSHnd1vIymy5fSHfsKfP3Ji
NKPb+FtNNSKbwNI5R21vK9xGk9t7GecJrKR/Nq+G5zZGsCn0byaw5rznzMPZ
dPzStn7sxUM6mKREKEw+SEeS0NjbeAJba2R5rhSlY2ZY6ksjArt+aKgVjkjH
1tCjXVwEJkU/WVZwSEc746GcHsKfiH3T6sd10vET5ax/GIFTX62Gnt+Rjt78
fUeOEDgvbGOPH3s66unL/Fp+QIda2d1cse/T8EX2taJaAjOfHDcq6ExDbp17
hp4EHvA/H9+enYY+57neyxN4bKvfi6HQNPyaJ+Y+3UuHz93Rm79eSMNJ28Kv
OQRecck7zwFp6P/Jy9SGwJxCrdnbxNOwYy0pdjOBRZqffzj4NxV95VmX3gwR
/lz8JGcyloqjd0WMjxHnQ4VzjbtjSypmlv7qLX5Kh2OVotWh6an43DjvCj9x
PkwslJdSA1PR8YbITj/CP9u/+mpVlqnocM6Ce5TQ55p3kfLgYCre6z4vcJQ4
HyGGgZ3vNqbirZ7dhwq76RC9ELfu948UvHf+AX09cT5S04oMBF+k4PkYxe8+
SIciTWbsrtoUtDY7R3/VSvgz/fKZVmIKdlabqh5tpkN37NeN57xTMK5IiL+o
gfBnP8c5n1MpyNyfyclfR4fxMfG7UUopOL+xSvqpGR3maQfe5/Kn4Jj8w7cv
jxP+7DLe2Tp3CxvfVb17e4AOvM8uuww+uoXdmdMzMzsJfwLJlZ/LCMzTt/m7
CB1kJZK/s0ffQvUSf7tVLjqo3i87uNXlFrby+vRy/6HBMffu4P0GtzApeElf
5DPxPdkwhkZyt1DMPHFa5jUNbFu/r7nCeQtFRiWyDzwm+o1LPHqU6WQUESvy
10Xi+8C9PfrWvWQU2yzneJZBg7gqtYGK/GRsXJfr55pNg1RLU+H79GTkjdl4
NzSB6Bf+OVm+vZSMY1q0yWQaDRoLwjJ+aiWj69TH42W+xH1ulDbOL5WMrbUm
XV2XaTC8yJCWZU1Gk1hn6zELGozf7nXUHE/CSY69gku6xPdda7zMEpNQZdJs
UuAQDVhmf857ZiahteSVZwq7aCAQz7//BjkJP0fWP9XfQgMJ1Z2B2dZJSHo9
ou3ISwPZtxptTYeT0LaYrHj9bzioXrNgfSaahLv3lVcLE/2YnqL78dlfiVjr
dk6gLSscLAev3mAbScQDDeSYy5lEfxZ855FoIxHnF97FlxEOnlJ1/+1LSUTl
APGp+rRwCH3Qb27on4hFXzI6LqSEQ5znZNol80QU8bnZyplM9JubVl4HqyTi
DY6loaqEcChqF5JKEkrEHyUDAufiwqHxsvyVsoUEPHd+mzN7bDj08mqXdD9N
QKb4xER5VDgM11jNjTESUPyrSPAZor+csfJW/nEzAUmPu5RZr4fDPGuk/3qP
BORsoA/v+xsGLMXZzTuME3Be8nmK+zQxL5g0rR5RTEDP3rTTpU+J+eDngJYF
bwIODJ2797ElDJQyZ665f4rHor/lr+QKwkD1OMvDa33xqIm2KS5xYaD3eRP/
3eJ4FIjdsFIRRPT3iXtON0TEo+O/Q1yL9mHgqKab8sQhHmdMVtvVToYB6Z3N
6LROPOo9FN9KOxQGoRH+21hk4rGRp3H7I2IeidsTe0lkbTx6Ot17JsIXBllD
+YVKk3Fo+VVv15XlUGCQ2z7pdcXh8AnNXXUTocCUfrHnYk4cpo6XPlv7iJjP
Hn72CQyLw+Wa6O2WDcQ85s3eGG8bhxEjb8TKskNhZrPYSjHEYei51HbW6FBY
Zu7T7BQn+ML+cJ71DwWWgVucdX9uomZB5p8q21CQEL8X96HpJg5ETiXxGoaC
pusPkY2km6gU+mrccX8o2DZLZ+scuImWd3oH7m0LhVBOM7mAxViU2BPlJ8Md
CnEWtKrC6ljkMYveFTZJAUZe9aFhz1gcn9/7I22cAgML7zo498SiiTNtsXqM
AvOa/xkc+hKDjsxQ2f5hCgjc1HzmVBqDct/l4j8MUkDitYdVulMMxrFRd/8b
oICm/N2Jvp0xmDFHZdn8iAK2gY+d/3yIRuMGBY59DygQev/vgnxeNOZYX9Uy
6qFA1gbFYGu7aMx6c6PaoYPQc8l6TYxENGocUTsT3kboqYqKansThVGkW0p3
mgg9/5qF5jKiMCguU6OxjtBj/D8Kzjycqu+N4qYKUZIkKRIplXwlSeUls5Ak
CSGVKUqROS4hQ4SQTJnn4eK6873vVZJKUqkkCUmTCkmS+J3fn+s5Z5+79mev
vc45j8f5krveMQklYm2injdGgHreGqVDa5JQb/g5rqeHg94X09rIV4noOvjk
jJZfOLhqB2uSMxNRgir98sjmcCDFVbAHjyTieKf7i8DBMCjseWm4QpI4nzHu
ezs7DHiKix/rdyegxGKNysfWYdDtt+voxZQEdNVSuMwvEgbj3NNviy0SkNSl
MabTGgoS4hlnnosmIC9r53RISCioO979JvggHkm6Arnc/0LBumrykubVeFRY
ldIn/CUEXH9vmD9tFI/q+/oo9sUhQDI6HJcpGI+u70a31DuEQOEN0rL21qvY
7ULZI7IyBHhDDVnTkVexcJPhiNejYOje8W69iu5VVH9+Y0v3lWAYv7ys4thc
HJIPFojs2xcMEp37d8QzCS3uHVM3FQTqsr40enAcKog33lKqCwJrzzz4rBWH
vNNT5kVngsCV+uj+ml+xOFi69tbG9UFAEvp7yLw5FlMVmRE1LwOh0Ea1N/RC
LJIZRwX2XA8EXuFx15odsahQmLCj0yQQBr/Hf3rzLQaVN/lH+NoGwPg+up9Y
bQxqyX841Xs4ACSSPs7s847BcNIJH4NDAaD+WjrKd3MMfjfrv1lvEQDWKsYi
BaNXMDPs5Oga8wDwu3Qprav0Cvqs+nYs1iQASHdL1yy4XcELqyPHxg0DoHBF
T9GODVewKmp1qdOBAOC5CKq6votGSVtqRAcEwGCdRlNqfjTWpDiGa+4PAL65
kzqtjtF48b8l+YU6hB/ztDsTa6Lx7D7GoJg24SebZ67YG4UZDRdMQnYRfkZ/
PLPJikK+hq7gtyk+4Kcp73jFNgpJap1fXj70htRoq/fNksTxNWNXpxd7QWH3
5bMj3STkM5F+t8fAA3jr635KXSc09Z1AUeQZGPTpDzOyJHSmuvg29ingYy0V
ClxK6HfZc30zJ0FPMlDG8kYkkrhdz+t2uYJrfc/m+uWRyNftqmz2wQkKzXfu
WX4tAvm61l6McDkOg6NpZn7ChNZLSP77+igoXBk//jTmMvKdKQri2dqAnvwh
bw1+Qivcd825bQkkVl3ojcvhyNdbfN4gyxh4x8SSpv6EId/mmt0zsgB8U965
RwMJ7VP8MF70P9BLfVBDnQwlxie1t71eAq7bNrNXnye0fTCOK2/Cwo64zuCv
IchXuWK9qMIeHDz9of+1B6Gv+VnMZxqgAr/hN52RYORLjBnyyDVH1/zif7mu
hKaSZxW6rZG0h3/Zv/4g5NOfsje2sUXeC5f1zscJXXj50MaeY8h3kauGLwKR
L0ztO+uoI+otWwcKNoEo5SR8r7XeC0nVYYeiui7hHVcjw9AaLyw07nMZNr+E
tt80xzUqvXBwWNvP4H4AdvC/6vha6oUKkTdJpQYBuLFga1dpkRe6rp1OXcTz
x5N3NPicC4jxNNsi933+GHVuzHl1rhfyjjQ33qdfxMRi+y/dN72Qb3zFnc27
LuJF56DixAwv1Lvm9yyh8QLqFZteNUwj/Gx+Mvxl+wWc9O3Mnk8mxrdt/3mw
2g+TWgVe0RMJP67XBOs2+aFQ/ld9/6vE+NkXKnLG55G0wD+09ncY8jRumA7o
nkOSx1DzT8kI1Dtr7VW42xf5duhOH1pNQl6JeKKbug/y5MesJZSJ3PU/rFba
chb1LiSKszSikSQV/2h0gzfqMa9usNa7gnyWRmOVsoRvI8fUJ5YxSIoVED+7
0hN5+S7H9zjGIo+D27eLeaDeF3p4smfc//8uaPVDyB31NtrMPrp0FXlqOucb
/51GXuHWZ1PR8ajn8fu6//Qp1GObCAmnEj13m0Le9cMN9XaWpS7KTyRydeHp
748niXUxCPpWlYQkiR2TjEFX5D1TpCP1GvKl9yrPNLkg33f9I+F3k5FP8IhH
eOkJ5N0qNd3YnYJ8AY8r+bIcke+FWTal/zqSRky+xFw9jiQ9KcXsAOI+efTO
VpGQYzh4qVPx0Syh2/f5JnsfxUFm8eGfpDQk7abVr3A6gnpyolSJJelIqvxv
PNPyMBYaDe/dmJyOfBr2pzQjrLAQ/O6rEs81fFKWo/tOmmOVpZXu2cU3kW9a
38vI0BgndwutCRIkdK/WmKXKATwduE3uCh+hA44N1ErtQwGR+ybX/2Uhn5b+
CKdvJ3b8eJ6bO0voqaM9+foqSFU9IlP5m9DjZaQFraXYyTDkUKYIPbNo8z6L
lSCeX5nYOkHogB3Cc2tU4VJPBKnr+/+Pb58fM94FIq73C958JbSm4cwb0n5o
g+gPnz4RWnt7yJm3B6DWv8F2+gOh7bSnnWaNgf7Xakzw/f+vZ+Bvu/ogTLxy
rV0xSOgbVuMHNQ+B3pvG/be8iffE3lpqUeVh0AtNmGhTzCdypnFpHe0I8B1R
UBzuI/Q0beete0eB1BdpM55egHxx+yeleo4BaWKs8of5beRbdZecOnwcSJvo
In78hchXanpebMIR9Fa8e+h6gtA7u7bHL5wAnunv1eYMQg9tmeZf4gp68eIT
W1cVIa/S5wUsOwm8wQ12iy8UoZ5fA+XyKjfQy9xp8rqTOL578gZL7hQU6hq0
lW4uRr0FTf8/G0+D60nrx54xxchrD7LZvfUMKBg5uikPFiMphfnfJQ13KLxz
6krf3hKCxz+J5j0eoGfnox5/swRJ6/TGx/U8iR7181L7SRz/EP1EzdQLSDOH
1B5blSKp9l69zyFvKGQERJ6uLkW9AOGUaruzQCroOzG1qAx5ew/6fjrhAwqx
K++HnyxDPcEUi01nfIH3aajzH5s4/rB762mfc8AjJagHyZSjXvrKpcX+52Hw
spnSZ/9y5Nu+9df5/X6QocPkM1pShbzUzpFlrX5wA87/t1SoCklTvj11hhdg
xjQu5SlfFerZL2+z6LgAD+0WVmf/q0Q+Nrn568GLIOTV99h5thIH5W1KEp9c
hLzI1WTl35VYeOVn+pYj/lCeQ+WO/axE148Z0R0v/UGSSfvTPF6JCge1Lno4
BMDYW9mTYd+I6zW8Orl4IAA2LR6cOvClEnmSIYfLTl6CxxpLWkQ/ViIpUFbf
8MMl6DuVWvTsfSXq9bHU33sGgs2tMGbOIDFe94RC9Fgg8A3ToqbGqnGwaH75
Br8g6O4VXVi9qwYLFxUu4E/iuWLdJ6rm5Rp09dL/4RwUDDw+i6aD92pQ4fHw
wL/ZYPDre9DuJF6Lg+oxXXkRIcC35fp3j6O1yMtQ5u4VCIXur5FbfPNrkTTT
XtcXGwp6K68H+3yoRT0nz/wQ4rnL9cedN2e21yEfTyRZJjkMyMUGR45fqkPe
xppwmkQ4FAqIvzPm1GHhVQsfu4xwsHaSi1RbVI+uX785/lp9GboPXtwpYVmP
CoeuH8zIvUw8Ny2f+5pRj4NN6nt3ykcAT3+qt7W/Hguln6n+//9iXLU2PExT
akBSqL/shU2RIKGb+sTRpwH1BqREJaojoTvH7rM8pQH5NrwJfyVNAr9jSqsH
/jbg4LOaqXJ7Eth38W9/tIGMvJhwn8Ac4jm+9NaxUiMykrUsR4z6SWC95Ghi
qBcZUz+tc1q1PgriDVeRLZPJ6Jfz/fmISxQIS5jLrG8ko7UFHqQURYHfn+kP
O7obUX3++t0r76OgrUOXOvS4ERXIrnuPKEdDX5Fb+Y1Hjcjn9l+zokc0lMe4
UY0eNOLgSoGtk5XRoHFBd/R3eyPy7j0rbv0SDUEe07uq2xqRHFQim7btCoR5
JJY53WnE1C0B6a7nrsDuC7Oay3mN6PfGUFSdeK+mxBiPtHIa0Tp5VfTCxBX4
UnSuOYBF+IHRP107Y6C/42KxCoPwM0G9UHApBpL/2DT2UQk/JVc/+9JiYGbn
8sFkCuHH1v7k/j8xsCG4Qk2/ifCzeMtrsb2xYNjkre2zuwkL6X+s+8Njwcm9
8KSXSROmej/sqOHGgme9zOPTx5rQTy5XL4wvDkrDvg87ezShdddZuvmBOMg7
p5l2LKiJeC/apy4bEwfhy3cNW11tQgkN8crP9+LAXoj70vBmE/KNvJVnLLkK
9DLyuT0VTTiYWX8z3uwqjCetqN5Ga0KeSeRy+6SrMFf7Kn79fcLPn0NXVR5f
BYk1wkuXv2pCUo3CwvSyeJBbVKw+P0r4OTER2G4dDx1aZX++ThN+lt/5npke
D+Q7K9x7Fzejemu6+5meeFC6//HSXelmlPA/NaApnQDjkZu31G1qxnElTTsh
+wQo9HoYmanVjIMvhbqe30qAa2YvQ8KNm5EX/8Ko5E0CpN6IW+1m14yFOuWc
i+sSgfxA75ixezOSxgJ3HXBJBCdW5N4tgc3oWmBSt6IoEQKW890TjWtGa2sZ
5aHhRFAn54p+zST8CHzOIyslwYiR7a8HZYQfCkOK5J4Ek13xA0s3U3D8TOK1
Q5VJEEEPMPJVpuDgakch+S9JUJ3G6e5SpCDvwdbw71uvwTmHUyR1BQoWhs39
5PhegyeS7rbp6yhI2v74bHLDNehk3rOYkqUQ7zX5750mrsEpm2gvOxkKWqed
c9y2MxkyX+dW01dRUN0Anv8NSAY3a0mJtSspKPFr+cFH1GR4SP1w67IE4ad8
8E7OTDI8FpM2HRSnYLd9o463TgqctymRNVhK+BGNbtoTngKVV5NXlAsTftg2
qiLcFHj4/aHlUQPCz7mNxb0LKSDks7aHbkb4UZhaU6l/Hb6c61Nca01BvWdt
aUFXroOGrltjuB3hJyZTxOTedcjJp+S8daKg8NpmvSTBVLDtvPN1/ykKzvjn
zl1USgXvHRql+V4U/NR5he5glAoF/763zZ2nYK+yT8AB91RQNfpn6RhI+I2w
VVe9mgrpO44BI5zw+2rf2IrKVNAcmsmWvkJBsrpy5Z+OVChcGHXwTyD8J4if
HvqcCmS1DbFPrlMwdfiX/APRNKIfKlZvzaJg/N6BN+StaWBqGSIZl0fB4Iz2
m9kWafBsz61Lg8UU9PxWf4TkmwZ5JEF9nSoK2hvfXO6ZkgZTZi0BNxooaHo7
8tGhhjSY202RGGsh5j/jcXV3dxoIaT2UMmQT8z9sbSA/kQY5r7dG596hoEK1
9sJiyXQIuD3qPNlBrI/gBtZ3jXSQXuRx0/QJwcdJJOjlkXToeH9VqOAFwYcy
ocENSIeR4d72n28IPuJ938sy02H0hJXFY+kW7HW/U51MTYfzqS5/xKRasAOr
3S+9SofrLp2dFitakCdzQ/HETDpYPMpov7asBckXwgYM19yA2uf00c6lLVj4
8FTONp0bUBmsvV1cpAVTN1rYSTneAAPmyhzLxS1ICteUnAu7AeHZ5ttTBFsw
+IVc1/u8G2C38u1oF18LeqotSnzEuQFdqo/al88TfK5+M2oeuAGDA1KPrf8S
fAZf8Ocu3IDcHcw/aTMU1N7D5UQrZMAXOZbF818En/TyEG/9DLCeTmgY2NGC
Cl9Tdtm4ZcAMK2I6aVcLShgGTey5kgFqgqMO2ntbkC/fpW5DaQaMjNAMR/Ra
cPyXiZfIvQwYXXKi+rpxC36yUlee+JABs5yXcToWBJ8KmaHexZmwuKakd+Qw
wYePP5+nkgkZu90KU461IP34Z/tK00zo/5zxdveJFqxseiqV6pUJ39cYpQ66
EXyWMruDEjOhYyiYHu9J8DldfM2lJhM+/VSzUz9H8OEkmpp0ZsL8bXevV/4t
6CftL7TjWybQ0xUmL4e0oOt5R570siyw0HIa3xjZgvYdBuHzalnQFC97+kFM
C5pu2KY9eigLNNc6W55LbEHtUKmpx35ZsPmNXK1kagtufj7X0JKWBW1JTiRq
JsFn24ez+U3E+SlmD47nEnxiH6vEPs8CjTN88XOFBJ+Blvc+U1lgumJje0E5
wUer4Lbtqpug4QWX9WpbcPB6nOM+rZvgPScTOtRI8Pl0brXSsZsQ9TE/gfyN
4KN/7PnS4JvAzpnqefqF4JMD139m3wT3bUGmPz8SfH6qHHzDuAkRecojUh9a
MNtCYsndvpsg/HWhQmuY4FM2c6f6700QlVmcYf+O4DM/GJEulw1+G7UrQ/sJ
Psce6ITuzwYr8ayRvNcEH3Lj9EnnbLj9Qt4MX7agtUhOk1lkNjiHv3gx9Jzg
4xZ97r/CbLjGT0sUekrwYXmrrmnNBrUzbR4qXQQfqSOjfMPZoFvxz8f8UQvK
+O4t/iRwC+7cd8vx7WhB4faNzt0bb0F30fYVzxYIPvJisnTDW6DQfd8pW4iK
40FTL26fuQWVZQtZziJUHOzuT7sadwsMF2ucUFpGxe4t9yzPV9wCnYLhqs+S
VORF14kc67gF5e/Gw+tXU5H+JvOe7udbkOKf8vKiHBUrNSOiNonmQOpddZrW
BipmJ7vvX7Y1B6wuta+fVaZi/KjVn18Hc6CdZCXOUaUiCXa3vPXJgUDx+9GR
O6joly1/4V5yDtgs3hmpr0lF14kl2+vqc0DIJk1AcA8Vrc3HP2U8yQFZr2Gx
tv1U1CvpLQ0fz4Has8oFMQeoqD3Hcz29IheczVyohiZU3Hy0Ss5CIxdkdUlH
hSyoKFOf1rvzSC487M4Ku2tNReEloRlrA3LBdWF+c/RRKs64uFkLZuZCsdk1
Rz0Hgg/dXOxrSy5Yp5yWnncm+KzY2fHsJTG+MNiadYrg4702hvk7F5p2NY0E
eRJ87grqFcvkAXVj1fedvlQky439TdiTB1rndQQnbhN8LvXQLjjkgbbG11sz
eQSfLrb/8bA8aDN1cODLIfiolO3Qz8uD/qarhsI3qRhMSv66mZMHUX7+9hIZ
VPR8falCYiAP6FHrsmTSCD4azqdm5vMgcDT2n0IKwSfJWH5QPh/uF9SmbEki
+Iyovbmvlw/F1WlmGvFUVN+/+mbDyXwQFt2ltjeWigpZCzY3o/NhgZ21zzCa
4PPj47LIknyIvksNsIwk+Jh2P3Rvy4eMdZkv7cIJPoX0OKsP+eD06p3nl0oq
fvpTeEBrcQHoNPOOUWup2GuTML9OpQAMJzSloskEn5oLzEWmBRB/anmDJYXg
I+QQ+M2zAFQWsV7L0Ak+Jw5ovEgogMPdekXvWVQspKp+Z1cXQIR4gEA9EnyW
r6wufVQAV06Q/wXdJfh4/j1zbawARjqcb+jfJ/i0vt8QIH4bTm/xuCv6iOAj
2/nWUe02OOQ+Tn7eRUV7f8otg0O34fud9MncZwSfzryjW/1uw4/71IlTLwk+
yrErVqbdhqSYPUlb+wg+Eb6PZxtvQ9wHWZx8S/B5dTRh+NltyOp3SmYMUVFC
Xdfo4c/bYCI18yvyAxVjDG/wHRctBLVqvj9Gn6k453d1oFO2EIKqPbOWfqNi
QH4YW29rIayt3dTVPU7FsQfncyh7C2Hpz/yizCkqnp4+FbzZohDsp09KOswQ
+VK0t8tzKoRgF7rS+jnC/yELTQnfQhg0cskbWiB4hulJxlwuhOw1Jwdd1Glo
Wqk5/ju5EOaCcnNsttOQ17O562xBIdg+GYw0UqXhPv51te/qC6FY/r9UbRUa
UravSDyChfDd89qjrUo03OawyPP+k0LYUTP5n/wGGpbG/THaO1gI3qOn7kqu
p6Fc87eNDeOFkCU7GLl4LQ2z3w3xb+QvgjsmHh6zq2koIfbyXdaKInjn+yfk
uxQN47UfckQVi+DvtSza8Aoa8p3h5kZoFIFYma7Cq2U0DE5rCpk8UASS1Inm
R0tpOMUpP+Z+pAhW8hou8oRp6PMlZ1ffqSJ4Q0+y0dCj4Yj09ZVWAUXg5hAl
KGREQyeDKxOtMUXAvhdz/oUZDXvPBz3ZlVkEmSvLj5Rb0dA672xdVVkRCDyv
bA08QsOODpekddQieJ3JaTK2p6HeryNeae1FQJs5pCJ9gob0DaYmi14VgUPl
VvkPJ2moabVPOeQjoZ9H5jS707A2VF3w2+8i6F558FbUWRoqVSgNuQoXA63i
2tpDfjTMey6DPTLFEK5qsEHuEg2l+MTzTbcUQ8mp89WfQmiYuo0/jL2nGMo4
EjRKBA2Fj/+yVzcvBgFrFRPSFRqSYj9rlToUw3BXk8PBeBrONL6VkjlbDG8P
sCdWJdPQb+DpZFJYMTTza4kNptFwTLS9eyGpGMzOyFZXZdHw9G5mvX9eMdyn
X3t0MZeG/afqr32sLYaWtbLn9hbS0Da12NuRUwzaEY+uC5bRsJOdZfrkcTG4
PDHY9aiKyM/nxE0GA8VQXPnDLb2eyM+qSCHa92LYZPb3wLYRGmof8B9WXSgG
3/SW4EVDNCSf8+AVLC8BjbKlbwbe0nBzrmOBpEIJ+EX986L3Efm5fyg8Tr0E
VFSSlNNfEfmZMnCY1SsBpyyKuE8PDTMUtLXPHS4B0SchisZPaShmuU16+GQJ
qD3tO6XQRcOYEIWpoxdL4Fneq6ezD4n8lEs9exBdAuP/+fm8uE/k55kwef+N
EohLLd1JbqPh+PxccmNJCWTTA1SSWmnouXXirDKlBDZUD5q4c4n8HPtgdqut
BPrdSQ6NX4n8xLxWEX9RAss3OFgU/aBhD/nxoqgPxPiBz9WpP2lo8bb1/dSv
ElAsKbCP/E3DNhFqq+fiUpjb0ZLr+5fIj1b17X7pUgiRdb3kuEDkx63gsrVK
KQQmU96bCtJR/Xq6Y9vuUvDP8vm4awkdK1lxe7RNS+HB/r0kxaV0VPgUurrW
vhQ2X1pZv2w5HfOkzv+S9yqFvM2TfrOSdJTSP/X8Rkgp1Ee/6vggTcdrvsca
lySWghO0tXTL0lEo5+D1sJxS+Hqbtpu1no7h7eD7o7oUULvJqkyRjjOTOw+e
YpXCq99Nsymb6Ognv3nLq0elUNvF2husSsdPB+WWHOwvhR+d91ecVKOja7DE
B+5YKZy9PRFupkHH3lKhuxr/SiFq/3j4f1p0tH06U1guXgZlWf+tXKNDx85/
YxGy68sggDWrz6dLR0PVIacUtTKw3M78N6pPR7bdCx0BKIPy+qPWj43oqHnl
gUzgoTJQ6j/ObTajI7mBM/3ZpQzmvLSp+YF03Nzf2HPCrwwq1wpJu/nTsVC4
vOkpqQx2DzBKNvnRUWZXTqpRWhm0NB53+epDx9STKecYRWWwMuu9KdmLjmIp
0Rbbm8rAPumY6yV3OsYwA1WL7pTBtbSWMp1TdJwb9RZe9bwMCir/yfC50jFg
pcto/PsyyO7ewbznRMdxONI297MMQkUsEpKO09HTx6TYT6gcDI7YxB22o+Ng
9l7SiFQ5TNcdaFx9hI7293Y42yuXQ8qadaIDh+jYPbFxX+eucjh3OfTyLcKP
xXoZWT3jciDtccty9qZjm7nYTLNdOTRJPLq28Swd9wXxvVTxKIfuGVnbT4Sm
lEw15waVg9qp3N+1xPy2dX9KWx5fDosZlEsXfIn8zPWfv5JdDi+vBjzadY7I
z5anlr8ry2FguG3mD6Gzj97bepZRDpdMpOc55+koEc0QefegHEZb7N5EEfzi
6+s+2vSVg05EcqrRBSI/b4rutX8ph8Iv9HUiF4n8LMkq0flbDiz73uhOQk/t
TIyqX1oBJI0xvE6sh49rhIuiXAXQu3/22ATQceTaxf1Z2ypASnm8ddUlIj8M
97Wi+ytgbFlvXC+hez84/LlsSWht9sZcYn2tJQ+9mjhRAeHxQdkngujYoWvQ
cuZcBcwfnf0gH0xHvbO7b7yOqICN91tFhgnNvrn1guX1CuiwXidUGkLkp03+
UOvtCgBNbfaZUDrWjq/cvotcAREO7zNUwuiotE54aRWvAs7dr7A8nknsJ7O5
T3JPK2DxmbRWmXQiP4Hj7alDFXBn6eNTvSlEfopHSoUmKyCP5aCZnURH4Se9
0cEClZAdoLPTPp6OpL+drmOSlcDU8nGViSXyo9Kq67qxEmb4x1m9UUR+bFvk
enZWguvLe0a3Iug4RqqaNTGshMHmb/+OE35O1+X3smwrISHHY0SWmE//6zTq
jjOVYJW4888bgp/94riMkkuVsPvK4X35xHp0a4ReXB1XCYaxrXXOxHqaupyz
TsqqBL/UK5YKRD54SW5qC+WVEPJ8l0d3NB216XZi/jTi9/02hEtfIfIzYv5l
9H4lTMqTmpwIvW0FdDj0VgJ9NeNuMaFL9+8s7/pUCfdqHamfCC3nrRJz4E8l
/DUUT1KLoWNG1lo3qkgVpLzW0A8gtMTd5XqqslVg8Jv8mkHo+B+C6wtUq6D9
bpjtAqH55Gb+rthbBRZtUY2GBJ9g07HXsQerYPhH23gCoccDBml/HKsgrdBI
8gmhfYp6Mn19quDnA0FpqTgiP487/IfCq+CQ88Jfe0I7zbIPH02ugm0H9rTl
E7pnU+OOB/lV4NnedG6Y0BZHysT311fBW0fHv5uuEvmJvPWVzK2C4782ep8l
tF5t8gOlJ1XQuzOD1UBoem9URfa7Kmg8IP3jJ6HVFwXGio1XQZLjB2FtYn1r
//M+ReKrhjYfK77w/38HydlZf0qiGurtfr5CQucl2sh7bqiGDrGDFYIJRB/T
jP+9+a8aijUlirUKiD5+r/Pm0IFqWGymqD+VQ+RHYgfjrk01RHxpXdZ0k8jP
vo03d5+qBpk1P0T9Mog+9lx9qcafuF5P1S61NKKPM5cekY+phrR1kyljyUQf
ty6o38iohuCf96VrEon8fP+5bElZNQTabX3sRfjvl/00FtpCnG8s17SZ4G9r
0v/w+71qeHQ3595HEtHH/t2Vbi+rQbarfEnFZaKPC9viXo5WQ/wZvWB3Yr/w
OumnzX9Xg2iix+pNxP7T/lN7gLukBvzHjobYlRB9rFykoCFTA28jU051lRN9
bJM5X7a5Bk5vf/HUqJro44iE/jV7auD4SofH7DoiPzWXmclmNdD9xszx/9+l
ynh1IZvfoQbqNA7FVVGIPhZyD7zkXQOOPa+t5OlEH6s72H4OrYFY15bmDBax
n5ysNE4k1YCUwboWESTyk3BA4mluDawcFjsScYfIT4vWd8PaGgipvJI8eY/o
42HVTjq7Bmojo0+7PyD6eJl89bbHNSDsJtL7upPYT3tXxhe+rYFV31Z/sugm
8uOxxF3qew2ovKzPwOdEfjL+GsTP14BybOfb/14Rfcz7sWFuWS38N+5/t6SP
6ONv7xfOy9fCEqdyo1UDRH7W9L59v6MWPv7wPx03ROTHuJN1TI84njMg/3uE
6OOLvFuPrGthskA72OMT0ce3KUFwshYsXRK9Xn0l+vhR5dHmC7VwpKld0OQH
kZ+ZvJ0q0bUgPTCjSp0k8qOUtiI3vRbatm2ztFZkoNDh2B/LSmoh51D7lbn1
DAy/HPI4urkWPjkJfKlcy8CpKt+a6bu1QLUdjDwqw0C/lycTvHtqgW+3q5HA
KgZ+ErDzGBiphSeC0ToNKxjousPcyOZXLaxmGbk4LWNgr6PuxvZFdTDgVNMs
spSB1vEa/DrSdbDtc9Nu2hIGdlI2vavbVAc/XJy+nhZioOGQLGfD7jrQbK3o
kuRnIFt8eW6mSR3MimUO8f4RfawjGCJiXwf7DJSUzs8S+8n9t91lzzqYP3U0
a91vIj83vmpOBNcB/Wu50HFdBhbiO8kzCXXgNlHML2jEQJmx5+O9t+qg/fl1
q9qDDEyV6eiyqK4D7fM647Y2DBQ2YtfymHXQKzD4ec6egTEXyImaj+pA+LKY
dqkLA+fySz0r39TBAUetN+buDAx4mG0sN1YHTBONnnEfBo5NX1NKnauDaPES
xSx/Bp7eGCUgJF4PwaTSdp1QBg4eujQYtK4e5v20eAMkBtqHe3G/bq+HgkX2
y6OvMrC78kSei249iEqJUJRSGGj64nDoc6t6cC4wq2/PYGAbv7G9iQtxfqTs
vEcuA/ep6WixztdD/bGwEuFiBlIc1KR2kOphk49bQWUlA7ddVZwsTq2HueFX
300aGFjaLN0tXVQPNs6CmaMtDFQYFK1PbKwHgT71tBg2A7PFFpLmW+thUkNs
eMNdBkrs+el18Vk9tE8KRnIfMDD+zEeT0eF6MDTkpDh0M5Av/Y2yw896yAqe
XDb9ksgP94lgl2ADhLflnNu1lolTX+4O6Us1QNizAytbVzPRZzUdW5Qa4KdB
6GcLKSaOGNTmb9nVAAMy+hO9Ekx08isMyzdqAN3DN1XPiDOxNy/j+Aq7BpD+
Fp45IcJE6wfxu2PdG8BrbOK/iMVM7PgVvupPYANsOzS9ICrIRD3FCz99rjbA
mVWJCzcXGEi3OvN08GYDSEGduvIcAzXDjjfYVjaATqfLjaYZBtZWWCZ30Bug
h12koveLgUo9+mf3PWiADxL+3x5PMDCPT8uM/LoBev1uqb3QZqLUdlUVpS8N
QF5v0qmtx8TU4+sXZc82gNjS44O5JkwUMkiYiF1EBrkwVa15K8LP8SuDKE4G
PdXfj13smBh+/vKTP6vIwPxvWSXvBBPpsUHcnevJEFg4fk/hDBOncy/U+W4i
wzNupgrJh4kaTWfzKtTIUD39pnPAn4nnOs4kDWmRIXHVm5Z9YUysHnAJXQtk
UPdJHr4VzcRPU8e9jpqQoZw0YTOdwESlpbb21w+RIeug8BKbNCa6brAyeXCM
DNsin87XZjMxb7eplqArGZw1LHWWFBK8LQ8o7/ckg7V5GMO1gonSp/dJBfmR
YTr6WDijnok2oVqCjcFkML/zLXoFlYkpqeqTX0iEnysbH3tymPiwXHVIKYEM
teQLjtjGxMUcpW7nNDIciHi7bVUnEw2fr8fsW2SY3+Kp6/2ciaTPMvXPisgg
0VB4k9vHRPaCZL5YNRkmn3m6SA4zcWaV+DXjJjL0330v2a7BQs1tS8JITDJE
H/8ppLaDhRcP8Hsz75DBp69cNWsrC+vt/9pPPSRDjvH8lXkVFn4598tE7TkZ
lhb8kfBQYuGm2B9anm/IwBvMfvpEgYVuuZ+Vi9+TgbKs/572OhYWNr6X6v9K
ho8qd78VrWFh//23gtJTZDi1zcpsqTQLZQZeTR6aI4Os3OXeAEkW2k49HUoQ
agS534dyB5axMFW0s/uuWCM4cNrTTJeysEuhHf9JNcLAuSFW0xIWiu7m1e9e
1wglSwvXrBNiobElM/+CciPYP1aI3QksjD5FuVazvREWnYx/tMeQhdyQ+rAP
uxrh5LGoe2DGwrnrld7yuo2wmiy4zMiKhdrlxcePGzdCa/J4h9kRFgaw80xv
WDUC9/fWOUt7FpKfZe1+bNcI87ytZYdPsPD7p9RNS1waQX4X766tGwtVFxJX
6Xs0gt4qAftjHix0XxUrFHa+ESrGZ08e92Fh8dbIn5SgRnjUWjTkcIGFA/oh
w98jGyHg0++XjoEslLP3f7o5vhHinOb0ncJYaH/Ol+eW2gi/aA2KTiQWZsR4
NORlN8JxsxUhjrEs7M45WfCysBEOXVQ0ckhkoVijY7JEVSOQ/o3E2V9nofn9
o+HmjY3wxNhS1y6DhXFvD52NYTTC6b92Z4/cYuGdn2YO3NZGkFz0Q9y6gIXz
IoZmMw8awVcrZZNFCQt1FHS1NZ41wv3AFopJJQuDtbRVfPoaIWjuR+uBOhZS
LDSky4cbYWzHH8P9TSwcd9u2aPBLI4g1R9/9/I2F20I2Ta352QjbvlXSdb6w
0PO6wvsjfxuhPu7JcNIoC8vLZJ8lCzZBUuS0/tthFg6zpFrvL20C3qt1L9Xe
sXD9s2VkfqkmsL9udJv0hoUOn4Rv75VrAtNy3/xnr1iYNS+QckmpCbLlsrqV
eljYI/UvvGFbE+hPcrWDulkosfX32c+axPkqn1486GShhf6Ew8b9TVDLWlEp
94CF8ce+mp0wagLvhr0N5++xsN33g/ZNyyaIEXD/eqeVhQIx71SeHm2CBUqq
kzSXhbo5r6WXOjfBHYGIwwzCbyj5+SIj9ybg3mCfPDjy/+80P56KONcE/n+O
ar39wMKp/vvv6YFNsFjfsufcRxaq/2x9NhnRBHpCEzv5PrPQR4Tduu1qE7St
UzuSRvCplKeS3a83gV1S6U7FMRaO7CLfLrzZBDcyqnqaCJ6KFtUpfbebwPiX
m5bBDxY6u5VelqpsAvqxp/bPx1mYE1zgY0Vugp1GP/aemmThy5Rsx3h6E7ga
cN9N/mShZFm6+R1eExTf228Y/YuF1qxre+Y6CD5857xW/Gbhtadxm7WeNkF3
idWhwhkWdnwkrfZ73QSLDg/9UptlodB86OLqoSZgvVI+wfnLQj2pS7/ef26C
rtTlsQf/sTBC9fzIuklCQ7bv63kWMvW8nh+bbQLSmNBqDz42TtudupMm0AxN
em+ip/jZqOF7ovGRaDNokfY1Rgmy8dyVY4WLVjbD6SuU68sWsbH21uHrsJY4
/9jmodzFbPzUcDAiZCOhq+7G7VRho1K7kW/z1mYw+vjFN3IjG137wenbzmZI
lvZIfCTPxrzJPQdV9jVD0m7t/tVybOwT1tQ5adgMeubOp07LsFFaXm1LrkUz
1Fi9lm+UYqPNrs0yL2yb4Zlh1Yp5CTamHFRcsvxEM1Rv69I+KM7GzpNy06Zn
mkF7sWlmtggbhYOlP0T7NkPsU2mVUcKvYYpED/sSoVN0vu8UYCOpVPTu9OVm
2Le/+UsUwYPNFGpSj2uG8rckuW6C52z3fKF3SjM4HKS6HV7JRq2PM9dLs5pB
c2NS2y1CX/w3GTFQ0Azjm76NDBG6fuU3X5mKZpC1lVyiSvj9suWjk01DM/xa
nLboIqE36w0dvEZrBleJimEGoU/bvdFpx2ZQVXify7+KjYU+L7bwdTTD5rNx
/5kRuj/6iYxOdzNkKQ+UpBJa5taDJQG9zXC2+8PkK0LbNdydrhtshpm+4vXy
0mxMv8f58PFTM0gHSam4E7rrDa1nwwTBi19HrI7QopONdx3/NENk48qun4Q2
Fq5tyuSnwMO8Ih+d1WyMWV9e9ESEApJ3holksZGnWZgqIkkB81Nv4D6h58xz
Ig1kKfDU6nKAOLE+2iczzl1WpMD88dexRwgdEJRygqZKAVGZOf9bhG5KjreY
0KBAUHAjvCP095LovVv3UgBX3X+ntIaNqsxw1TMGFJgRe33Cm9Du3YFrbh+k
wN25130NhC4e9RN+fYQCqiYn4lt3snFwzvu3pBMFDD6Xnliuzka5lWdGLU5T
IMxTxfPENjbab3F5EedDgaG2kYqazWzMgONtvAAKuM/3y80qsfHZ0SPNs+EU
WLNK4r7pBjYu87Es1oylwLhwRPnNdWw0jzZJO5dMgYnXm1ijxO/HZeuTKjMp
IBUvukiL4HWnfu/54XwKeK7cEhMryUa+e7uc5cop8DosWvvFMjbue7PD0q6e
AsGt0orKS9kYPLFlXyqVArtHPuhdWsJGyhKlrQ+5FFAa+ZFxj9hP4+vWywrd
p0CBWrZ2B+FfTVNGRPcJsR4VVpHLdrDR21xyJugVBXoSQvJt/2NjuavYx8Z3
hDZMd88heAwHLn759SMFuj8UDr3bxcb1yXz3lMcpEE+/I6aszUanktlmlxkK
PDhq8dFLh43ZjKniW3wtoPfq9IX6fWzsefI97blwC4gE7qqZ1GWjxOgnkviK
FjAerM3Q0mejxdzweZM1LWBq/Gx7qAEbEyXfOkdtaAFvybJAjhEb2ze/smRt
aQE3d+XzfKZsFICn+3791wLPFmxWG5izUffoo607dFqA7/L287EWbAw9e0/W
60ALML1ogfet2EiPQpES8xYwX/F5u8hhNk7dZMz02xDn57dnmB9ho3p980dp
xxZoWH2mJukoG33a6l5an2qBymNnLnQeY2NlX8W9xLMtIMU5/VHMgY2j40WU
Nv8W0FKwWm7pxEbFJXkl82EtYPF6vP2aMxud12Wla8e0wK0kqclHrmzM2Zka
dfFaCxxw8dvrf5WNvWaJfrUZLRBpFmTBvMJGKdcYl9E8go/56hv8JDZaB0ZY
KZS1QLer9XKzcDZeuxa836GuBXqSFVtTg9nYUXxxW0ZLC6x7mlzZG8DGxQyf
tV2cFihSTb+ncIGNB564iwq3t4BHzg4ZL182Rnxw/aPf1QK+Cu6FjV5sZP51
+BT2sgWa2LucZ88Qfbzi6KuWgRbifa3gsIEbGzU3H2r/MdoCf3cXhv5/Pn66
Zi1bfrSA0Oq9r18Q86+1NSg99bsFwmvzJE0TiT723n8jf6EFvGzG+maTiT6O
2h39agkVlviP/6hNY6Pbzf8urJCggtTNzXecM9lYULfV9aAMFayErFUkbhF9
fFf5UKwCFfJyyDKteUQf98nr4mYqnBKlZV8oJPp4fM32P+pUuFvlUbGhlI2p
i6Xkdu6hgurfF4ZPK4g+llu21FefCmOa836kGqKPdwrPlptR4SVvaOuOBqKP
zQQ+Dx6mwtW8iEtvm4g+dpl7JetABYXUF5ZJVDZyL02327pR4XjBKEWbycbZ
pPGWFG8qJPQ2Vn/gEH1c/KW04yIVdJbs3pHeSvQxfeSGQBgVtF8HHtC9R/Rx
10D0vitUUB8NGPncwcaxkd4LgUlUYEzKrMrsJPr47zNX8g0qbG5o7YFuoo9X
PD70JZcKciqRil+eE32scl9XqZQK200W8We8YuPA/tbtzrVUWL579Oz+N2yU
tWXJZVOoUFC0LHh0gOhj75alz9hUGI9w7TSR4mA6qWF26T2Cz5Kwv1ESHOzK
qvps9JgKRk97XdliHBSrK+mNfEGFsDchc9PCHDS9m3+f8Zbgu8m5679FHIx5
fZP68wMV5hpjX/rwc5D3I61s+3cqmEeMS1X+I/p40bUMj2kqWCcVJLz/w0Yd
ubgrRfNUEHp9XVN+mo2BGqSLbxbT4KxH2yrHSaKPTUNPrlpOgzitfdtvfif6
2DnA+tBqGlgb/w59/oXo40vnIEGeBs+yfs0v/8hGzyRPtbsqNFiyeTfD4j0b
S4vc1v3bQYOmPUfJP8U5OEhzEtutTQNmS5h4IjE/uS67v356NPjEGBZXWMlB
+xHrL9WmNJDZVFnZsoqDWbPmr0esaXD7RsCkuQwHn0kYdaw/ToPTm0eH3sly
cJkK0OxP0kAzNyooYB0HzffvKU/3osFI/L1mYQUOxh3Zmdl5gQbaT69l5Sly
sM1re8ziUBp8mxyWV1fmIB9JxV8vmgbO+1sP3VXh4L6sDW6hiTTQq92yyU6V
g8G1aw9T0mkwFby25NM2DlLvrNL7nkOMT89qD93Bwcne5Ts2l9BAojI3VUyD
g2o/RNa71dDAKUCVv0CTg96LhMTzmmkw/FVfZsduDpavnf/7gkUDtdS+F7iH
gyP/zXxZ3kYD4ypFHet9HFQwnXxt1kmDpcLehoO6HHRyHuu40kMDJfMr0+f1
OZgdMErj9NPAI2uF1YIBB3sSB8t/j9BAS3zN0RRjDkoW9WX+942Y7/MorXVm
HLSi9cSc/UUDt6J+xi1/DiY+7vIv+0esh+u/p4/Pc7D9fYfbu0V0KI8tVhDw
4aDA7J3Da5bRQUOis0zLk4N6Ehy9I9J0sOcLPXn2NAfDN9F2JK+ng7xd7ZFC
Vw7S9zWuv7+JDldWnAp/4cTBKZsacf4ddIjRKHgjepyD6l5lczq76bCOceKC
3lEOnou8/TUA6HC0rGh/4GEOVmfe6qs3oYPKby+9WksOjtbcePDpEB1y6qkh
w4R/xTvJdEV7wt+jq59liPk5916tcHKlg43V2+uHDnAw73tUVpYnHULNLC8+
cedgr1B4bLcfHcyrq+m6hH+ptYEBoiF0iLuhx6vz4qD1f36nDKPoQBbYEiZ3
loPXTLxtIhLooN1pMpNIzP/hidP69DQ6rPee1/zjy8HFAc7qk7foYLr12H8e
BK8Difby24rpsCIm7FuPHwcjCm2WuVfTYVXCIa8DFznIplr8u91EB4m9b0ob
CN4zncZjr5l0CByXL5S7xEHN93pvVt6lw9SmdY4JgRz0+6Pz0PIRHSzan734
FcTB2uW7GFef0+GFgL6EWwgHvyjvqGx9Q4f7jR6iXaEc3LRvy82/7+mga2PS
tiecg242G+N2jRE8SP37yy5zsMBz3aXzU3TQu60TJBHJwb6I1aer5gieLbV+
YSQOymSuOPJeiAEH9l7bMhrFQduapQfWiTPgtJ7vbesrHExtXfTfsVUMyDDk
f8OM4WDnqwX5tHUMGN+v91UpjoPC3/8se6TMgIhL02dSrnLQWGjqn5AaA+Lr
PzVlVnAwWvb7mK4WA15SfUIelnCQq/7pTbAuA0TrzQIXbnNw1nj4YZMxAxQz
Iqs08ziodaKfMWbFAGWvZSu9szkY4P+yctMxBizfPt10O4OD5ITum64uDBh+
p5XwIpWDY7cfxuV4MKAwqjtzaTKHuLW0Xeo5zwA9ybu9+gkcPN3JPb0smAGP
0pbZBMdysHiYfsSUxIA9fM38DcR8B2aaDkTHMyD9BPnjB4KX7PK6/9ipDHhR
tVhoHcHXTrlCYTqbAbYXNlrxVxF9vLdouXoRA+g52ufsajnYfTh33quKmO/a
d+3VDUQfe2Z+K2lkgOlswtP5JqKPI673v2UwoKMk5awNlejjjIRHq+8w4J5V
4q0yBgfvVF9hHn7IgO5F2x1n2Byc512uSnpG8PoeSDbncVDnVVD2vT4GSMh4
3Mq7y8HAbxeuLgwzoPPz2Krv7RxsEvQJ3POVAcv+LdsEDzk4vsb9jP9PBvS9
ePTg+mMOblN3ta37ywCqxkb+wW4Oeho7GHwUZAJ17arOHT0cLHWy1dggxgSV
8SLVyFdEH1+02uAoxQTz6PtyXX0cXJ9gKpEpxwRSRVyx3AAHHW4fWOhSYkL/
4DuW9xDRxy37vgtvZ8IHyeee9BGijx9pvT2wiwmGuvlViz4RfTys3hm+nwk6
MjERNl85aDGjyqIaMUEjzmyk4DsH45cpV49bEn5kHUe+TBB9rCR/S9WOCQf5
daO0fhF9vHdN/GlnJiwXMTVJ38TFfYdXBhW4M2HatZCOilwM9RB37z3HhMXL
E1y/reci9fKSo5JBTDiwUgDWruXi5A1+Q4tIJjT4LrU1W81Fteq/GnFXCX/r
y24HreSiN+/XBt51JogpP9lQvpyL5S9/SMzeZMLfqIS+nqVcHB77vLCzkAmy
u3oeCApzUVFw5LtvJRPcdRt+aAhx0XnNwNsKMhMG8mUt3Pi4mLOjt3OIzoTo
I9Lv0uY4+NLoGWttKxNsXYorW2eIPnbqrD76gAnHWrmVE1NEH19sv3X9KRO+
l/95KGjExcR4XvyD10y4KbJ+qb0FF9sLmEGCw0zIyl12seYIFwVaKO77vzAh
Zf7T8nkHLuo+qj8aNMmEEtKT0UNuXIwYqjRsnGXChEDkz0IvLjJ/F+/8KsCC
4Y4arQk/Lk6L5xPvFSz4sXQbWS+YixpKN1e4rGTBhajFrtcjuXhOJ43v1loW
6Fw3MH4bx8Vq66QfzzayIHz8nZtqChdH3WMHxLaxoO5lf0tgJsHjcuRjY00W
VK3VgTt5BI8bIWzSPhYwKn7Pi5USPKr8a5iGLNgfu+qXXQ0X+9A3Z8qCBZNW
mRsKm7go/dIjQe0oi+B7PuYTg4s2YyeDPU+w4Nh1+jr1Vi6mCDh5FJ9hwVTs
gW+BHVx8KGNn1+/LAtHBaz/ZT7i4eIe1kXQgC/7mDagLvOLiASNzTesIFnDT
NYqMBwgejoYbE+NYICacb5X4geBxQVeyLYUFo1U+Ao/HuDh7VZt/PosFEtt9
nwzuRtQq0BjffZsFGqyu9l87ES9Str27UMGCwXvvfomqI9Y/3NRV08CCdZaF
TgrbEL8MKnA+0FjwwVri767NiJt+y9bK81iw7+mOpweVEN3EV+Ue72CBTNf8
wEkFxIKNyxNvdLMgweSyUrAcYt8ekZDHvSyI2F9TlCKDKG0t6LlkiAULDfF2
ZVKIdu7/7PQ/s2D57VUGbAnE9PDfRmETLKgQtfF4LobYlT6h2fKHBY8m99/9
IowoWvV14w9+NhToZhdu9EI0xg+SW0TZ8EXuysZaf8ToF+/4T0my4eH6Bfud
EYjcr6/H82TZ4Dx5IIQRjzjL3/PupSIb/I63xOveIHjIdHVJbGXDNc+nkXfy
CR5qHRzznWyI32p40qgSscnwTm3MXjZ0WLC33W9C/O7AzuUasKF+ds2wCQdR
9QI1ceYgG9hC7lH37yO6XyWHaNgS/pRKRI2fIRbnV3v6OLFhKvTJ5bv9iAPN
pcfKT7MhYMPXPviIKPuwwHjQhw3uf39tYE0QPAazd8leYkO5+LjNrjmCx3S6
ku1lNui3jmkdE+ThM7HklSmxbNhY67DnhjAPl228KtCRzIa3hlxylzgPzfdE
TfBnsUHVSCZfZCUP4w6FDe4tYMPj/0rmDWR4eOfMpSeXytkg+7e95/I6Hs6H
nec21LPhfSafPE2RhzrpXnWfqWzieepD/w8VHgZWnsrbiGy4G2kru3k7D5u4
J5JO3GfDrH9JdJUbD7/3HAu9+YQNxn//aha58lDt62Gvp6/YsH1GTOiWMw+9
+S3slw4SvLxf/kh14mH5amMTo0+EHxv7mXgHHg5v19OKHGfDVXL6uih7Hq43
1FFmzLBh8EqsS4gdDx0cNKV+8nHgaac694ItD7P81AS3i3DAOSljj7cNwSNu
86T7Cg7EI/mpmzXBI19xqHANB6y8YuMcrQgezXLdfRs40BAvaW9rwcPEB9Io
pcqBunX2xpbmPGx/J1FvpcEB4812h41NeSgwLZofr8OBxb3CdbpBPNQVW3Tt
zgEOCAzWOo+E8TBUcSF0zpwDbsfLbyeQeEjV/uOldYQD9zY2nlGL5eGk1U97
P0cOOMgM1zxLIHic+WZSfYoDPm6LAgJTCB5hH7VGznJgfXszZ80NHlanDSmv
D+DAs26RBPZNHo5WvJGyD+fAEZrgS+c8HnELeCGYHsOB7+SCUr4iHjr3PJl8
dI24/tG+qaIyHuZ8eTC0KJMDky+o7QeqefiSr60b8jlQrKkp+76eh5LEPSGk
jAOt/jY/opt5aLWdXt9cxwH+shXGinSCh0FT/rcWDgh+vrC+lU3wOF57TYXL
geb6i8EurTxc7FcedrKdA2Jjq2z/3ePhgbhC79wuDnSKH2nMecjDiLyc4y9e
ciBO2Cl19xMeMpsyTJe/48CDao+J5895ON2RstvsI8HLWvnZ+V4earyL33Tl
Bwf66dbqS9/y8Nyv6FWc38T8TNOVy4cIHksvC/1e4IDQ8PXidRKtOLoh6Ke6
MBeo8ie6Fi9rRUXtC8PeElx4mRG+enxpK7pZnX1aKsMFR/3vl1+LtGLB6TO8
AQUumCs38d9d0op9oS4NMlu4UKzXUVy7qBWl044X2PzHBfcb6iezBFvRpuJI
8rU9XLix7us+En8rpnAsw9v1ubDl3e9d3gs8fPjc5CyfORc299pZ2P4jeHzR
d9Cx4UKqsDBJ9y/Bg2+fWYADF9z8lj7d/IfgIa2lXe/GhZzlJ2Hlbx5yt6mr
fPLmgu6o8KN/UzycPaAqrejPhSmNX5zaVa2odVxpkVMYF2IUOeukZFrx4vn1
U5lXuEDTSdoRJtuK9bEy758kcUHAaPTXkFwrfsmVfCaSwYWAm6f8TOVbcVOT
WKtBHheGp7tv128geHQsJl8u5YLkueQrUkoEjwG+27RaLvAHdawN3dSKA1Oz
yRMULri2RXi+29yKskt/hW/lcGGyr9HLcGsr2m34cfbMPS4smjwpX7W9FdN3
f3a4/ZgLHjMpCeLqrdhl+d7s9QsukPq1Ky9otKLo6bfaKwe4cLPGJeyFZisa
h75SsRzlQpmPoOCe3a0YnfpU+up3gpeIEuTtaUVu+aNFrdNc6PLEHQt7W3GW
fW9qdp4Lt3f39ZzUbUWd5/hecwmC/kY7tTa9Vgz8HwVnHk/V18VhoiQpGSKl
oiSkkjIkrVBJkmhAkhANkqKBSpOxJCQJFVJUKuInSdr3nnMHd3IviSQVEpJk
yJDKu94/nw+ds/d3r7PXs/xRZ1nN4akEFt7KW7XAlkmKxoqZD9QJzChPGItZ
xyQ/1J4WtszBn6fZnOi0YxKDRQ8yZy0k0NVimLVxI5P429y9umMpAVO13gv5
m5jkrtut8ERzAqek1OzgAOZx+MYh/hoCETZeR3T3YR5RiR6y9gR8oP25gh/m
kXF542pnAppDjzX7fJjkxrNIi1B3AnkHCjPe7WGSGu7ZhUXeBCam9lqQ3Uwy
5WOo+vcDBGzOHfl1fxeTbBwInrAgmMA2HaOqKzuZJHpS4C+vUwQszuuxQtyY
hJq770vaRQK/bnrV79zBJP9Mvd+8uUwg/tBbOZttmIejB6WYTGDwd+x2fRfM
w3f7M7sMAuZrTzGUtjDJ8zCnrAs5BO6t93ZUwvX0JdgnlOcTaNUOPH8OeXGu
7dlfxQTmnylK+YF88JVV4JJXBPyVo2I8vZkkt8Zs1wEWAfXqc7uEyC0dxg45
QgK7gx+pWOJ+Z48ZrmyqJeDbnfX4IfJOtQX66k0E9LuP6Wn4Yh6GczWc2zBP
rdmR0cg11ppycd0EXKjb1ACyspvqIOsXckV/i89eJtl8eErbv78EvvnMbZMg
r7ORPThLhgEye+fxVmPevo4XvC3kGJDy7c/Vx8gX3P657VBgAKfpsammP5Nk
+p7eEjKVAXKWJowY5IrDw3aJKgwImphk+Au5Mew4PFFngNdOVqgPnudIZJ8p
fyYDKG9BnhhZPTFocfscBgx4sF+s2s8kZhnfdWXnM+Dllfz8h8jbcw9oaS9k
wOVfV89Px/oIefZVdfUiBrh1bV4RgZz0yneyx1IGGKZLfehBLuB+lgldzgCN
0Xq946eYRFTjOXrdnIH9UG+mTyiTdDW973u2igGvMxQMnU4wiXyn67eqNQyI
+HDRddUxJtEbqG3uWsuA5Ir4LP1gzGPMuWGiPQO6Vy+aoH6ESfwmiSW6jgy4
sWd3rOxhJolQ21Rp48yAOJ35en0BTJI9l0e8tjNAGBne8gnXQwzXl55xx/XG
HHwpwv02mdJP0zwZsMyg62k55jlqvSb3uTcDtgeOkYd4PjMcK26/8WMAd0te
dyqev5nbypSfBxhwsbbFLNoL8/AtvaJ4mAHVzlteHDvEJMcPL480CGZATX7u
HC/k5LBnp+1OMKDEWhxuj/wscnHI3lMMyHXUYJsgixPyD144y4CzDs2jWsjd
6Qt97lxkgOV/m+ZORFbIve9eHs2AxKEty/6/H/1nOs7vLjPg/PZpyz4g273K
3PDrKgPIxbg5HGQ/7qw1ysm4vn7yuwA5oibNbEkqA8aOP6XTkHOapi/ZlMGA
54qupyKQmR3JCw5kMmCQWTY7EPlTv9Ls6BwGvEuqK9yB/PdfvFpOHgMMrj5Z
ugZ55iQFRUY+A/YHr76jj2yhFivbVMCAe8aXRpSRXeeO/zNSjHlfu2rz5yDm
YXixf/oLBqxRcQ1rQ042Hftm8ooBw2f6blchP7M+07KFwYAdHjKFpcjVm0Ya
AlkMsPu1tyALucf1RPXlSgbsjjydfQlZ0be/Mk/IgA6dY0eCkQ0PH2GwJAyw
NXVaMwPrxz6su7S5lgErs9LWKGH97Is8WPDvHQMmGKTuksP6iUpoz53ZhOt9
Y3f9XxDmkb73jnkzA9Ru57f/CsQ87jenbG9jwK5oakc37qe5cHd8cCcDjiRc
af6C9TNW3hiZ0I0/fyEf+wHrR4vrduZxLwO0pFdurMX6sax5G8L7xYCnB7QW
CrF+3JtcAr6OMEClr1ibhfVzskPsI/OPARvT/5q+wvpJ6d+0c+44Jrj7/N73
nyeTFP/jOVtNYMKWPYf2XcDvv1rezn7nJCY0phmHv8bn9aiy1pycwoRV5zJP
jOJ9M3Wutfl1ZSbs/nQt2BzZyPD1kmfTmZCqGh5wHN/nYGqpV6XJhJyp93yK
8H47YP1idtdsJiROm+vag++P2bRi+sR5TJAhhvaLkO+7Finq6jHBKEtifgDv
a9pnyXgbQyZcfDBtQS6urznw8Z/dS5jQltyt1Ir391io/sBpEyZkx+4dmYOs
FZnbddOMCTZpJz7t8mASq4R5rSWWTLjKmEen4f3ukZ71vgaYcL0v4F6dOxPd
S6umx5YJajucIlSQUwvTeZM3MCEtUeS1Be//knJ1pv4mJhT7fbWId2WSN5zr
L9ZvYcKyBxnT+NgPequnFfpuY8LazlntE5CnNl3NO+/GhBtJkjLb7ZhHh0Lm
7V1MUPp49vJ57BeO/bE3Xu5hwqac864VW5kk4N/4q/V7maDdla/3G/vHJfmI
qIH9TNgfpze4CdebpyoVPi2QCb9+TshyxvWw54QfW3yUCdGpp/fuwPe1GvwO
cDjOhHnnomw98PnSpid994cxgZ8332oPPm+O9cDOqHAmhE5zd/bDfmS16ajL
3QtMMH6lc/7gZszD9Yc9iWJCf94FXhD239M+AdYfLjGBUXvc6Dj257TADvOR
eNyPzVj+qQ1MUhrqt3T6NSaE9GqtO7+eSd5GtOiZ3GCCR3P1cNRaJum/6jVn
SzoTHJVncuNsmGRa+ofpgXeYsDFypCAJfWHJffcpl+8ygTpT5bcD2bGwbnxe
LhPm2L6fkYZ+EVC+9S/9iAnxlzd/bVyFeXAkA5+fMqFvdIw9G33kYbXj979F
TPC5ZvzSG32F+4HfqlnKhOWTaPoe+kxbu12jWTnWw1njlvYVTCLTz6rZRpgQ
dipezRD9R/ufNf8ozYSxyEbPw+hHIE+YV7lMGJGeUf4M/clTdVVZvoAJVxLX
Gf1ajHnMKSusFDPhzwHv/8zRt9IMTB+0vWHC28OHtpxBHytdUZw57h0TXuX5
SzP0maR+zdLUOR+YcEhqC1cG/e2Xw5Orqz4zYaH3wrt26HcqrgbR7l+YMGHR
z6Q49D9jn7zwEx1MiIm9f0OswyROgfOPJ39nQultx0IV9MXA0OxDhT+ZoHpY
+pMr+mRcxOy9ogE8D10/nVtamMfVDI9vw0y4O0fn9OeZmEeaxla5v1gPw5pd
89FP2++lbJwvTcFqVvjxA+iv4wuVbazHU5DIV57AU2eSeeUJFrvlKdiStAM+
o+9acyYbn1akgPEfN2lIhUm8qi8tvDmNgvfL/f9OUWaS8A8T5paoUXB72rKL
C9D/M9oj1GtmUKDkYDh3Nfp/WZ/U1B4tCpY2O9dvn4x5/A2fMFmHguE39/MC
J2EeE0f/LlxAweF5eklRE5lETTX01zoDChLEb5NvT2ASkzm/vvsspsDz3bOC
ElkmcTYI/nJuGQXvrMq/iMYxSdCKnsZbphT8Hutd9lWKSeLXHHpTtpICR+2j
z2NxPsh36OTXrcb3qe+ZJ40/5+3wp/ptKBjQ2Pkw7B+DtHu3linZUZDnW2He
94dBxgfueWbkQEF/fnLDQZwX5oU2PdjoREEZJ/1yK84LthE7s/ZtpWB+cbnD
rmEG8b5anxrpSsHcWepabwcZ5FzatoRsDwpseLf/Of5ikNv3qqNfe1EAcdt+
cvoZpLxg89lGXwqmgGUf9DFIw0vB8eF9FDSMOcuW/WSQIfaGQLVDFKzg3lyw
rIdB1KrZe5cdwXwzp7rndzOIyQebXU7HcL1nn2fM/84gW9vJ1kOhFMzeF//j
9jcGOdq3yuHSGQq8fic7q3cySMLfMpvc8xTYZQtYie0M8mSi2Uo6koJNd1Zs
mPSVQQQq/xl/jqUgZyKrMeILg3TONtb/e4WC0A9Z5/62MIicwdO5mkkUyPD9
TE7ivKe7wlDDLAXrx+vV0M9PmMeaB1O3pVHwn1ua4OBHzMNBV+7obQpiwjgP
v3xgkAs77v6Lz6ZgAYv5zwTnx0zvOYOP7lPwwvOCn2cjg1QcutXNfUjBZvtx
X6IbGKTx5Iy2L08o+Bi99lRhPYOMXLzxQbqIgmPTNyx8/5ZB1K+q1M5+TsGE
4ck/ZGoZZEVaosDyJQVphskCoxrM454i7faagoXP3jNcJZhHweWXxykKXsa2
ii5UYR4v5YqucSjYUPSkL1/IIAXsyIcFfKwnI4sldTgfiyTS2cIqCvxHoyKk
eAzS1Xj2ZmcN1o/m9R4DLoPIt48mTKinoOq4TeEEXI9eX2jMvEYK7p/5L3kP
8rq/v86u+URBdP5il5fIvhNDTni2UvB20ZJulTrMQ+Vn4Kl2CqZmNxwMRM6c
HeiX2kWBPd9JyEGu0P+2678ezMOkXGku7r9p+b5t1f1Y388tzcOQR+GLw48h
rG8roU0N8gwHb1uFPxR8LQhcaojzutmOjysXStHwd/0c6Ujk7d4ey9bJ0qBp
0vzfB+SQQ+/0fSbSELiv2GEF5p10crv2uck0fHqfwo5HLrhYo3FLiQbLpFid
r8iieCelMlUaWOFxPqvfM0j3TaFcnQYNITszo24gK9yzH+ubRYPZKDPuB7J+
AWdwqjYNbHHfsfV4vnYvbX8s0qXhjaWH9R1kPzajzV6fhqlfXv78hRwhsWry
N6JBeCk7whHrJbvxZW2EMQ0e4dVD95DJVzNh1goaCjaauP9Bbur9j66woEG2
J0dqQhfm8ce4/L0VDV9bTMJXYr3PnFhQNGRNw7Jv+5SCsN4tVBY9Ul1PQ7Ps
mpc5bQziOvthtvFGGoaXvTr1rpVBjusvSNu8mYZjxz44K2K9Jy/PSQxwocGV
lwU2nxnkGcyNjd1BQ5ax/NqTWN/ijbfP3d9Jg8MTNa/HuJ7u7Zonqd00eK/i
JDb/Pw/v1MOffGho/KjZMB3z0z+k6v/Hn4by6yrmm/C87E8mec4IoEFqd+GT
C1gf+y5O2W4aREP+yl6L0jcMEhUft2lrCA3Vra9SVToYJOfmxLVHTtIgTrR0
XY77Y+ZEWcafpoFRP9i5Db/3T0/HmTw6R8N8zwsOxzGPv2XnDLgRNJxvVwtP
wfthJvuP9pcYGvb6/TpbgveHhSRshvQVGlKend3y9geDuDcOKs1OpOGi34/e
AbxvTn4NmWh5nYayk2a+qr0MktL7c8z1Jg1ndHbfM8H7qvhP4NCxW5hHqXeJ
C95n1XJdP5KyaOiwsblxdIBBepT3f316D3//9dj6RLz/FGe3NQke0MA0T+c+
xfvRUN/nbcdjGia9nKYhGsI8ln8Sjn9Gw6XZ/uZdeJ/ug10snRIaXtGpC+V/
M0jMxoZyKKPhclNuxwK8j+9v31G8q4KGjY5XQ9fifU3vefMojElDv9j3nfdf
BmkO2HL3BpuGyil/5M7h/T52QpRWzKNhkeij3K0xBtG6uDFJIqLhWsvRdy+w
H1jGc2O7q2lIyGUdf4v9wv3m2vOT6mhYdey+irEq+nEO86TeexpmZD67fRj7
XcrT1UFrP+L31Ohk9Rj7XUlZub93Cw22C8/3dWK/e8My3332Kw3x0TYVeoro
g+KS7RnfaJAZvHHbTwF9sHGZ44sfNNw4EZ6cI48++LVg7ds+GrZPHLzTLId+
3LtoVd8gDSvypRhzsP8d+PPQZOooDVZetwc9sf/FyOkZLhqjYf98oc0t7H/3
le/p2MuwoOz3lXvvcT9sLW1NfzkWLG35NHMG7rd14Z1pEQosGJl10kMK1y+9
fKZ81lQWPPrjo2CC/XwO3JSqUGHBz4OiCD/cr9VGteEGdRb4tM0VpGL/99h+
rWdwJgsOzV38iTcd/XjP1HaVuSzINfnCGEVfSA248nHpfBY06akeMZqBeZyQ
r3NcyIKzrHffd6NvvLkQLTq4iAXDBYvNEtFH+q/IsGOWsuBWvJoTcxb64M3z
r+4tZ4HVsqvL+9BfluT8LWaasyDi9M12HfQbx6en8j+uYsHjA8v3b52LPlg2
dHd0DQveSvk8j0AfusQ6lq6xjgUdG7RritGX8sS9SSvsWeCwIbi8dR7m8f7w
JRdHFmhf3Basoot+3NZ1PsiZBQuNeYM26F/SvftDr2xngWOSZEOwHvrgn7ag
h+64/tHL+7PR10DOdx/HkwXjyku2S9DnPJU/7271ZsEkZTelMQP0QS3PHVL+
LLjXMpJmtAh9cOF7R62DLCh5rDrggX5YauK6buVhFlindo8UWqMfr65d5RrM
gtrrqRuHAfOwd15+7AQLPLRyCwB9d9r2KsOkUyyoXjpDPwZ9d8keh3lPz7IA
xD+fV61EHwyo1BRcZEHW8CL36ei7gSfWKXdEs6DvsWjqbvTduAuU/Pg4Fph9
r3l/H3334RWQ1klgwbHnq152m6APpr4aXp3MgjsKCk9XoO+23bX46ZHKgtdd
Vs/D0Xdlnj5vD83AfHe8rWGj72qXmXxKyWRB46ZqmSm4H2AV1hXlsKBGZGy/
A33XS2xUJc5jwQ8/s9hY9P/w94/Y3/NZsHJ0WdMLnA8y2vQq5Avx31OJ7R04
P5T9vPffgv9YsMx6Tp6GI/rgqPZj2xcsqHdznLnBCX1wQmbOnlcsKCz0WHvS
Gf1YeVZGOIMFXzM+a+fifGSslXYtncWC3/Hj/6vFecpp4fTLpZUsqLso/j0O
56FAk+QLtUIWVI1bNbgU56X41UphvRIWfHd3yN2N82C+ffyRKW9ZsObJ30lX
cJ7kbZu037AB9/PLZX4ZzqPtXjFeG5pY8HSBQ18bzq/jA2Rd/Zqx/rd9PaaM
8/S8Exc2X2xjgdb6+Y9X47xtfeHfusxOFswsHH/zIM7jXldOW73qZsGf7Fjz
Gzivh6cOL2/oZUGP7rN4Js7zGXePLxr8heu7dyn1O8775U/65qn8ZsHAzrbt
6sFM0vAiaObSfyzQKVvOsz7GJEP0d2XHcWyoLQrsDTiBfiw+MOngBDakX7zD
SwlFP37/VTpmEhuyLeXss6+hH7f5juRMYcOBcKtfPYnoxz8//2Qos8Ggq/i/
1QmYx6hnR9N0NnyNPBgTH495TGj89FuTDTc3egd+iGMSwTS3evU5bFi36qa/
4WUm6Zz1tmr5PDZ0uk8NORXLJHILXTjOemy4ksO5xotmEl0TccVhQzbozXjN
1ohiEtvVm0rilrCh7OUvhf0RTOJtz3v8wIQN62MD/UovMMm5bevvsc3YILyg
WzPhPJPc9qIzWizZsClPy2XHWczj4JrkMWDDCudZQx/uYB7HKy7PWsuGkNx/
niZ3mWTk/MqLFhvY8KQ21vfSfSZRv1IatmMTG6YbSEl9esAkK1KXHw3ZwoZX
w3yT5Y+ZZOvdZ/sTt7EhzNFmLLaASY4+WbzniRsbbklavZuKmCThRb4rfxcb
kqf0eBg/Z5In9EKn9j34PJ5Hd2QZ5lF1f72sHxui8gymv3uFeTTorNY+wAaj
Uo86Awbm0Za5YnUgG15//GEUTjOJ3s9ZRh5H2aBh+GWWmMMk60bT5oceZ8O7
25Y5c/lM4jtBfVZKGBsSVvxiHBUxyYVp11WKwtlwY0jpBCVhksxZ0xTEF9jg
RV+llGuZpELv6rjvUWyYbxeU61PPJI3LFH5PvMyGHRlF2kXvMQ+r2F7dq7jf
bTuWS3/EPOzHd9pcY4NxVOBHp2bMY9vFz1432LAnrnHOnS9Mst1rrP5MOub5
MmK4q51JQg6eEafdYcNcjyv+Fl1MknR8hPP8LhvuDV86Fv2DSQrOn3j9JpcN
/nGZY3emUEQU11/y8xEb7tSk7+mbTJGuG0eeKBawIcL5+Zt1ChSRv9t9z6CY
DVMm9rmlyVNE78nBW3albLAddPz5XY4i6160J+8tZ8O8Wfy0NRMo4kfvjbtA
2JAf5r/9uixFIqqaL96h2fBpyrx5HeMokt2w+1Q5lw0vGsfGrZKmCPnSePSd
gA2rP/8ZSBhjkqYetwO/xGwInKU50vqXSUZ/v92jXIv1m+g61fwPk8yYsNVt
yTs2sCxLzK78ZhKzaRKnTR/Y8DA/fiRkOkW2z3K0O/CZDb5qnaJmDYqE6PFX
R39hw0HRemenmRRJXmZnmtPBhg2unudeaVHkmRXLiPGdDSaeBjv151JEvMFa
t+knG9zetzSn6FCke+vrWb8H2GDTPaw2TpciCl6WquojbDCvSx0M1KOI/sEX
Csv/4n4NqIgGfYrYHV8h4yzNgUfMYxVrF2Ee54t+B47nQKNhYU7BYswjbknf
ZXkOiN2OmWoaYx43HnfmKXLgoj3zeKQJRZjZ+s2saRx48PuG948VFPn0OPdd
sxoHkoN/jbiaU+Rv6TzJvxkcGC76sJq5kiIz6SzuzNkcYO3ctNTAiiIWVVrE
XIcD0y6srboGFHFtSH++fQEHgrlcjVFrihz/ov402IADC/T6p/quxTx6rt9P
WMwB+8CgYv56zOP3tNuPl3HAUVkks8yeItXjE67zTDkg1f9WKs2BIj1Kk698
XcmBuJz+e2OOFFGcdSlCBjigKa8ibXiQIoZ6E07PteXASNCZFzH7KWK/LCLY
yo4DU51Sz3/xp8g+K6mDOx044JXr627tR5GoDeHeJ5048PV4s80dX4rkbP3t
dn0rB+5WKFmNemMeu09ueebKgRvhvXZuezCPAwN2VR4coEsifEt2U2Ts2FHo
8uLAPH9ugrInRbTO/zCduJcDr66+EgZ5UMQyLmCx7n4OJC7x1RS5U8T9Roeu
zSF83obyUAM3ipzM9tPyOsKBugZWe8wOiqQ8blE9c4wDm1rP7WvbRpHiUq/J
aaEcMPh6ozXxAOZBfZB5foYDVZEWpY243x6R+2jNeQ6YHo9xXnAI82io6+uJ
5ICC/52iI4EUMfqy9dvkS7j/I7cbXx6miEOPpFk/ngPayvFC2SMUOfDbsWF9
EgfI5plRm49SJGa8QOKbwoFzEw+NvxlMkftKGyrPp3Fg98OLjs0hFKFnssnt
2xy4U7bb0+A4RZoX2JS+zOZAuL7UipATmIcxeVp/nwO3e/xry09iHlarcgce
cmB0SrKlbBhFrDaU3Z72lAPG8ZEHN52iiMdW05TFRRx4GGTpff00RcJ2F19x
eM4Bjxelcz6coUjqgaWR+19y4Nvv4fvzzlKk5NiT01GvOfC4SWrg4DmKvDln
EHKX4sAbLZF80XmK9F7OO0g4HFjVFt0+fIEiU2/M9/nA54DrXckViMA8srPd
R6o4cDaMNxIViXk8nu08/Q0H7gVfXyyMokhAacYGk3oO3NrsuEQ5hiKXKI01
Wxo5EB2vqbcvjSJ5ohSzwE8ceO47x6kmlSLsd8pLLrdyYEaGZrTVDYq0tiYs
yGvH/ZhMFj64ThHpnsmzWV0cOGI0MFc1mSJzfl9Sa+7hgE9sTeS5JMxjvJzi
v37O////w6FvCZiHUqTszGEOfPIODttxFfOYKf3H7A8H/D+bTKKuUCRtwdn+
bVJcmMPoemgUR5FS49FvR2W5ICed7pZ2iSJvV4W2XJ3IBZ2c1dPHx1Kk3+5X
Q/5kLgTmNrQciabItK3B1ZVKXEh43PA5IYMiS3b3VLapcmGXUfZ309sUcTxw
iDFuBhcsotsKm+5gHsc6S+doceFqe/2KyCzM45x/wSptLlxWMgg1uIt5XG7N
ddflQmM9O1SSQxFuyp47J/S5cO6fh9mJ+xRpy2pKSTbiwqk/w8Uz8ygi83hn
fKExFwqnZ/9gPKCIdml9pGgFF4yktrb7PaIIUNvOfLPgQuXolDuTHlPEU1Qd
IreaC4N9tcoFTyhy+t3mgPk2XPjRem/d1gLMo1XgY70e1y8+azpUiHn82LBz
90YuSAp92tKLKFI/wnY+vZkLJxO3uKz+jyK/ZG3tb7rg869sCG8uoYiKEmNN
yQ4uuP+w948spYjxTCvzmp1cOJG8Q1GvjCJOC14u6dnNBY2TKcG8lxQJNDbT
m+zLhScK11ICXlEkbtV/s/X3ceHW9nEnFV9T5KGd8fT1AVwwvmqlVkAwD5en
ir5BXPDPOnlsCxPz8DQcfz6EC9kJXiH59RQZf+DBn1snueBlOL13fh1F5h3T
HSg7zQXHjT9P36mliPW5u11157hw7Hu3isYbinhdntPaH8EF4bSpZUnVFAlP
ufVeKZYLri+3BihIKJKRNaPG6AoX1L+WG0RVUaQs/wZvYyIXFFPshv4JMY/n
Ksx917mwjDsoCRVgHszEF5E3uRB3hlfax8M8RIqF2be4MKuE5B+qpIjJu8t5
r7O48PFIw+OvHIo4t8plNt7jQk3B9PI9bIoE/Yi8MfyACyNHT9a9pykSPyJ9
Ve0J7t9jm8eSjxTJlz0XtewZ1tOprLr9nynCm/rnjFMJntf2Num7LRRp1ww7
dqiMC78lA43vv2AeCwYDLlVw4RIJ3qvSjnkYh/jmMjG/fqlbDp0UsV31cyfN
5sJNG6OLEV0U8bYLdPnM48JzBy318m6KnHP5Zv9XxAUpUrOzr4citz33WWvW
cOHMeQdH/T6KlO//Ym5WxwUPvdgfXgMUaQjxXrrtPReO5MWuvjFIkaGzH/WO
fsT1j26yEg5TRO2yx5yrLVww1H77TXoU80h5Nz3/K+Y9W9vO7C/mkbV9SuU3
LtgML3U5NEaRo/k149t+cMEhTnZytjRNEp47/ZXu58I3tVvH3srQ5AlTODB7
CJ9vNRwnP4EmAqH9d8tR/H7mm7pYTaRJZz2n1W2MC/G//3KOTKKJXKtt43GZ
SpAU53/LmUwT3R+MmmtyyDTjVd0UmtiOWPELFCrhp/JLS/lpNPGWLWcKp1aC
7WRl/Xp9mpybal7WqVIJd5UvnNu9kCaZmiWFEzQqQYut39y2gCYVussezJtV
CWXzJm8O1KVJ49KCzDVzK+Hk4oWcgXk0GbFclOo5vxK2t4Xbn9Ghibrdw6un
FlbC1g2K72S0abLCZUF06qJKCHatOxo3hyZbPXPC/1taCYXKDdNVZtPk6P65
x6uXV8LUU2rc9FmYR8jtQz/MKyEpPu6izkzM46zmXgWrSljqaGn/aAZNRJdS
PRZaV0L/i/kzl2nQpOu66tZ16yrhSv3Lfktcr3xW0kYf+0qgl745M1GPJnr5
U2zOOVbC3iCZ+lrkdc/jLG45V0Lu+g6ZbNyvL3Oicdn2SrCY7TcuEPO4IIxa
WOdeCXu2smvMDTCP+nFz+z0rQfHZ4DFZQ8yj5Zy6kk8l+Cf+6hAjN3X/mWLk
XwluQtbijEU0GR0Om7DxYCXoXfFZ729EkxmyQ3/9D1dC+GPxEuPFNDGbeuxX
RHAleElP7hpF3q7Z+z3rRCXMvKIeyllCkxDdw18qTlXCZ4e+usSlNEla2tX4
/mwlvF5zS87DmCYFlvvfDF2sBOdDapN0l2Ee69v4qjGV0PPW8+MP5C5nH8o4
rhLuJR+PfGFCEwXPT2WbE/5/Xrv+XFhOE/39u54FJFfCSxuV9Q4raGIX0vAg
NrUSgsYyvVVNaeJ3dkfW/YxKEDhMcGpCjrj0JpXKrIRoZtCUXDOaZF/fkvAp
B9e/+c+dw+Y0IZmi6D95lWB9+cyYqQXm8Wjj2RmPMX9r27wr6zGPEu5x08JK
qH3/oHfBOsyDuTZw63+VwPLTWse0pYmFkLn3yItKSGjJyvawoYlr/epd8a8q
wdjZRG5wDU2Ot5RvfcSohBfPao8nAk2Su80duKxKUJKN6jZYTZNnwyU2Xyor
wWHD2sPsVTQRy5islBZVwq6zysNeljTpnlJoPLu6Ejbl9lz+jetT0DTSt3xb
CZqMxgUpuH593Udz3RowX0GdYAnuz36pnsbxpkpYzfscxsd89lnem3qtuRLG
nEN47Zhf1HptuYK2SqiQk7l2HfPNcb7zT9BZCUU6V72tMX/mrpmDHd2V4Hdo
k9kPPL9P+252j++rhIYwK9UMPN+/wWptOoOY7/d7w3Z4/jPPXvsAvyuBWKz8
MoD1Y3Fpau2uf5jvG+X6bKwv1+tXBGHjeMAWL6nejPV4MlOevjGBB3tGEmtG
sX5THkW/LJ7Eg9qFpo0PsL6LS2SKJFN4cGb/nK7t+D1UM84/7FbmwbKXm8bJ
4PfbI/ibNUmdB1Kar+cW4verWH/qpt5MHtRfDVnvid+vYctQwto5PMiVCwyZ
hN+vffexGO95PHiY/SivFL/ffcO9Z8/q8QC8F7Xuxe83SiboRIYhDwpse3WV
tWhyf8r3wBdLePD4peoRlH9Czzjg99aEB6IbzsxDmjRpnv91V58ZD0yfC2Zo
4vc8tsR329RVPDi1MDGMq04TLcvPDovW8GDH356WY9NpYrne09Z+Le7X/+nA
H1WauDu/X+m/gQfJx5c7FKpgHrtcl0Vs4oE52f/AVxnz2Fern7WFB3a2DpPV
8b4rCXbWrtiG75f+cII/lSZvwqs03rvxoOK3Zkc43o+9sQ5KQ7t4oL144h5j
RZpMvV4pp+rNg58ZOR+/KNDEKHPd2FI/Hixf2+17E+9bh0fUoOMBHjQvaOtx
kKfJgRL4cTCQB7Jr4y6OydEkhvGqLeYoD1IyPs0sxvv7vsCi6d5xHqQatZT7
j8c86p7XMsN4MPH3NR9NWZq0NpsIP4bzQGn9Lem32C+kuwvp0QuY7116Rwv2
kznDRuUa0TxQSN9H94ygD8rkF624zAP/jUl2f4fQB6csfORylQfPd39umYT9
KWzG/eygazw4Z/s6RQP7V+p8nbQrN3gw/IDptQD7W8mSzMSH6VhPc9Stl/9E
P145K5ZzhwcmN15Z2PxAP16Xdq71Lp6/XZH9lu/og87TT0rl8eC05fCR3d/Q
B3clH9bK58G7wKsFhzrQB/cp+a8s4IFG87Hxp7+iDwbHe7oW88D5Rn7wJezX
l8InbT9WyoPxV5YNpWI/z4uN2ZRUzgN3nnxyLvZ7drLs2qeEB192Gq8vQR9o
vXPBUkDzYPDxAyXWB8zj0b9lHVw8j1tH+2reYx4lpw3GC3ngrXGzq/kd+iBj
WFtHwoMDi/tHf6IfeQqOz4BaHox7uHee1Fv0wbo+pV3veDD1vZfPVPSjtOag
iWEfeNB4SbViNvpR6ffvYymfefC1+tYMio9+PHRgqOgLD+acudKRgL7TP679
h7iDB9Z3SLkn+s60KXu/fv/Og23mpsmGXMxjRnOTfC/yxp+HR9B3nObvfrvg
Fw9W1XZv5rLQB5c0Cm1HeKBat9gkBf0nbqUba89fHjQ5Fc/0pdAH170tD5fm
Q6L16YnG6H/cLS7F6eP5sDQ/euQf+mGbh/hRqTwfXl95+0OI/iizb9PdWkU+
mH/d15FegX4czEvrncaHrFKrr/vRNyF8fdKU6XwoU7c/d7Uc84ilYw01+VBl
pdm5H/00PHnN+Q2z+bCC5e9hi/6acafipJ8OH0STgiVaL9AHH64MuriADxMn
vN8w/Bx98L9S/0wDPqyOcmDVoA//Ist3v1rMB2feU5sn6MsqgmfbG5bxgZ8y
nRVTjH5ct9hx0JQPdY8vbvBBv3Zqzl+rYskHhy994lXPMI/vC1ctBT6A076d
6ujjcUP3TRxt+fBq+FN771P0wXHzDA/a8SG4eVeoEH2ep5ilE+OA65f7qJCH
vt+uoaV5z4kPywN9717IRx+cnz6NuZUP11S7LXfhfDBvibr8R1c+XG479c70
IfrxyutSox58sFqoGDoN5wmvddOG1ffwYXZQjub3XMxjy9We5Xv5cKvSjcHB
eSTDQ6HdeT+u/1jr/ux76IP+sR8PH+JDZXa66hmcXxqOjq+LO8KHyfHj6B04
3wyduSh6cIwP7KjkE8bZ6IOxYyx2KB9aKxprmZnog8lnXrWc4YO9kVdnHs5L
zndGisfO488XU2PxOE8FPTyRPyuKDwWUrMaxW+jH//XftbjEh8KOBct24vyV
T46k74jH389auHlNOubB704KSeLD5i75Qwtw3ux8e/BSYgofurj8uMk3KSLX
3H7+SRrWi2nAkz6cN3W/7w3l3+YD06xL8i4F/XioOag9mw9/+BsHX+P86T3O
a59sLh8Cfl7Suo/z5znFD7u1H/FB4cGD9XHX0I813Hesforv7809ehTn0fJ5
dY4eRXyImFy0qBif17B467rQ53zYbdA5xxl5yEKyKuUlHx7r/5Xuweerr3Nc
XvSaD+Hl999cQV6xhW8opvigoXLrugHyVg+7ed85fEgzlVtXie8/6s/SlBfw
QWnjgy9+yAlHrZUXiPnwsjo1RAb5yZnX8rZvcL/Bdb1ZuD5BjKX0nno+1Iz6
eq1G7rz2YvhMI67Hfc2rRlyv3J0VP9M+8eHJ9YCJYci6D4van7fywSm/zXY6
8rr/lnx6084Hvcynh4sTKeJLHtf97MLfP8SJ3YJ8ga9fpfgT1zvH6Fo3zt+Z
b3PZBgN8KE9suXwZueLzvAq7YT7Uu7QH6yE3dmX9t/cP1vt5y40snM9HBrUe
X5ASQEZah5I3svq4jJw7sgIoWVfD+RuPeShqZJRPFMDWt+8D0pG3a6RcezdZ
AKn7VKXNkEPmKV/+pSSAq7P9ot7gfJ+0OOGCspoAah9xWGtxfQUWk8OWzBDA
2g6Prdb4ftHaS0c2aQng7KSAZit8X5fThP0HtAVwbtrA4ZX4PHmPCK9oXQHY
/R0cNcXn6flLueboC6BBFBJrEod5HA3fzDASgHHEQdWllzGPM7/XNRkLwEWr
MXPRJYpExJy0+r1CAJa32Ab6sRTJvjawXH2lALrG9Et0YyhCbh9dtHy1APZu
mAg60RRpevBjnrONAHKP76mcHUWR0eKAmYfXC6AgZpnzzEiKzCAdynEbBWAg
PUsSjOsx4/tNerBZANcCx1SFyNvftkizXQTA79+xVPf/eXz2GmneIYD5gUz9
s8hJXR9+/tuJeU769K8O+dmge8dMLwHkaC8tXIL7F0vXfzL3FYBmToxVLHL3
5G312/cJ4GZvX+5nZAWN6qrgAAGsHw36bo756c/bzEkIEkDb8D/FJGS7xYKK
xyEC4HRkKnQi+1lsKOGdFMCaHy5tazD/iLXsx19PC4AlrZFxEznbyeaezHkB
HNbpWfQTmbmTZMyNFIDI+V26HdbbJ79VyVaxAgiIf/PlDvLfI2WXd14RwBj/
86RB5JlnTC+eTBQAWSml6Ij1bBFTHHb9ugBOCYy7cpBdry09+uymAHSmXb//
G/n47Sf7q24J4MYPvqUzfh/JDwz2dGVhfRTPfpqH/Kw4z3XifQE0Lxb/+Yss
fj3fSfehAKZPddXbht9fDy97vc0TAcj9sTuxFO8jxbezV3s9E8Au6fsKNngf
GX7OWHGmRAAH5k++sxXvI/suDaO0MgGY+4Ub+eF9tG8wZf7zCgEw6eGyE3gf
RUmrzHrDFMDENWdtY/E+ypmcqPKTjc9/r8hPS8U81BUVFPmYZ1KeYz7eT590
Lo8zqBKA9T6Hqld4f/w1kvu9vkYAoTtHHKpwfVoWkb2+dZhXwDPOJ1y/5Vrp
zvPvBTArPWR1L+7f3ens59sfBRD7FYrHIZ/cOVr/skUAhVum66pinil+oeL6
rwLoOPBwVhjur/jIL87ANwHUkb+hXngfV58Ofj2tRwDabLmsdXhf90T3lCzu
F4B7tWKKYRbmce3QE4chAUDDZNdpeL8b3e68t39UAME+e78OIjs88L8VNSaA
qgqJzQfsBweKW5PvygghevnBQ0zsFzGv98QROSHc81vqm4v95D6v6eIHBSGc
LpynF4f9hq7deWpkqhAeyax9EYT9qPlT/dHpqkLws0mavi2PImPfth0w0cDn
hSjYmGP/0hqs3rNllhAybhStnIX9zVLayS1wrhBycqOlpLD/eUwWOl2eLwSD
opjkVuQwdXu7vIVCWJNd0s/Bfpmqw1nNWiSEoR9K2o+wn5YY2Zo2LxVCnTh1
Zjz22zfmDKN/y4XQ8dGjNQj7ca+tle5MCyGoqxiEuhRQZKrTy1nmVkL4Z/+3
YTn2b6OdZqrbrYXwXS5CXh37u4PffwrB64Rwl184fgT5wBFjmQR7ISQy6+qq
0VcunX76O99RCE61JYlD6Ct50YZ9lc5COFAze50WMjvpQWfbdiE0lU8bsEF/
ab2l2zxupxAKE6/e/r+/SD+4+27ObiF83JJifRX9ZU7xHMkqH/z3f3Q/F6O/
WL2+xXX3F4Jj8pqwhlLMgzeDnDgohKtqbZPH0GfCam88Tz4shEURKhnzkVM/
qTwtDBaC7gfBvI3oN6XfEu+LTgjh1NwpeUHoN29/Kd7+dkoIRlvez09Bv+mX
irsud04IFgFLb79Ev5k2eeKV+RFCyJssZvzF9S9Rj4qwjhHCT7uw1BTcr6PO
uNO744Rwv6nPxgj9LcDoXPDpBCGYb/hGsZAvmf85cDNZCJZVW9V3oe/l2YZ5
l6QK4deWsDX9///74OZBt5oM3E+d3OrLDPRB95AtPZlCiDCaq6SNvijj99Nu
8j3Mx43xvBRZ+0gg6D8QgjC/w3gz+iWc/ma6/rEQwlTSLnxB9ozet9i3UAjp
sdX3T6GPnk76onv+PyG0T7p2Rwl9Ne2Wt9btF0KQyXwfkItcmvdR9eUrIXBt
8hVXod++LfKYXM8QQuWgTGQ18q+KdzIDLCFQhV+q/Dnog7zto0o8IfDrHH+M
IhvX1vQZibDe9/i0JKIvO31y+raxWgiXp5U/0kWfDvwmbN73Vgi9oU/sXiLH
/bJviGzA5311LtuM/v1QiivJbhLCQT5rrAWZq7C28nWzEEal6tVOoq+3TWeS
xjYh7Hu4jExAv5fRWV063In7Y1xbaV2DPmhU/lTthxAeqAw8OY2+b21unrus
TwjX7+6Y8VyCPmhbcttpUAjugS/P/BSjD25elnLotxD+hsx5Z4Cc4V5w5dI/
rIfnUYZ+//976d5FkbnjRFC3vPtEpgj9OOjhaXqCCOR7tr9sEGIepxaEfJ4k
gllt5JcKskp0zsG/U0QwSd1Qf7MAfTBpro+mighqI1O3xeL6nW/ddjdTF0H4
4vGhFO4vKE/TedtMEVym+3ax8H3xRakbjs4Rgey8g2vEyPkVqmuuzhNBoLOr
3HtkXmWSWb6eCHyV8wq+ILe/mbKk0lAEf35fXdmDPP5T3IK2JSJ4UtqbN4I8
79vE2eOWi8ClgTckg/uz/hWlNsdcBH9tZxlMQfaWklFctUoECs/bV2sgn1M4
L+u+RgQCNSNTHeTb0/+OHl+L73P5PnURcrn2qf5rG0QAh3SFK5AbFg19K9gk
AuOD7w4C8pDZsRbhFhEc2Tj++wZkNdvehs5tIng7+bGTC7LJ5sPVE9xFsL5I
mOKB7OzeVTnPUwSrZ+97vRc5aO9+xhpvEZzROM0LRE4Iaiv19BNBMjWx9ATy
k1M+BacOiODgNt2Yc8iCqE+5qYEi+Oj0yCIWuTNx153/jopgAfd0VSKy3K2G
lOrjInBfsG1dGrJu3o74H2EiWKfBzcxGti16E6lwVgT7D+WNuNViHhVbziy8
KALvXRm9D7C+zlWKQtZFi+DRXYVPw1hft99sDPC5LIKNMMzcgFzxketz7irm
scw7/SbWW2Pn2p23rokg5vT6/R1YbyMDTOeyG7iemQ8MzZHVpcC+Ll0EM6ZF
f4nB969QeLWm/44I9nh+vlaP57V1uoW5Uo4Ifo89N9VDPqr9fIlRngi6huUl
J7D+EhaZ6G3MF8HSDQ27OVhvT8wKZ+8rEAG/e36rGrLIxmh6ZLEIXnR+3+WH
9dfl+Egxu1QEJ2/yU/i4H3l3vfGvy0VgMUlp6xbcr97ee3/eExHovm7++hZ5
XZD2wBAtgoVjb508cJ72PXWnS7VSBItuO179jHwhamarsVAEVduX3/XD+Tsz
8eb7zRIRBNS7xX1DrshQqwmoFUHWd7F9UD3mkXuNF/sO805Pb+pHHn02lXn/
A9Zrd+n6UJznZ1RceUF9FsGhdQuj/iCbVcoXfvoiAv/srpvnG9AH30Tn/ekQ
Qe8f6Yuy79EHP8pkzugWwRqXgDWxyEmd52+Y9opgOE+vVqER/Xjgb/zWXyKQ
HjK1SkAWjZ2KOjIigrF9aaeVP2Aek4bPxP/F7/Pj5oQUZPnpx489kq6C+D3u
oRpN6IPafQHc8VVw3qzMNAPZblGQ7xf5KvC66crX+og+aPZ9p/SUKniZl2mS
hRxhc8BltnIVPBuZf1TnE/qg41d7y+lV8J/m0Yv3kImbr7WbZhV8751tM/AV
/dj3s/nx2VUwmD7KdEMePey59JpOFcy/Ry+vaMM8Tr3XK1hQBccUT6ZrI1tE
uc4RGlRBc51af9QX9MHE2umdi6sgRCpr9bdW9MEM5ykTTPDfX1YL34ycnFs1
fp5ZFQyFnHha1II++MzhLzYb+FZB1UxHFr+qHNgFVSCz/3fnqWb0Y+6672G2
VbAqWGvg42f04zdU6w27Kkj5YNhrg6z/ERqLHapgWp5ucy7ux67zVY3EqQpe
LTmgtbYHfXDAgt+9tQrub70zZVwv+uDYc+YktypQHxE/JX3og5OWl+ntqgJe
QLpM+AD6oNqzwrV7qsDpWt7klYPog3MXP/Dei/uTaPIHh9AHDfMzz+6vgr5F
9ZbFI+jHZgtTMw5VgXfrC++gUczD5v7VF0eqYHRBvaXhX8zDUSf67bEqcMsz
5n/9h3m4ZYb3hVbB3eeVk+9K0STFd9bxqeFV8GHmLRnPcTQpPpx2aNGFKpjZ
n/9UXZYm1WHT99pHVYGS+bBizXia9EQme/hfqoKS1vPaV+RoopiotDUivgrM
x63vXCdPE8OM+I1ZSchBdn5jk2hinzvJpiKlCnw2R6W8mEyTfc9iLN6nVcHe
rWNhR6fQJOqVrPHQ7SrQ1OcrGyjRJId7YaHq3SrQ2F/o1TKNJnTNvznGuVWg
pTO0J12FJs1Np9U3P8LzqT413UWNJmMdw1MCnlbBzarocPn//7104PiE2KIq
sHwdd7hKjyaWY31/7z2vguBzX4bWIbtPOvKL+RLrS//I0YoFNDmp1v394+sq
qK5Y3LgcOWXuwS+jFOa3cu6Kx7qYh2F7owa3Ck5mrz03D/mN6d43KwRVsLY3
oyx9Pk16rZv5LuIq8DNY8GUa8lTH3VTQmyp4u6n1X+w8mhi5NZZdqa+CNLc3
8lLIDr5uzx42VkGB46DsSR2aHDj89gHnUxUoL9r0s1ubJjFhLlmtrVVQ1V8r
2It8P1KcKtVRBW/uJaY2zsU8EjYlaH2vgkv8pPqpFphHOi965c8qUFzkGNxp
SRPp3PVnXQew3n/eyqFW02TOM/r4seEqaExLCMiwponVqzWBSX8wz+F7lSFr
aeLBrdj7VEoMLt325Q52NAmrWblLICuGDz5+tvM20iS1qXRrx0QxvC8f2/N7
E01KOpY7jFcUQ9M2DdVqJ8yj/5mNzjQxKHcW7MpzwTz+LV4JamLgreKsDN+O
eUx6bLxrhhg0d3g8dXGjyRI1ff0wLTHEQFCpngdNHOfmzr2hLQb/Xukdfzxp
EmA4T6NYVwyLA1QuS/bQ5JJp1lSJvhgsWDlb7/nSJM9aS67bSAxayUVFJ/1p
wt6U/k9+mRisTq3J23iAJq2u6oMLTMUQddfJWOsQ5uF7vdt2pRjeVLVt6TmM
eRye1rZntRg+DbSOZx6lCYRd/RBuI4aF5Ru3XDtGE89Ihdr09WKYLROz1Pck
TU4nxApKN4pBR0/2kckpmqSlj6drN4shW1Hr4p0kmpTev/iy10UMxexKxYXI
bwvHnk1xFUNhS3n0s0Sa9JefeWjogb+/d/D7SuRp3JGsDV5iOOsQuoaVgHnU
nLjp5ysGx1TrC47Ijk39CRf3iUFhg0tB3VWaBHYcickMEMMLz0d8L+S4/u6z
r4LEsP2d/ZuOeJo8/HfwREOIGJpLl/KOInPlOwIHT4rB88/ux7+v0KRN1c9P
5YwY2Pdrz0Qgy8xt2bX0vBi0/0taORlZ29Brm2OkGA7p3Wi7Hod5mH5wOBgr
hsv68dsvZmMe1u62MVfE4KyQP6svB/PYVLfyXqIYNkwdjPbOpUmG69ZlzOt4
fifKEyQPaFLmI9H/eFMMB7SPmEE+TeoDHbVHb4khLOXw2SdPaPIrlK+hkS0G
faXIvTMLaaISaae04j7+/q2XnbFFNDFOYMm5PBQDmKhNGfyPJk7p1mOHn4gh
YXpytU8p5nH/9WDcMzHMhOXLxWWYR6HljwclYrhbMbzC8hVN8stftLHL8LyS
P9flvqYJj7OiqaVCDLaka7oykybt1UW1Y0wxfDbTHDxD02R80xLhLI4YTloc
OtbOpsm8jse0BV8MDl7NSc6VNLHu1y/fUSUG8ZXwzeV8mnj9yy0KqRHDjk22
j+aLaBIuP/9RYp0YFilMvB8vxjxUs7OfvBdDdNYyGKzGPObMTuN/FMMy/rrQ
3bU0aTDISGxvwfNztHDh1NFkaIVGrGw71l/8aWLUQBM165Rz2l1iOC/VNGP8
d5qYbFI+uboH62v/mHF2F02cXRMOe/SLIXHi6eVWyEE+k/1Dh8Sg8dlJu+Eb
TeIDL3mmjIrBrid8+BhyfuiE7UVjYphrOv6lEvIXpnVuu7QE7v3X5ve4kybH
7KR0BmUkUH1wzh87ZFnR69uyEySQ61Z0prWDJtdcwmeoTJSA/tk77WeRdd5Z
pmhPksCWxtZVmsiFnr+Vlk6WgPaRi2dK2mmypvXFldVTJJC16lTuFuSq/Scn
OipJwDVK49DdrzTZ/WNFpIeyBLwq1s4wQf4eMjB2QFUCsi5qz+k2mpwZKTod
Ol0C7naZq7chTzp3dChaQwK1t/SLvnyhSbrs0pAUTQmE9y2edhzZ4PKPHzmz
JLCym+ExHvnF1CcHi2ZL4PW1J0kprTTZkBLwlTFXAsP/5It1kes0DXzEOhL4
FlZHSlpo4p/V0dQ0XwL3Q5RfrEMe0M1z/75AAh91X2e8baZJZL7f298LJeAc
03DQD1nZeL6zvKEEAm7u1f31mSZ3n7cI1Y0kEO3hJYhEXrYqe8OCJRK4yeLt
UkVmML1Yy40lEPo6pyHnE0222M1eY2siAdXr361NkD8KP5Q7r5BAkU1OCvWR
JoddMsz2mOH5mH2qdUb+U+9efNhCAu8uHhz73ESTK54aS8ItJdB0sVf1CLJm
a92jOCsJPByeoT72gSaP9qcsSAcJvClxkb2KvPLH1rsPrCVwVHVLuU0jTSpD
lGeX2krgw4aCBf3vaeI2Ikljr5PA0JWesBzkr2cT1GrtJMD/rFSyFfmE7Oak
FnsJOK5VeSeDLHt5smKvA+63dLClGOv1+lRB7JgjPn9l+VtfZJ2US7JTtkhA
RbSnUAW5SHPD+VkuEtgX1B5Mv8P6yJrwx2CbBI5oO2mFIEt02SctdkjAsDW1
QAd5T35Ev52bBNL+Y+rX1NPkx1KboB07JVCRIoy7gHz2uVTX3l0SSIl+8XYp
8uRVxD9ktwQ2G2gGr8Hv9xYzvOXCHgkc/OgwkEphfdit2p3og/X1KCerh9Dk
pfB3w529EmB8rAuxq8D6cCnb/sRfAqkd+oczX9LkXf3J6vL9Eph8WStxCO+b
/Z6mjvyDElD8FtPgVEKTwZaByneHJLCJfWjjA7yvovcXr20/jPkt4rdI4X2m
+uMo49cRCSzxz77rjvfdvZClq2RDJHDqWN+lokdYHyM/SpWPSyBpXcVNBbwv
qbNPTLRPSkCtVlq89z7Wh+yhgiVhEtDTYSx6fZcmny8ZGK4+LYG7K4afqWfR
5MjUztxN4RLol360++htmvy7nqfjcU4CVwzqlgnSaXJV0//OgQsSkDY7s1j3
Jk1mZc3XDI3A84u77XwuhSaPdVtToqMksPG16q2Ga1gf+dnTUmIkkHPacspy
7E/8pXvicy5JQPyVzruK/cTt+Wz5ojgJmFse9em8TJMOy6ZIRrwEFqUruKyN
xfpgZkiJEyRw+vkm46ETNJlgt/NMUxLm5dTZVY58Q6gx3JWM+YQHXTmPPN+l
PuR3Cj7P9pPyOuT/6lN6Jt6UQNUd83PyyDae2wLU0/G8E09Xi47TpKZFuV33
lgTGzXggfw15z/5qn+V3JJBp9lpvB/LP7oSPNlkSuP69wlAT+WzI5p3OdyV4
v+epfcR+PmVkcp3XPQlcnHGqLRv5zlmB8+FcvD+STDP8kBfJXhadeSABYeYH
U33kV5c22Mc9kkBXe7m1BvrDxqly7LTHElg6f0vwy4M0eX+dvebBUwmwp49e
34W+sV8z8tXzQglc+5f96t8+mgxn2piziyQQvN6tIwv9JFpX+r83/0lAxqBJ
w9aPJtPzyZKW5xIw/m/B5jb0mdylZ/N/vsDzA53YGB+aLH++Sm/spQQWFrzj
6HvThGU5elexQgL7v66fJPSiiQuzbPYsIoE880CXw7tp0rI+NN2AKQG/Pw6Z
SuhPR4Sm0y1oCbzoa/lZhH4l5fIryY4tgbVzl9lt34n1UV+suIMrgYgYi7tD
6GOzPYMv7eVhPrNHpNNdsT5alo4PEeD9sPGo/6odNFm1v+f8BZEEmrdmiz9u
o4mw+8mfBLEE5sfctLqwlSY7Qw6F3qnG9TUaF85D//s2bDDw+I0E9pgV6XG2
0CT0bGdQ+VsJbI3YnbMffXGi7IMuXr0EpsW76Spsxvq45L/vXYMEStYduP8E
/XLBVN3Wr43YP1qrVNfbYn1cb939q0kCr9R32mghr9W8+z+KzjweqjaK49Jm
SyqEyq4QUiHZDrJlK9kl2Un2CiGVJFSSJLJUEpJKhWS7MpOEV2afkZBkSyok
SXpPf34/zNx7n+d3zvk+g+pZOtAN2fPP7WeMSQT9lqfT2sFu0L00atGB7K0g
RZUewvnV+VmmCHmq/L3NtmGcH/Uv+2KQz6jnv9Ef7Yb/XINO70MWqnEztR7v
hrSST0s3Ixfqir90m+gG/qKdwQvoy2ovWXpHJvH+rR1qqcgNZtm10d+6weue
+WgZsnWng0byVDdoPVy1kIDca7euMmsG8+xTMu2AHMSibL07i/3gzZq3ysjz
7hmlT+a6YchOvFJ/L4lIGbSVa57H+WWs998O9G2xwFW3uha6wbFau2aLFebj
S4fE+0WcRy8lfTbi+mgdS8v+zEWBnrIIhpAN5mPOYu08NwWeHKYJLMf1dEhY
mc6znALqPOa8v5AHl7byrl9JgXU/3rRP4PpHpiadV+ClwI+3h+0GcH+4V+9Z
osFPAS9N3gKaHYnIyFpyyngVBbYubX3YivspLdE8t381BaQh+9wL3O9HtxKO
H15DgfAPJyUrMA8GCvrfQtZR4PREeEIh+n5n+e+j8SIU2OQbdzcD8+OuXjeS
tp4Ch61yLydivsarY3xyxSnw9ly73nHMX6zurv7SDRT46ib0xM8V5/3LH241
myggvD9k3AnzmmNWxSRLUUAijz1qjnlW7Iw8QJOhwP6q5AptdxJRY7e964Mc
BeTJoRpKmH8z1te93xQoUN7y+6w41gfd/dGrxS0UqGv/kcyL9eM7GGy0SpkC
x0shOgTrcypga+MGFQqscrN2dERO/DKmraxGgX1PS4X1kdceK6vSVqeAYaVd
tTzy7Tl/dfMdFGDaW+4SQFZPUKhw1KCAeMHVm9NY301Lh7b4alGA99KW/h5k
29Siu5HaFLgrLbC8BblX0EvqrA4Fht1A4D5ycJZU3hU9CrB0Xs5cQZ4X7xMt
NKBARPPVpijktFv5mRWGFHj+ufLIIWQxhYOC9cYUKGuQnP3XT8rKxdPemFDA
aOc7H2VkbXX2crYZBfKnS97/xPNNa3X22WELCgROPCpIOUYinHQd/8xYUuCR
n5iwOPbLoeZ1J5faUKCIXqF/H/vvcTPqzJp9FGjn3b5hdwzmozMjXNoO87VV
qqLtJPqg3b4JNXsKNOsVfnOOw3ywVgXqO1LAUeva6HA8+qB750crZ7x+8cqs
Ewk47wfTDru54vsnLUwtPYM+GLD3XeBBCux6GLE88yz64JeVztGHKDC0PKBD
6hz6YGQr9fxhfJ78XpOHSeiDc0m2WV6YHw9qhE4y5iNhT3uRDwUmT1sceH0B
fXApt9kTPwoEVBsM26diPlKbXxIBFHjZVqU6gPOqVvC0ftcRCpiveaYYjOcd
syz9F71HKTCWK8X6ifONKb6g8TmEAlVRe3afw/OX/626yl9hFLB1ptsK4nlu
Rv6kCk8kBSiSn0VzcV4mle8qEz2OnLIjUy4L86E+K6cQRQFF5cPtD3G+FlVX
3doZg/V3TcTnCM5rdd1jG4xjKQDm13Z7ITc3b7+xP54CrbubJl2Qbc2+rT2c
QIG2oOzE/ch9HY/SQ85QYE/Phh/myKF2IXzxiRTQTLE1A+QF5tbktCTM03G1
KC3kS+7jS3KTKZB6qz5JFVlisOxUaQoFRnlmI+SRywMCflWnUYBU+V5/A7L2
F4UT5EsUEL0ROboGuS1y6Bs1nQIf6qsieJCd5oqCP2RQYLNUMWfxFvrgKa/R
r5n4PDVz170rcN4vlfZdzML9+vabLfIIfTC1r1/gBgXon362tj1GHxQsOLgh
lwIbyCIBcU/QB7MOspTyKFAdlFml+gx9UFzCXrsA66NN4kk/nu8Mb7G7zG5R
QOiLn/vVGvRB+RuWjncoIDt3osa4FvNR7tjqc5cCC9+1iWk8701uEzaOvEeB
qT9Po4rrMR/V1MYzpRToWDnU64A+J6B7dfeV+xQIEu38vgx9L795X3XBAwpE
7zxaXdWMPmgmuL3iId6P58stvuiHdR2dFXWPKaB3p8tiHRl90O6i4psnuP8D
mWIt6JNs5t5i1jMK1D8VvBH+GvPhziM9XE0BgRkjsuQb9MEPrXkzzykQ/0nt
dieeD5MCzq9fWof9pqxJObYTffDLnmtrGihw4MVR3y1d6IOR3KulmyigVVBi
Tcfz4o655jS1Zgp4XswdPIPnxZZTp1fot+D+V69QUKWhDy41SLQiU6BFIdYn
HM8LAykLf1xbKbD60ZHmaORQwfqTgW0UWOzw+pWAvHjt5I+odgpcP+0tmIx8
SVw74nwn1nPb0b+XkDfemp241oX5KT3VeQ25Qr46sKibApIbc07cRNYpPzZU
ScV+t7l+/jZy+7YdngSdAn9fDR8sRXap/vbuPyYFfH9L5D5EHtV57NzLpkBw
q/PTZ8hRzSG08R4KiG0pKH2BvMJMZd+vXvz+TZ9jCOSsjvH2lf0UcLpvtPkV
srzdfTPRDxS4n3rZuf475oMZ0CL/kQLGk83F0jPog+6bDXZ+ooCBC1w8P4s+
+GHohdEIBdwu5vGPz6EPBtzV3D9GAaVxt822v9EHJ7yeeHymQKlKwLsnf9AH
I6VVQ75Q4NJqsrIIF5kQnOsri/tKAanfPsIx3GQi/1SBfNp3vN9p+5yeZWRC
Zan77ZxpChxaeqVGbyWZqEuR2Fj6A/PHJxJWyEsmLAU5N6p/UuDxhuGXf/nJ
RM+1G+vIvygwuJv7sacgmQgUd7pC/Y3Xsz+i9VKITMwVCvN/+EMB9ukNLjLr
yESyPC35618KzNwREz4rQiZEy69yLy6hwk4Pr6CB9WSieNv+BIFlVChRmHUD
CTKhUS04L7GCCl+k2z4VbCQTLTr/nVDioYKP1hL+BUkycaD54vddfFQQ77nT
7ipDJgZNLUPMBKiwQypW4bkcmQjv4BlzEKTCaa4RUeHNZILL7rWvjxAV6Crm
ueGKZCKdeX4gYi0VLAacalO0yYSku4n7GWEqjLZfnCtErvjAzU4XpcId2V9r
qpH1Al7aF4hR4eRI4bIO5PaJ028fSFAhVPxU9wCyW6SBVd1GKiTWXjsxizz6
c6G1TZIKleTBaf7dZCLmVL0xS5oKv/WDrGSQeZbGNn2SxeeRV47XQs5O0daZ
kcfrR8smWyFvFvxZzb2FCqna9kc8kauuVW9fo0QFM/8GhRPIJuLHH0ptpYLs
Eo/6VGRq4Q4lNVUqeItJNyiYkwlv+e/FetuokHdqR+nWvWTi2/3H0lbbqbBx
aK3FdisycWZbaL7rTiqE3fVJ0bIhE0LVKmKBmlSQKX0aoruPTBTqfL4WtYsK
rnFpP8COTKg13199fjcVLCXuSJvYk4kG08CL13Sp0BLybdLckUxYd2xeWaRP
hfSeJE8rZ8zH/k+JlUCFlMPOJ2xdyUQQ8+5ikxG+X6q/qt1BzMdB79j/9lDh
3JenKfaHyETKB+nZd6ZU+Giqd8HxMJkQC+iPGDenAq2eW8nZi0yUTBR8mdtL
hc3SK0JdfMiEVqT7kZXWVJipMnNy9SMT5J8Sn0RscT+WkD+4BpAJh1McT/n9
VDBZkyDkdgTzwZ3Tu+MAFTx4wgddj5KJyBQnFyMHKiQXljq7hmA+BEXo+5yo
sODyNswljExkXKPt83Chgs4STRXnCMyHeGZHsBsVrgv/TXU8RiYeFe43j3On
Qpl4b5r9CTJhIL+alOpBhabfTc8yz5GJzvv/GeR4UoGrafzwc2T3bZfqSryp
8KKoYPAd8niVpVa1LxXG7rN0uZLIRKwO71OSPxUu0XKOyiPzNL9WpQZS4a7U
hwgL5BzT5PsDQZjv9ErbYOTNHSYKX4OpoCG1kjsDuWb/0jt/QqlQTh26+AzZ
jPlyo0AEFW6U7Z1gItMPnsmROEaF2duacvPIvh8MhJVOUKGrvkx903kyMeX/
58quaCqI/ioSNkROnKjnNztJBZaL/FtvZKHI2AsOcVSIXfgz63eKTNz+qb3U
5xQVqvfPKYXGYz5O/UyIOE0F8tywblQcmWjirpk/fRbr+YyfWUIsmbBNOR6V
fo4KIoc8zJNPkoneVTun8s9TYeJHlH56DJkIvvY95MEFKhi2NStmR5OJebHK
sRep2B8aLXkLo8hEWmGoX9tFrI8fIv33cL3F5FU/MC9T4YHVpvKHx8lE2f3P
7p+uUCGf7RVUjfujta2cPX2VCpsef5RqjCQTrVWBDtxZVDj2vKidjPvpoLOl
Wygb+4HgraDOcDIxRHyyksqhgsF59l8a7v9x0+LXqjexnk/vS3sXSia4O7z3
6OVTQfL5Ur6PmJfM/TKEZSEV1HZPJYwHkwlpZr+O620qUOhrx75jvioPFtYE
FGHeBBotfgVhPj6474gqxn6y4V0BF3KX/4ZHSSVUeFx7dXgl5tN9gqN0rYwK
SnsUJFcHkomJiJx7d8qxHuL1XEQxz/E/nWQqK6jwNyNf650HmeA7JVLQ9IgK
Bzx0IgSwXm5y08X+q8R6Si46o4+smJKZ9e4p5puX4RuKXLvKTmi8igr+I5RN
t5DNrq2+NFeD/UA698FbZKZY18qVL6jw8JmyIJcn5qPw0jmReiqIFSWbqiPP
yFn9lWukgvvnCjtP5MT7vHE7CCrEXSnYkYG8dlvbrOFLrL90l1ECuagqOXIf
iQow+j7yK7K6junkoVdU+JSvSpXEem4mlgYFv6bCupU8ivbGmA/Tlk+xb6hw
4q3g9KQ+mehrP+OV2kGFJVYKX9OwvwXvh/c3/sM8zRuZbtEkEwuMPy4lb6kw
5cL1jaSO+TjYQK+iUMHh0MKkpwqZkPgQu59Ew/p8Uma8uIVMlPvv7qQwkF3r
x/NwPmhP/DQfYFHBbcRrZLcUmWiLqCFNcqiganRNm43zx+nncfjzjgr7Umz6
okTJxHD8znr+Pqy3wgy2yFrMB/eUlsQAFZ5ect9SvYpMLEupfKo4SAXhoCft
DjgvM1eFqe0aooK14ZWWGZyvstdUy02Hsf81/xC8jvP4qdiEgsMoFc5uGn6s
uYA+WFh+x3ucCoeEPe8xf6IPyh3ZFDFBhRW/D3+NnkYfvL8l9/QkFSbFv14W
/4o+qDYsnP6NCtH6f87Uj6MPVhVn5E9hni/8en1oGH1Qx0fgwQz2s3fSvlyD
eF4gZFJezFLhLdvU+u579EHTgaVtc1S40DX3yIyD54X2wtPMeexff/QJxTr0
wf2Hfg8tUKG70Inu8+/zQcaG6OlFrK+QmsZCZP+DPVNLltBAPuhQHAd5diAn
VGgpDUKzrFYJo58m+TuPSy6nQeTEmWO2yMITIv6qK2mgEfnnYQpyUQT9gy4v
DZ4pvGxoQd7xM/OQJT8NvqzovLWA3Bxvx3FZRYNPIpLOWg3og9xCjgGraXDz
wPPBMOSBC13dJ9bQgL/xhvF95NBVl62T1tFAx5GIGkRezLRqyxShgfUNm9LC
m+iDYnwmd9bTwPfqzQu82eiDhW3EY3EanJJ/33Qczzvlchd0mzbQoDJu74EB
PC/p3Dd93rkJWYkXrFPwvKC2bOc7KRokWPxOrsXzmktVy6MxGRocPuqnpHAa
fXD3WeU5ORqMxWRuzoxFHySgZMVmGnDlnU34i+fNFaaLMiKKNCh1VdsegufT
rPaGAjllGlSU3zR4F4w+uD9OfIcKDdy7XpXsDUQfZOy+bqhGg06eyiO1PuiD
B+eE9qnT4IeB64UteJ7vHqi5dGgHDY4nvfyb7YY+6H+CJ1iDBjKvR6krnDAf
n3cmxWrRYMihmyvaDn0wYupvijYN3qyNTh2xJhGCPyvjbujQYK93d7CLBZ4X
4sN+3tOjwXgTvfzNHhKhwq12rMqABr0wt0cX8LxwYWKyxZAGc8aSux7qkAjL
VQ+CKMa43o0NF6S0MB+ZR4b7TfB+eKtUMreTiEAxRe9JMxo4XVvRJimI+SgY
fr9gQQOb549EvZGT5e658lvRYGGD5+57yKL3fRjiNjQIeCmhPopcrCZrp7iP
BhdL++aVV5MIjaqBTi07GhztepAbgtyy+5aFqT0NlmglClQiHyAOke0daeDQ
52U/hTxgstHQ25kGXq8tQzWESER4e099uCsNFL7rHYpCXtyXu+v0QRrcO6gt
XYucznB+dvkQDT6s0H/+C1nyoOi2/MM0oE9ZyuquwfPCAL283IsGiVLeXvHI
ev7XNr/wocHmhb2jwsvwvPDZrui1Hw3untTtT+EmEW4RQpLMABroJhb3LHBh
Pma7coeO0ODI1bvs8L8tREz8ZZHpozR4QBj1Df1pIVZwW19dEkqDOzt2jrss
tBDZF/hWCYXToOl46kLnfAshv+pNimQkDaSsT4oY/WohqjIvLFM9jvnd/F2j
+mcLYSJmdkY3igZZ26bclGZbCGrBsoW9MTQY/Rh3oWCmhfCWI0W7xNKg+Vh6
3ZrpFuJb2dlp/3ga8I0ozZz/3kKcUTMMO5FAgxWqthrzX1sIwarF8XNnaHA2
6Hds6GQLUbi70T8zEdf/+Pa2wYkWQoWIG7ydRANyx+QG588tRIOJjsfjZBp8
O6gT1THWQli3z3EaU2jQ6L+EBaMtRM++546daZjvACuDquEWIohxgtJziQYp
v09UKH5qIebcNGzG0mlAXS4mU/CxhUgZmGr7mYH3H+xesGawhRD1f2Ky4hoN
Dmj5bU8eaCFKPoc1C1+ngUXpiPkYrYXQiFDTk7vxb79O/qdBbyHIsxPPt+fS
YNXj3wpnkB3iH+w0zKPBr3fBdh3Ig0uCHtsW0CD75H/7RBktROQFxa2HbmH+
L2yS8ULmWjVScvTOv3506NUD5IzMe7Kxd2lQNHtRbxZZUsy3MOUerp9zebIh
s4V4VCArcaMU86BYezcNWU/uw/V792kwfaT6Gh25s+zWmqoH2A83FjlJsloI
NzWPyy0PaVACCRMByOPPNvJSHuPrs0WVdvS1ELG73yX1P8H1ETFIONLfQvAQ
uVyTz2jgHyNy5zY+f46JS/xCNQ2kP7yKZ31oITa3i87x1dJgm6HaWkFcv5p9
jGPidTRYvXO1p8kQ5oNx7euWBhqEHYjyj8X1prsdOKrVhPWvQShU4n54DwiN
mDTToIrKKPg00kJM+b31tm+hgevV+i4J3M/Ez5f7vMiYh7Dw2n3jLYRQhLVb
eCsNuC/OuCXh/t+e5WMmtNFAf4NFTS3mQy3+jd3ldhrMTAe1T3xpIZqWpPyX
10kDdZVDN6QxX9YXzPaWd+H+EpKbHL61EL0Cy1/VduN+ej0+eAHzGJRJMnxN
pUGh9Sr7uqkWYn59YgODTgP7GL2lXzC/aQWG2kNMGnz9vjtY6kcLISb399kU
mwYfvacu22H+y8oaty15h/3r3oeAc1gfWmrxD1a/x/5tUvq7aq6FaH2ms0Wy
H/vX6w7DYawnh92/ilQ+0MC0VFC5Fet1qOm5pO5HGuzZsrVFYgmJiDSJurn3
E+bLQW9rGDJ3u4aoywgN5rcZ+5GQM/ZNX/Ufw/Wr1Qtfj/UvzXiy6sRnrKev
W62PIle6haee+0KDCerqX03IBgNqyzO/0iDQdzRq7VIS0eX35czt7zSIulv9
yg/Z/fODhUfTNNiYEf2pFnkiPCim8QcNXJTVmPzYb2JnFWc6ftJAMZJzwwOZ
L34krOcXDS4HnFR+gpyzpOTz6G8aJPMJpi9dTiIUL/gG/PxDg66+HOHitTjv
BeQ+Lueiw6Rpx80WYRJhlvnBQ5ibDkueR5IGREkEc/3tHtlldDBs3pW2KEYi
fAs8nLavoIOD7/fJDRtIxIzsJirw0GH/eqEp7U0kIrHsnY0tHx0qeo9dc5Qi
EWvVbr5xF6DDIS4DWoQMibj9zMX0qCAd/C1CnlyWIxHqu9e/PClEh7usP6r3
FUhEUxNDL2UtHVqsvlmQt5AIW5Os2mxhOoRdMOHuVyIRfW8OaNwTpUNQ1rzr
r60kInjfmspnYnR45bZ2/zo1ErFAf4sbRQe39ZeGVNRJRJpbemn3Rjp02wes
N9tBIiQGrOX6Jelgkn1n1EODRJT58d/6Ik2HtghTl2icX9qf30gsyNKhmqHr
f0WbRLSGp2TzKdDhyaOetaU475xmzdaKb6EDLTz3UJMeiRiOW56+RYkOxhxL
c4YBiTi+hMyrtZUOK3j3dn42JBHLLiSeN1Glw/tAocklOE8zBYyW2G+jg25R
2aGX+0iEbObfeK/tdJAoS2uU3I/5WN80F7aTDlW7JCfikA0L4o8naNKB185n
jI3cJav77dIuOkjOuFZr4jz3KPt1NG837p809/5M5EnV2pH7unSIZx18MYkc
/yzKp1Yf12d9wHfLA+iDuzX7W4EOXR/k5kqQbzZNuzGM6HBVM/M/bnv0QZOn
zI976LB23dMID+TaN+EHpkzpYBt7bujfzz8s9m3r4rKgg8XRFZtFHDAf9C97
V1vSgetQ9+I+X/RBt4pXm6zp0Mpyi+UKwHz0Bxmp2NIhw9c6ofII+qCfUqPO
fjq85uxf6Ym+I/x5RHvvATowQ5M3rg5DHwwvqXJ2oIMOj19TI/rRjllfdX8n
Oix4aHw5ehx9ME6u4rgLHUZExO+LR6MPLhnccs4N86AlONV6EvORfPvuVXc6
XAsRajsWjz4ocFjqtgcdsgWkt0qjny1c3ZT3yJMOw8/1NnSeRR9c3yva6E2H
r/r+OdFJ6IMFNzM7fOlAfplfJHsBfVDWVbDHnw4v9AZ2/5eKPli2Pm00kA5p
nuoe0eiHbarM5T+D6DAYenm1zBX0wWdZZ5eH0MGj54dNO/rksLb9n3VhdJgP
jRY/loU+2LTmpGwEHUydfkdsuIH5MOmeUT9GhywZbWdSLvrgm/RwOEEH5epV
7UH56IP7bCZsoulwW5/cueYW+iCdP9D9JOZDvuVA7R30Qbf2j0FxdLjV7njW
oxh9sD/l8MlTuP9Hvfv4q9AH/czfXThNh7nLie0RyJPjy52zz9LBxn0wkYWc
EE6mFp+jwzHm2ZX61ZiP2UTbZ+ex3hY8XYqQ8+OM2l9eoINB1+kTK2swH0u4
zLpT8Xmt+jyCkeuSm172XcR6OxEvTEG2FDil/+UyHUos3bI1n6MPXtV98fsK
5q8jeij33+8TrJ/X4MukQ/0cffEP8mx+baVYFh3OUiI+edWiD8pGq2zJpoOM
k23OK2ThMs0yzRzcn4xgA+NO9EHVGTmTm9h/xK3fWv37/PjZ01sH8unAd6rm
owMVfVA7YoNXIR2Wn78Yd4iBPti07UbYbTpYPZXP8mOjD+6ZXJtQhPW++7pa
yDv0wTcV6ZeKcb19PCyP96EP2h7lyyuhw5qGhZHYD+iDdKXk+2V0EGA7rTw7
hPlwG11SW04HEeEjZckj6IP9JadaK+jwO0qz4yKev3T8/H7RH2F/0aoPy/iC
Pjgud+JjJR20k+evZ31DHwwf/Pb9KR0SD03r5+B5bvTH7WCuajqkvrsXkDdL
ImLiDo8KPqfDxtA16wp/4XlhiaTvphd0sK7SNLyN58Ps5N7+rfX49Sjxr3f+
Yj4E8g7qNGI/OpspdZebTFRddWVZEHSofNpHubucTBivF7N3fkkHuB2/opiH
TFDzmV1+JDowzqY23uUnE56y1y2Pv6LD7qPLfxYJkolvpfatia/p4GTTVH9n
DZk4o7rW+Oob7P/ram8vyJMJwWfdjbc6sL+pd80GKZCJQu0rux/9h/VdcV2U
g6zSZFPd8JYOfSmCXOabyUTDHoHtHRQ6zJC1n1UhW75pr+DQ6NDpKawui+fx
HttUxVEGHY6634m6ghxINy+eZdHh7fP+5AXkOdcV0st7ML+Rbz2PKJKJlH5y
3rpeOny6HL6MiSzqd269bB8d8nlIEcZKZKJk3Oia+gD2r4+tZY+QNcK5VsMg
9q9N8fcllMkE+UdTms0Qzqvng8eSkQ/EnVrhPox5sKy9S95OJga59BKDRjH/
DOZ+kZ1kIjx5/k/MOB3G17u88NMgE1wCL05emKCDRumRrmpNMpFxNfrH9Ums
73j+7OW7yITkeq2I4m90cHzLWuWoTSYe5c9MPJ2igyBtk1bxbjKhJ/ss8OUM
5nOMa/W0DpnoLI0YejtLh96vPjlGemTCTVXds2+ODtt+mVOv6JOJ8aeT7ybm
6RB842HDewMyEaP90Pn3Ah1yjmQ5bzUkEzxNR2m8f3G+eS4UxRiRiew9yvvE
ljAgvOxT4StjMrH5zWj75qUMENu532qtCZmosS0101zOgMFgvTIPUzJhQvdr
2bOSAePmZdXlZmSC7ipvcICXARVzucdm/31+3D/4wpOfAbV71g4a7SUTU753
NMNW4evvvOe6bIn5GD/85NRqBvDInXrLsiITQuGSqpfWMGDUMctW1gbz8aO3
7OY6BnSvupwabEsm1OLy5O+LMEDfMTikZh+ZaOJyu/18PQNYfnrZv/59fpws
trFVnAEqbiPrQp3IRC8/6wZ9AwMe9Qa7DiIHXb2+7uMmBvh+6fR3ciYT86IO
V75LMcDy0kq9duSU/LX8XLIMOPxiI0ffhUyIyVKSBeUZUHpcwOAJcknpFe5N
mxkg2cQMknclE1qqtglbFRnw5nrc4RvIrU8F5ncrM+D27/kNfG5kwkG744SF
Cq7HV4fb8chDjanfndQYMBaROjGJHLnHIsRPnQEHEnO4vA6SCe43K8aO7WDA
socOAa0HMB+2r3wTNRig4DItNWlHJqTp5wYytBjAqVt2VwT5kaux+y1tBsgn
dcnp7ycTBv1c7Ic6DJA7e+SyL65Ppy9h36DHAOUsvsGLuH7u46fethvg+rGF
5Z7h+k6E6VlxDBng/lluf481mYj9Md86YswAi+9GR5Yg88W9MJ41YYD0oeBQ
RdyfHK6YpmXmDPjof+fwPtw/xWQtnXV7GSAs9UEvCve3hv9HtYwVAx6nbF1R
YEEmzK4+265uwwB2/Zl6EuaBLhr50GAfA/ovDbiPY15889WVbOwYILrcalwI
eUbma/FBewZovSJ8dmG+EksfSgc5MiAaTN4cwvytVQ3Oj3FmwAz/Q4mkPWTi
9lNlsQuuDDDyNnEpx7yqa49du36QARIXjBO7Mc9NjaWriw/hfnNlXp/FvNvu
8b/49DADgiQv5mxE7m2TX/nSiwGLdnaXjIFMBNt+THzrw4DgXGbZv/qcp91Z
fO/HgPxfoWOqWmQizdUzdiKAAdqRf77dQ5bol5ydP8IAnaWJxCas3zLf9xG8
wQy4X7HgcB1Zezzvy/pQBpwJDXkigPXcGuZ2ZHM4A5ot6PRzyE4/xD5pROL9
6G4n5pGHYlmee44z4JRZUngE1vtxruxeuygGzB35b3QEmTvZwcUzhgF99wQU
PbD+M/nX0UNjGaA2b6RGR5a9Stl3Kp4Bw/4hv/fqkolK0YyOiwkM4JtIv0Ig
G+bbmt88w4DM9gfWdFUy0SWzilSWyIDOn5doripkwqO0w+B5EgN+7rng1Y/9
bUIlre5VMta/jeuYL/bD+KcWWvQUBngd7AwZx/7Kp73y6WAaPs+xkK9h2J9v
Nr5S/X6JAaHt3qE/sN8r70m6/zedAeRLxeOxcmSits1YQfAqA579FfHlkiUT
FrZL7my8xoB9/U0956XJBJNGbNx6nQGC5wps+aXIhL9rQs7uG1g/4U+JjE2Y
jz49YYtcvH72H1XRjWQiyff3Fac8BtylJ+TmSWA+xl/w+xUw4Gm5FreMOJko
Cou5cOwWAyZ05QNL1mM+fmgtTbzDAN45s46tomSiOfZHQsZdBlzfVLz1iTCZ
2M9VNV94j4E+vzNVax2Z6DsfGfWwlAGq5tpD9TjPQvm3T9XfZ4DBmR+6RkJk
YiHja0j7AwYQVOfMVpx/l0QfjbEfMsDGOnDYahXmIz/Yb+QxA2q8hvdQcF6W
y2z98OMJ7ted9AHDRTwvlI65L6tiwPsSXdN65DaVMvbaGgakjTiGa+J8dnnq
7yBTy4CdPu+9HiMP71Lo3lbHAKY4VVyJi0xENX60MmhgQCy/Rk4R8rI9Ra+t
mxggrr30/YYlZCKrzXPPwWYGVN6C0SxkWVsp4kgL9jvjsRercN4/pb3XiSEz
oEeK60AysqFrfk1yKwNCtJMqF5G7+9x2XG9jwPzFE4yopTjvfcUf3W1nQKIE
vXkSeXKMpfS0kwHWKy/8aUH/SAjLvtfcxYBXEWk5uj/QB384yLztxjwJFA49
Q1/Jj11X8J6K/XOsG1Sm0Ae5qGITdOxfd41yitFv6s5nZM0zGbB19PXXjV/x
vMC/T4iXw4D6F/am19GH2BmrLq1/x4AHSty5qybwvCDauXLzewZ83jg2fh79
aTYv7ZxGP/ZfJo/u4ij6oMzev8YfGLD3lkdqFPqWcOnKOLuPDHB6N8aY/IQ+
qNI6e/gTAy7kl0sHoJ/teJoUGTrCgOo/t4/0D6IP7tozGT/GgB3Uzkpn9Ln9
jUuCLn5mwHNCbfbtv98nMG7+lPuFAcknW3db/Pv947YEr7KvDFjVkhnX3Is+
aKP/vuY7A/7beqVeG30xnfbb5dU0A6z82n9VctAHXevotB+4fq9FtJTQLyv6
YvYP/mTAppjvEXeY6IO+uzq//WJATuObMnH00faxH+Z/fzPg4A7R/qs0zEdY
FWnVIubHk9+RD/11dCYSNnIxoXzY4OEQGc8LsdvrlbmZIC2scNDzFfog1zet
3cuYYCkr+PYdcvb5R0/NVzBBfs08j3Mr+iB/iJoTDxPKBkZ5qMhVGVvLffmY
MJTR02X9Gs8LouMKxwSY0CHz1u01MjWv7M5ZQSb4XGutMGrD84JMwKYMISY8
/tRMrkf+VqKQW7iWCaViTUWabzAfKkPCD4WZsF+lyewxsuDToox6USY8kH5Z
qdiO+djlJdAuxoTaH60Dd5BVGqVS2BJMeH2w+vztOhLRYNy3dGQjExRHNO2o
6PeWbfmnf0gyQc3ExGoZngd6bA7+XirDBL3UJ6ZaeP4IpIlHr5VjgtwzfdPA
ZyRizoU9Ja3ABF126t6bTzAffdmh27YwodfGxb7zMYkQ9XUc11diwgB3offi
v98/Hlvnb70Vn1fQMlq9gkRohFE/uKky4aazx1XvchJBnsk4dGQbE3T2ciqz
yvC8ELuPE72dCc2Z9YzWEhIx+HeVY/JOJth8W8b1C89X4ec7u7M0mTDmW71t
610SwcV/0fruLibsFPjP9xCex9Iz9rY92Y3roWF96wqe1yRFeUyadXE/x7b3
vyzAfOS1El36TLh1Kl5+Jo9E6Mmc130PTLB4sSFs800S0Vmy5/lnIyaoPthN
uOTgeUGFe+f8Hia82lYlfDGbRIw/aX7EY8aEn7f7wxrxPBmz67TyegsmhBeP
Ub5mkgieRv0SBUsmNMR91JDF82e28YKMhjUTzBf3Xms9QyI2t9UVGNsygeNQ
STLG82+VzUlxu/1M+H7904smZBParuuHDzDh+suxEzqJmA+XWaFQB1wPVsPP
amTvvqpL8U5MOMH2gO3nSMSUzzGeiy5MqCa9ta5APjO2PSnXjQkJuault+B5
Wijs299SdyZ0u0q+uINcOPMorsaDCY+WLazfeJ5EqMWG/CR7MmHtzTK9bOSG
v1uP0byZsERCfotQMomwPj8++cGXCbFJoaxU5B6++0Hf/PH9ORdsluL5PCgj
YHgxkAnL0gTBDO9/XmSz96qjTGhJnoKv+LwpeUPvN4QwQeCcnEwOspjMXVfl
MCbE//nxzhC5pMSLoR3BBIfWvMix0yRCS0XazvwYE648Evt0FZn8pK/T8QQT
RpaKaOggO+wqsPCNZoJrcMLhwQTMR8NBcuRJJhwX1wlIQ440ljA8G8eEqE4r
qx3I3G3s+iunmMD/6Cl/zykSkWFzY1fhafz+hLCys8jSNMdnFWeZkDZ+VkYJ
+ZGL8Lb6c0wIGhiL6o4nEQZ91PI355ngl1taFo3c6XN1M/sCEzwL62skkd3H
9hUNpzKBd4fMnVdxmI9QQckfF5ngcX0sIBg5dqYzd2k6E36cYPOtQ+aJvSiy
NoMJX419017Ekoicv3uvSmfi8/7a9OkwsuJ5nlXbspjQfveN1ArkGr7XKfrZ
TMj9yKtccZJEmGWcX2adw4TMr91rDiDTRUzOuN1kwoG8j0dnjpEI3zzuhcB8
JkhEvb0WcRzzIf0yOrqQCacSXp+ZRE4sOT19/jYTYqo6dhw9gflQMQjLKsL9
F+u9P4J8+8nCeFExE0zvz33yiSIR6rvq/Z+UMGF9oMxIP3JTw8lBoowJZx2c
Hh6MJhG2xtoeXeVMSA69oc1C7n09y+mtwP5SM5RyIIZEBNtUO35+xISArQaF
/yEvUI9RflUywbDrbowF3n+ayw4bnmdMeFYoIkZCluj71iZazYR77LWbCnA/
ynwemyg8x/3idXh0FfdTeyykeecLJjg7lqxMxjy0hqroGdczodW7TCwW8+Q0
M/58fyMT2GckRkIwj0Mn7+88TDCBi74m1Avr5/jfgMchL5mgUR1Z4YD1suz8
5q3xJCZ8rnlRZI71kcn3qSTtFRMK3nzcr4P1IJtxVzb3NRM6XwzXqGD+K0W8
C0vfMKFSvpUuifk3zJOWqOlgQpHP2XKhFBLRJd1/nfwfE9RDxbS5U0mER0nB
GtpbJqzSuHhqGnliq/vlDxQm+DZwYofSSET8EwnebzQmTG1Zps64SCL4dnGS
Fhm4fpF8Ba8ukYibDTe4VrGxfrMmXlZfxnlv7BS/oYcJwg35hffSSUTta+E5
pV4m7PlkvvP6FZz3NrRj2n1MMNtafzopg0QwqVe/mg0wIVDvTdIx7Ef+LvuP
Og5ifqoC9byxX828FxzxGWLCEdM/T/ZfIxFJPv95Rw7j/Z1osxS5QSLWjl3s
OzPKhPsf+oyykItCLd2ujGOeP9ctrMX+uGOGh1kwwQS7LPe4q8jNJ1/bVUwy
4UkPqXF1Ls77v+f/q/vGBEniG+kycl+Syd43U0zIMvp4mR/7bSjf0lesGSaI
eOdtSEVeuPLScHiWCYXS4iErsD9fEjnTMDOH/f2Ue+I5ZIk8A+2lv3E9ov0O
cuWTiHLpP8/W/MH+JKQxF4+sXVK/TfovE1TM21x+IbdtjX2g9u9HXxtkT53A
/u/yRHuL/lIWbKf3f7XBrw9r/SyyWs6CwTPgfBU5qqFa0m0lCx4R+1PpyMuM
j98M5GVBXvvu1PX4+qzXO0Sj+VnA7lW0c0OWtfl+9fwqFsyyuD7mIz+lPl6V
tZoFI97ZBv3Ihi6hqUVrWPBlnM9XppBEdL9XWf5kHV7P09reB9nT5/MZQoQF
Xe+dBO4hT47eX/hvPQt6apWvDCMnhAbG9IqzIJPnzbstOM8EZjbPjG9ggca5
7VOByPknP4X92sSCcVFf6n1k5b93P6+UZoHiJq/4ceS6JO8AUVkWtORv+aZ8
G/PBJ/NRXp4F+83qVI8is6/0e+zczII1i6KaD5ADRQp7jBRZkPFuz4rPyLM3
3Z32K7NAYmLFHWWcr8nSG6geKiwwy9NfHoQsXMKxCVFjgc9Z6d33kYu35ryJ
U2eBFDtRaRR5xxMn07QdLGjoWMnZXIQ+qCXyMkeDBYYJrcZMfP/9DTS9Ui0W
TBsrXnPE7x8wyqyt1mbB3Ge/Ejpy6Ov9GmQdFliePB1vj69ftF5dSdVjwefx
4yJU5HTqf1s/GLCAZWgWsR99YKPLpdKvhixYHTd9pQu54r2l3KIxC7Jz4yOs
0R90fHhvCZiyIDD/g0g7cvvoa4kN5iy4fE72lPk9zEdocrbSXhb8toVSMvLo
tMlabSsWPF/clWWEPhJ1cmm6mQ0LSJkCJk3IK/6+5HXcx4JjuckFwrjf2Uln
zvvYsSDMslVR9N/nx3ywJNKeBbdly4+vx/xWXfkTf8aRBTlZpzrEMO/GIg1z
6c4seEw/LyiB9UG9GXu8wBXXK6JTbwPWk6f07m8PDrJAtiPZcSPW37d7P4/W
HWJBn3iM6yb0kYStNSNth3H/LEItJK+jDz457sPyYkGnX5isFPpJodbO/k8+
+Dyb40eksL5VGr67zfix4M2arBvSWP8NRpVM7kAW8OTV7JDB/mD5OvTAmiAW
cIkO1cpg/+ixVu2SCmZBwumNyrLYXwKpn/eqhbJA6+7hZFnsP3PO5a/0wllg
x3n4nyz2p+T3gUZWkbieCzxccti/RH22NLoeZ8Gni06b5LC/FY9+0g6MwvtR
71eQw/6nEVpcFRXDgg0Jq8TlsD+Sp73Vz8ey4PSMxE9Z7KcHTspUXItnwXBT
3pt/Pw8YXOzfUpTAggGF7SdlsR+HJxXerTzDgra468Gy2K+5+A5JEYmY9408
Tek4b9OvbMj7L4kFguUNDwRwXkuK9Ij2JrMgyG+5expyxc2czPEUFtBtB7tW
4rzRk3YW/JXGAmt/+2XnkTvviaStvMwC5gOXhSU4f9y20peLXmHBUampmgTk
8crMs/JXcf1fSmn8Ro7Rsvuz4xoLWjM+HIvG+cTTsPqk0XUWpKTvippGzjbq
mtl3gwUH62R0w/754OtL4R65LNATvt0yjlxlbTURnIf1m/9UwP+fD1J5A+MK
WOB0Z4dTKs5PunPbx9RbmJ9046k6nLfe75MP59xhwbUHlMwJnM9T3qbvSu6y
QN/piagk8pnRpc7V91iwh3wzft+/eR/aQiWV4vUajNrO/Pt7tOkzttT7LKBm
rP31BP1B7SS0DzzAvElLrf4YiflY/GP69SELUgUc+YSRrZMaXv55jOuTUj9u
EoH54I3TF3jKgh1pdpUnwtEHr+x+IVHFgpiHogdLwtAHhec0lGpYsKye7zMz
FH3wZk3lrloWTNxQ9VyJLCZ9QsWsjgVJr07X7QpBH7y3s8yhAftNLtd8QDD6
4NYpOZ8m3B/eSsmco5iPyspbEc34/F0Zim1B6INaYRvOtLCg2uX6+rkjmI96
1RvpZBYonV0ysQU50mhibUErC1aVzxY7B6IPvi5Pf9DGgpo7x8wvBKAPWh/h
q2vH/TKmk2v80QepW5LbOllwyldPftgPfdB5eAmriwW1KrnRLHf0wffFpz51
s8BhSnvS/hDmw9vn1zQVr88jtaUb2X1U5gQ3gwVDYVay1h6Yj5CBb0IszM+W
pv7XyLHThcFSHBbcUI8+vOcwzvuTh0ZV3+F6p0XdaULOWdzgq/eeBcc1Gu7t
9kQfTOrpt+xnQfo2i+Aq5Bre3IOuH1gQHifxQ80LffCKMyvgI/ZbsZ2G95Hp
wqL2UZ/w/Zdn2sh5ow/epHcljeD19+zaVIA8JXXN8toYC/qpso9FfdAH79m1
3vnMAuWha6dLD2I+tgoZV37Bftk3/F4M+XZlV2PTVxboTG/iS3NDH9S6vPu/
7yyoF+UV/+2KPlhvVf1umgV7f5gvDUa2NeLbPv4D+7lSXUevC/pga1vF3E9c
/6d1ETbIwdYXFFfOsyD0aPyPRmfMB8W0WGSBBR+7fzqpIac5L5OWX2TBVJxy
dqET5uN9S94OLjYs9RV5Johc5n12vRE3G8TCax8mOOK8H4Vr+5axoad0XfKk
A/pgyKKgxwo2hE1u1vNAdppuSAvmYUOA5tTb/+zRB2PiVsTxseHtpigjfeTj
i7sTUwXYIK9ZnVFxAPORNPfnhiAbDLc/btyAnMn7/GSJEBvcFk3b0uwwH1dO
/Khay4b30jOVv/79vFhYI4IkzIbQB9FRgf9+XnxzaoIiyobcgEEJ1j70Qakn
gQNibFigX8kyRfa4FzY0KcEGyeE+vipb9EFlNc8/G9lwYyH6yGdz9MHKiXf8
UmwQ+hv/3c8C86H1wFlChg077I7qDiDfrD9CU5Rjw+KUsbnbXsyHkeK+XQps
iBxaKkJHrm0dbjfdwoZ0hUfFNpaYD+t7Zg5KbHCoMZptRWZSfFq8t7KhKbuJ
19AKfdBZ1iBClQ30Vvn+WuSZ3oEXp7exIcPseNR2a/RB71ua6dvZMCPy8O19
5LWjh57k78T90Hw7LmODPhiyUfWBJhtq7/a8zkVWn+4pe7GLDb4lHFqWGfpg
TK5822425GzR3v7HFPOx6HybqcsGxQOG1X7IfedEN37SR17YLthlgvOel3Fj
GthgwNhsqoW8kH5tHbcxvv70D5fCPeiDwgeuCJmwgUf8jOUKZImbQvxSZmxQ
2V0vHmqMPij1NlnVgg1fOhpbGUaYj3uXufUs2bCm8KSdPnKbsnWCpTUbuGHq
RbEh5qOSb97Flg3h6pu5BJCHNd+cCNjPhug4EfljgPmov/D9xAFcb6NmhR4D
9EEjs5AkB9z/us3LjZCzWpeNZTrh+glatJTqow9ak3zvuLDhAlvhkCDyU8rZ
gcdumE/Pl4zjepgPZ0P3Jnc21H9bovJOF32wd5HV6cEGpT9rPI2QPbwb7d95
siGL62DEv993mByJezvmzQapxijPVcjxITpWc7643xeO7Di2G31weq51RQAb
BP+eZ7O10QdjnhuLHGEDfMt7rr8dfXDxRJPcUTaIalyVqEGuO6ehsyME8wXy
oLYDfZB3utowDNdvjaNCCTI7/cn2fRH4/uVy/23aifkQDn946BgbOHwZWteR
Z3PVlIJP4P7uuOkloIH5kPpSHBvNBmEZY9tzyML3HkinnmTDKPPCwi/kYuWg
/BtxbBiwPxocrok+WKkoVnKKDb9uTBQMI7dojlyrOs0Gvbv8V9210Afr760m
nWVD4Yk2UyrygKHvRco5rM/Vcg3muzAfrbIrB87jfsi+Jr1FXrT6kDh5gQ1f
f4U7mOPzX6LcWlxIxfuX8cxsQt7o7BHLf4kN7g13sjRxvcp7N86Kp7MhU6HY
uQJZx/tdhGIGXu/Lql5ZXN/2kdwvWplsSPRukMlFdglxOWKaxYbB4AHF1bg/
o1Oin+yzcf1cPb4nIUfFMDy9c9hQVbsrbh55xeK13vCbuN5Coa1huN9Z5w64
nM5ngzKTizaELM+7hn65EPPw7ett13/5SH+7L/82G5q9ddW7kI2F0zvKi9hw
adnHM8aYL2qutfmLYuwPW0Yya5A9pfhJr0vwfo0s/JUxn9+K3xgwy9hwhsn7
uwA5QTmlbqicDf+FSdqtwTwLVpppTVfgeowQgUnI+ZrLny55zAbr/GNGP5FV
6kmqQk/YoLaJ990RrI86w8T7ks/YMCxE1u1Ftmw1VFCtxvrY6hdpi/XVY/X3
tu5z/P5+/793kAMpjRstX2B+Vpy4Iob1OOcUn+NSzwauzZ4D6cjJvTrCAY1s
uGegOLUM61nU+9eVEwTu5/7/yLHIxSPP+ZNe4v257XP5hqwREnUhk8SGm4ce
VfzrDy1TGkvvvMJ6cB1/2YN8IGY64fFrNnjbLs3Zh/1l4M+T+cY3bFiu90uN
jBx+Ljyqs4MNCbKdydrYT7l4t031/MeGjiXxtyqQ09O/hIy9ZcNnDs9Jaeyn
ksIVYz8p2L9dN0s1YX+uyA3yW0FnQ/lb+VZd7Pd6UkofhJlY7+f7J2txHrQX
j7jLsdlAmDuQNXG+uCmXsLf3sOGx9409T3EejT72dTDsxXze7An8N89iNOW6
bftwfqxS1ijH+cdT/8Hq0AAbSlWr7ingPM02vP366CD227Mljbdx3m5u9dgT
O4TrKTUStwF9ospqE5EyzIb7KrED19EfTCjvdG6MsqEy3uvzavQBqtPNmnvj
mCf//PxUnP/evS47qibYoPNZeYYb5/s3r/WPWibZUCC/airOF31whKFE+caG
yyZ7smfQb4RCsu71T7Hh74mOgWD0ocKpAzKTM2yYeHSfMoS+pBazpmBhlg0C
1S8C3dG3Gv68FeP/hXmm7iihoY9Zn0vPEv+NvMQizRL9rYfHRkjxDxuCTqeu
e4l+F5TOf0nrLxt6qXctdqEfzq1rX2m6hAMPGnP4H6I/puSmnLNfyoFq+3EV
xknMh5T5X6/lHIgt3PrAMhZ9sHh5XPhKDvy1Ex4jkLWUybMJvBwwCS0e1kC/
Jz9OjLzMzwGz6Xd37yM7aBpN5q3iAO+HOul/n88N1v09Ur6aA2m7jA5lIkca
Nn2qXcOBttlQ1xXo91yt8V6v13GALGkiEvvv80Er3fcMEQ6ce9yc8QVZkvLL
ZWg9B7juD3V4ot8/cqqlT4lzYDd/ZSsN2aA3av+SjRzQZMqeNUO/7/TS7Fwt
yYFxXv3ftcjuI9PmktIcGP2lbkXF648HPyWpyHJgYxTf6y7k2Klw0JXnQKuF
jEoHMk/Mtvq9mznw+d4K29fIOX++aLkociDj8zddEvLmcxVP/ZU50GmsMtOE
XMNzVO2ECj6P7K7oOmSzdKXyc2ocyL6f+aoamb5uVCFTnQMTS9f3VyL75pbc
ub2DA87eJNID5ClJv02PNThwKPn6sRLkxGK53EYtDgSlpU/eRhZSHhTu1OaA
u+sjjTzk249vZ/TocGDz8IzpdWQ1zcMCY3ocYPB6y15BbqrblPLTgANV8z/e
pCBbG/YuXWGE77/jiV4icu+rm6eF93CgLzArNg452Mr1t6wpB9Rdc88dR57v
Xh+93ZwDWe4tziHIaU7MKdjLAc+No7N+yGK9WaG2Vhyw8Ug/7IFc5mU/7m7D
AZ6r9oVOyFoja/yP7sP1+aR22Ra5Nbj7w0k7XJ+mYV5DzJfDVPqhFHu8XqDK
2afIQ9E2nGxHDtj6lDyXx3wd/8PveM+ZA9KVDg+zkbnPtXc/c+VAue0ubx7M
VyZPqnXLQQ4MG9gyT/77+/N087buQxxgncnl/YxcuW6FSf9hDpwWFl84+O/z
41wy8cWLA+xfnQ87kbskz+ku+OB+qFdL6mO+3IuNnvP5c+DJC4rtQ+QJJa6d
4oEcUMqSNdiE+Yp/3PRoSxAH3JpLJy4h82meUtYK5oCugZfbAvLNOt0Sk1AO
qJio+ifjeUnRcF7GPpwDEq8vnD+L9Vr7qrbAKxLf7xn5WjzWs5lVtHj4cQ7k
POws/PfvlzG7Na8nRHHAa0CzOBL7g6/TjNDlGA78qb90LwTPCzPvnl7Ki8X3
X6tdFIj9JtErgqc8ngMzcr43fbAfrR3ZllSbwAG6DFe6B56PioIn/7ae4UD/
Ef5Trv/OC1MVcYxEDhTyJAc4YP9rjj7682MSB1Zrh9vsQ5+3/aN0bCqZA4M9
b9QssZ/2JY5OcqVyoIeeyW+K/TaYpzRo9UUOzHt3fAT064XLfsObLnNA8PGx
5zroz2nr5L1VrnCgzuF8sib6qUTu4Hudq5iPuuV26ui75ZJ3XPde40BS84zo
Vuz32sWHGc7XOdAeZcBWwHnRpiRp53+DAxdPCN+Qxvnj9Li383gufp30zmYD
zrdhjTyLc3kciFbp/S2C8/J4nSv5agEH3pZ1MYX++aChmOHtWxywPEXsyVPF
fLxi1j+6g3lxi3zGo4Y+aHV9V+NdDpwx/jx4Army2/5Zxz0OdGgoUweRDZ3W
busp5UDK9m1n921DH3zXXT56nwO12vNf65E9vK5s/vkA8295UVJRHX1w2KZo
+SMOxPkPCmQhxwcLSApXcmDF5b91f5EFptpzZZ9ygK9pUPEo+t7N6FSR7VV4
/V8XnZj/fPCP+VWowfqG33v+/f84tYkrVtnWYr1cUf/+4J8P8rxKca/Dehrz
W+mC98e+fG7Z0QbsT9dF49Yj+68zPnOyCde3Q/UeE593Nodr4UIzB5qNQwqv
IydJEtHZLRyIrPYMdEAWLj41XUzG/rfSkXsdcpGSXtizVry/4YajFBX0wcfz
4y/bOGBX8qP4CnKzxgv/7nYOCF/9/tAGeX9d9GBfJwesxqqT+ZEHQMvjSxe+
/pjxtjdb0QdfzXB+d2M9md0oTUZetHzmyEfjgKlZ1dc9yJe6IyhiDJw3Kbkr
lyBvdFK32cLC/mRs/rVRGfPxbrJNk8OBpx8aS2KRdbwempi84wDt/W/VXcht
w0ebD7znwNraZeenldAHg5X1vPo5cDKF/OAx8vD30edhHziw3jis6ChyVHTp
zoSPHNgfSg7cgrzij9/jS5840KB5Y8lHRfTBRPmteSMcOLjGy7cQWZ7nY8n9
MQ7kjXFdd0V+evmObO1nDugJn71cLIc+uM6zsPULB0TZihGC8piPHEkJxlfs
V8mOwjHInpLvr3/8zoFvkiujPyBP3s1bMzWN9XlHP9dSAX1Qye0y1yz279W/
Yp8hCz4W4109h/0gYPfGjZvRBzVYSZvm8X7uL8YnIavUXedSWeDAJMOiYAK5
DhzidRZxnk2sP+WwBX3w1do5C64eMJs8urEBmW1JOebM3QO8PSZxcnj/gd1X
vvot6wH1yqLcNORZR9ujx1f0QEP4+ejvyMnvBEYSeXogaNOr6Ur0XVGvDu+r
fD0AyomnOrG+iodT+24J9AB1tub4CPqjRrCF2yPBHth43ur7EvS3lu8rmA1C
PdC2x/7LBqzvA9Gv7DrW9sBciniQJp4/BxbO/ccR7gHlo+sCbLFfhCca7x0V
7QH9TschfzzvL65c8mpWrAd+dVM+JGD/Sb9MGC7f0AMlu5MPZ7tiPtYlNKzb
1AMHRiIPPcR+VpGjpy0rhc9nkfOOdBh9UPL3M3WZHmjeOMvhYH9sv/tiG8j1
QP+pSy5f0afclGIe2Cj0oH8fdF52BH3wkdYW9y098GyjD/Pfv+cUo/GjKEip
B272lTBUwjAfdc8kT27tgU2U1Y6GkeiDEHnzgmoPTP2lOdifwHy8UhfN3tYD
FiEjdL8Y9EHLr1eLt/fAV/csRjTOG5Puh6ue7ewB+bDjbqk4D6iOwakvNXvA
IbD14M2z6IPvlJd378L1lvvwujwJfdBz7Ezf7h6IrEqr77uBPjhcujCh2wN+
Lw3UzHMwH8H+Mb/1e6Bi3XWPx8iF3+VneA17wPDBZev1uZiP6I9hYsY9oJKi
OJeA3LBw5/Nmkx4IKPfzGka2TvQM0DTD/VhjmmJzE31wpdTHPRY9wG5qDa5C
Drr83uOAZQ+sfjIuuCEPfXBtfo+ndQ9kj1aGnkVOyXFzCrPtgfD/KzjveCzb
KI6rUCGhjVQSkgapVDglMlLJKEmoVHYqhIaRJLNhNCQrSUglK7nEfUcySiqe
e1BGKqKSItV73j+/Hzye65zv+V3nTp9n/6yoD8jTFWY1nTTHeqkoHfz/7zWZ
6W83R1kIYPrSl//uI2stTHh21UoABj9j46YX4T6YZ2V4e7sAPuvXz9N9hH5o
TXlSZCOA7Gtdq/cR3AdLXuo8tRXAmu9MdXgV7oNwvrjZTgBmD2zLc6txH6S3
aHXY4+9bK6fQ9Bz3QdNJ+V8dBfDsq2z3j0bcB188XyS0TwCa7Lbps5pxH7SO
uCW5XwBR1wbz1ragH4zx/NkHBXDs7ODd3Szug47jbyxyEUDa862zAtvRj25a
do0b+t0r8vlGJ+6DbqEJxh4CeKE1Y0FFD+6DX/VldhwSQPOp09VtvbgPHhsT
s/8w+iq8qenvAO6Do2Si91EBnJzmYTj7B+6DIafOhPgIQJj9PHftMO6D43XH
XDgmAKc/FU42f9CP6N8nbvgLwKNsQMpnDEWaZUp/5R4XwLWmmwsuiFBk72U/
77KTAhDz90zLmUiRb7NXDdQGCmBKZFV49SSKhKT/cGsNRj9o5uU7aYpILSz4
8OE0/rxM//nf0yiSkndk39AZAYwG6caWalJkiZZGm3C4AO7bGaopLqdIeUm/
7ZQIAejcjQw6h2wGeW/mRQkgy0/q4gAyS7lbLIsRwI/iV/Y7tCjiarqoQe+8
ABS8Xnc/Rh5p/Giy+aIAFJOnqSmtoEi4dRa9K04AohviVCOQZzIH1rsmCOCp
/bb3/chZjgse+10WwIGvZjusV1JkZXeH9tmrAng/Ena2FPmpW1pBfBK+n+P/
jsxZRRGrr47LMpIF4HOkcFYocqfvnJz7KQKIbL9zvAf5yCin8iRNAK8KLm3Q
20SRsSFJ6Y0ZAniSXKKqvYUi58fvmsNnYt7Vqgdr/P//S6NnXevNEoDp7O87
1awoki/TMv13Np53asVDxR0U0buccHFiLs7DyYXxsrYUaZhtLTnzLvoeXj8k
vZsidulTIpTvCUBfu1UwwZEivapNIiseCGCOncX6f3spEpB3PnjDQ8xDskrt
x36KiGlt/bOtSAC2F87Ff3KmyOWSSf6OJehnjtHpNjeKqELdoOcjAcyqPfz9
lSdFiqkIr5OPBSAycUJ39WGKbDQ16Y0kAuheLbbrkTdF3jSOd776RAC+lv4W
ecco4mT9tCOrCt8fZ1GXEkCRQUGoQxGNPptdq7l4Ev1w3MDQ1QL43rTNKDSI
IjLdY3Y0P8P8ObrB2Oc0+uFW0fT+OfZTWOj5/jCKLPt6asvXevQxR+Wl9Tn0
w1e39l+jAPzmy5obRlFky+hvQ8kmAdw5sTdEK5YifHDpE/lmAUge37F/YhpF
3Mf76y56I4CxPwYiPJFHo1aVrG4RwMKBPy6vkCNkhrSMBQKIcD81VjudIrKX
C/K3s5iPrkeskpCzZh9V38/j++1pdRDKoIh2ukbW0XbMq54CJSfkp6oD80Pe
C2Cl67j0auTteXk3zndi/9xpgdpNinQv95C70Y3nGxh5Ho3sXbIoMbdHAFo/
0n0HkIXhk0zZJwGYH68QWGRS5CKVFVPbK4CkEPNfBciKpgfFWr8IQFncqnH6
LfSjcUHYhwEBBLmccKrOo8g6684xQ9+w3srbr8jmox+CtJPCPzCP5O1Oedyj
iL3jnmGZnwIYE31zQsV99KNrjs+8YQEUXxhcJVNAkRNu/MDS3+hH/BMJp4cU
kfia5K73RwDeN9rDHhZS5Krvrh6zf/j+1/hlihZTRG10ltOuMQz4t51021GC
fgS3tLmMY+C44bfXt0opYjw+cZefCAMRS5u7fj5CP6Ks34aNZ+DdlfnXjB5T
5IDMVMv4iQxcDm7/kVCOfiQ2NaSLM6D/Tmyoi1AkdPYF0/uTGPgllH5N6wlF
pqZvfVoxmQHvxNvdIZUUSVOV1G+UZkBHafbbF1UU0cyre8xNYUA38qe7Ak2R
iuWRq3unMTB3QD3L7SlFzEtMHo7MYMDSjQ4vrkY/9CZoTJRlQJzKkxR5RhFP
6mnODHkGmuVurdxWi36YnFFVVmDAKShT4vpzikQ1bsjQmsuA4bys2J46ishb
j527QZGBjYcPH4l5RZFsQcW1bUoMpNzyuNSPvMYxcIajMgN/Dn1yN2+mSE2X
7iVPVQa21H74m49s4zYqeVINv79wv4n0a/RjoDQiUp2BT1pOZoeRfX39Ra8u
YUDDsGP8S2Th0VUhWcvw/B/eH1/2hiJxwUN/CjUZKJTblxWLrDj+oT+txcDA
u33RX5DvRx398WolA8prutQ2v6WIvozm4ffaDNgqfQi6g/wicaB3YA32J8Ul
dmILRRxn33X+p8PA/q6PO2c0UuRLmkfnJGBgjoPIK+UGipxSVXeUX8+A/MA1
hZX16EfeJ0ZtAwM3M3bpGmI9kpbf3rHakIHce4GLrLBeaiUHXxkZMaBU+bxv
L9azVE9563YTBtSuDYUcxnqbUp21TpsYyLeX/RxYQ5EWk/SNRzczUJNurRyD
/XFu3FMZvBXPOztBKwn7N2Q1V+/8NvSjmp+Wjf0NE/AlyZYMGN9cUltEoR+O
11fkWjPwov/MNhp9yOjade/RDgY+hnTeaUJfNN1kF9fuxP4mmLa2oU+VAy1Z
Lbvw94kXtfZWUMTCN1Hpw24G/nYsyh1G/9p/W6f8cGBA6EWWpSiyV/BUeeG9
DCy5oVUvg77+FX2VKOPEwLXr1bPmoM8xURemzDvAgI2y8+pFZeiHjHnsUmcG
Evsvqa1C/3MSJcX1XBk48K60Tx/nY83s+jAzdwYC+uRPbsH5qU2LHLvLkwHz
M6qP2Lvoh6rpKRcvrL/nkZ3aOM89uRNGjh1hwIA+mn8J2W95tU+YNwMVEeoV
X5BFS858jfPFfpYnhZvgvCfoGXik+zFw15GamIGsRI39eC8A+3E4fcNf5AKT
J04VJ9CX/tUrbTAP9BsD2xtOMSDDnX13D7nJSs+OC2LgrHa0ofgD9EMw+vZz
CAMWY033OiEPODyyHAll4Mia8lWPkYO6/BsnnGWgs/0jPQ3zRNJNe9OMcwzc
+VEn4YmcPDD0dEEkA8HyeaJKmF/qvg/1taIZ8Ak9KpaL+Vf2+2i5fiwDD1aO
+74C89M0WHPNtgsMhJx1KSrHfBaIfn3ocIkBq7LFNkap6EfUXQ3PeAaErV83
N96gyC9pz9wTiQx8vrZpsU0y3veJ6gsjrzDQcCFhT3sSRabP/pxx5RoD0fOK
Dztfo0hm2u25WdfRZ7+s3QNXKKKl6pxUeIOBaZkHF/hdpgiVqzyTTsXXnzFU
8y8B/VjedelVOgOKlZbGZ+Mp8r44ffL7m5hnz4PSJePQD729kQO3GPhGTgji
L1JEiJo7/t9tBtY4GPfJX0A/TNpCJuWgz57vmXS8nxQar/+Vy8N+PF2bqRZD
kTwruwC1fAboMheze3if6Qhkh7TvM/C7L7thVSRF6hxaDxsV4Lyk319Ujvef
bVdin3UhA3p98gcNwinyyXW7i1MxA5Vm7cdr8b70G5jadaQUX2/48U7zMxSZ
4PvKMbiMgeePZSV5P/Tj9wU2tpwBKj/Wa7k/RZSDzW2SKxjYPlkvKhy5UHRy
c04l+tm6YA+HbBBVv/URxcDKyUb9GnifN0tHPX/2lIGw/NSVYch7E02NWmoY
8Hy8YpUA+Zv8xKruWgZ6Voz7uvg4+pFWrfejjoHRWWJOwchSqmGl4xoZyHAx
Pd+MnJxrsFLmJfqjRPmo/P95RMvH3Z/7ioGHm45NDUAuL36yeOlrBubz+9zr
kM30gm7rvmWg3ifEfBWej63SW2DWysCQ++vjD/D8riZ/UmwZBiYeUTNbivUZ
aXgk78Lh+U8vLMvG+oVbBVw+1oZ51VRQtwDrO1OgPTXsHeblVY2QFKx/pgM+
GHSg7w9nM7LYn5VdD8XTuxhYHnvrbRz2j3L1PnvvAwMn0/8dk8T+Wg1ojqv4
yIC0QLrsLPa/0+frqYbPDOSYtqcLoR9Hft8dYfsw3+e4LfVHf8YGe/p+7mfA
1OK+/Vf067zo4m/DXxmYKV6o4YL+zY367DFhkIE8E9+sdvQzTzr74/QhBt6W
f6vcgf7qJTrvX/CLgdD5i4Ib0O86eZV3y0cYuN6p2GGA/tulddnpjzIgYfm0
pxTno1clo8X8LwMu4ToXl+H8BOTutXIQYsFG6xt/E+dLbPm8Fx5jWRB66/dC
FufvcnHbphPCLMwUuDvF4nyq6iVXR4iykONfcHkczm9hld2GKxNYyBtsujEW
82ejiRy5JcbCzdTmXEvk5obWNYUSLOjcm+WdgexkdbmQkmQhaH7at0Hkwdbt
mq+kWHD75bHQEPMoxGFa3jsZFv4sPTkzHlmm69XCgaksaNc2kk7kFNeLN/9O
Z0G2ev8cLcynZQPm8ybNYiFVGVadRi73mXxdTo6F5p5d45uQt/yun6k2G9/f
pLLYuZhPbFBUnPYcFpbFO7zwRHYX3SRlNI+FXYEbn5Uhj0ROjLKez4J6nVeA
GOZVhHTNeKcFLIyf6Vcp1oT7YGLY6SMq+P2p0LgH79csecN/QQuxXn4/VxQL
cB9MG3c8dhEL7pNVpki24T6oUjl0fTELfblmTvs6cB/MDTqSs5QFzdttysUf
0A9N+FKqwcKMyb67JHpxHyz+4/JsOQsjz/vGOA6gH3plXW9XsFA23lP2wSDu
g1UBe7pXsWC8sS9DZBjve5PV3OBqFl7Od03d8Qf3wYafNuN0WDhu3DX59hia
rLMqbJbWY2EgxH5gWIQmDa3e5nPXsbhvv9Y3FaOJvcPyuiX6LFTqbhp/VZIm
vZ1fjXQNWKjvLNf9KEOTE675VZs24s8f1+heNYMmYgOeYGvMwlilWKEwOZpc
9Vn8yNmUBbVO8ehXc2ii+vvzymNmLMwtcYmcq0ST4qDs+2e2sCAVlvbbXZUm
xqIuS+LMWaj4C3yxOk3eRKpkp1mwUHhHbY2wBk0OSHcvuGfFgv3QSaGtK2gy
mJCRSrazsPeocbm/BU1C5ffNbrBh4c0PA69qZJm0eVdYW+z32jktUy1pkqbS
PvWzHQsOhm9/7EFelpt8ftieBR8Zj2d5yBWauyUm7EF/0tstfiObF8uFT9/H
gulPjYtGVjThdQXjFuxnYcLkPWcvIXtWXQ5cfpAF808emm3Io8Y7fq93YUHx
nM0lNWuaRDVMO2buxkLo57nZPsiyVs3f7D1Y8JSu9q1Azm696OlxiIWeEdNh
se000XbY9un4YRaexSjPt3CjSU3n5AMRR7GeXSHTijxpYuPa8O6yDwsJf6tC
5I7QpLs/avetYyxsCHroHehDE1+fTa0P/Vmwzkvse+9HE+HfE62p4yw0xnT3
GJ6gSVxQzYumkywEhDUdzAqkiaLoWbN3gSystB/nKnaaJvcjDWv6g1nIoj37
3cLQD2lhg7+nWbCbKP+r7hxNXiRUEokwFjbvEg9dHI1+yAevlQtHX9fqXIo+
T5MvqVC0MIKFce15C/ou0eSUyl9N7SgWzJT3rTVLpIlEblnexhg8r+TO5uyr
NEnSPK5mfZ6F1p7zAxOSaaJWvDpz30UWcu+LnT+QSpNS3V/zjsSxsNir8n5V
BvpRVXg9KIGFiIB7NnOzaNJi7DMr9jLWo/V78Ik76EfD8vjrV1l4Lh63pCWP
JkOW36RykljwF/luv/w+TcJa86NKk1n4uHhkSsxDmkx1ODThWQr6dHO5YU8x
TTI6F4e+TWPhLlv5b30ZTTRde/91ZbDAP0ya7/+SJpX92ccHM1kYHdodUols
7uPyc+xt9Md9Wrx4E03aR1SOSt9hYd30ql1WyJ5B3V/m5LJwYPDAmyTkvyI3
XZfcZaFNdIxIF3JM5L5unXss5G++8EH9FU3kpRX3bnrAwuuaGae8kXMS2rmd
D1mw8IureYS8Rv7GTuciFubbja8e20yT2tTdr31L0D9vL38TZBsV+W1nHrHQ
UNHYFovckyOou/SYhbT1C0ZeI/tqXjFOIyzsdsicV1BDE9HiHVT+ExZUnTqO
6FWjH7rT15EqFi4aHzhTQ9NEqar5UT3NwrvTMfstKJoUGF9axVazME+xdRpb
SRP9hm0PPj1jYXvSmbj9T2jSZCm1dPg51qt8+7svhCaOrQ3Z4xvwvJ4bRo+V
02TAPlp5+gsWDFjnLqHH6EfnpjSlJuxHRnHSuUc0kXQVU1jezIKvg5aiTCn6
0V9zZf0bFmKSGZ+r2B91n7PTzFtYEAnIS1QsoknZiOEFewELZwdzzmZjP02D
hCd5sCwsUnxrqFlAE4FIVfhxnoVpRepNJdh/58hg4Yh2nMcDeerr79Hkl9S6
oMvv0ffAzdY1d9GPhL+/MzuxHuXzzLaiP9PlHx972M3CDsu10m9y0I/U49+r
eliorQ3NsEPftFTWHGr6xMIlW1nRjts0oXJ+fWrvxftsqp22C/ppoVl0oP8L
C5YdDsv6M2nyvsjn/Z8B7Mc6+oUh+u+lq2Uv8R3ziPOMDkcWqvrWKvuDhYmp
N//WIscY37Ne+BPvr0gXpUnXaKLQcOjlqmHM0+ulf7cg51gu2bzxNwvXX1+O
Po+s09pbY/WHhTErhF++RK61v2Ow7x/259FojUwSTWw7XSoOj+HgqnOIjyXy
JxdVnaBxHDzViX9zCdmvv7soRoSDjlUrel8hT/C5ufz6eA6+7dxbOOU6TRJG
9t29M5GD3jT5FZbIykGKi0rFOWiVcXK+iFwg8i6zZhIHEqcyPudgPhlE3lB8
O5kD421xRdoe6IeUfXKXNAcZDm2nqYM02ZsgLzs4hQMV2/4d5ntp8k2OiR87
nYMJT+klrB1NglKvSEvP5EBxme9E5x00kVKxiZ4jy8EUwdie79tokpwzfeIS
eQ7EpuyoDTSjyRLN16E6ChzoDV/JFzdCP4ouCW2ay8E79UdXE9fTxEzX4sRO
RQ7kjpeGz9dBPyqlfh1U4iDgZWLA3ZU0cTVuPOqrzEGBsaXXWrxvRuqj+0NV
OVjX2utSvYgm4ZZmbpfUOHD1cDpoqUyTma1iH1LVORh+WeLcNpcmmfbP9uYv
4WAors/DDe+/lZ1n+fJlHBxMHfb9OQ39cNloW6/JwV613tOnpWhi1S/8htHi
QNvnS9xkcfTDu2rbp5UciNjW3b6G9/GRkeD6X9oc9BcmVKoIoR9B60zGr+XA
sucZ82AE90GRf9Q0XQ4Su0zGrfuB+2Dk43VKwIHt78PN5/H5O0/qRJnmeg56
Jh4b8xxZL2GN9voNeJ7me13C+LxeJzf8YKshBy62isF6yHapRUvtjThwSqp5
dQz5k7LvHXcTDhZfzeDykQNytFSOb+KAtixM/og8QfN72rnNHCx79me6YiPu
g0X3FC5v5eDASMBGW2RVXa+rmds4OPRh8eKLyIWVS6Y/tOTA5Pz058+QNxr3
XaiyRr8GteaOeYH7YP2dSU07OHCedk5dG9nJ0vVc+04OduuO/bYL97VvLaoi
/bs4cEsOKNPPw33Q/kPQn90c5JxydlmYjc8LnTdHxR058JMy+zc5E/dBFyc/
2b0c/FiSETqE++yyfsVBVScOVLe3/GSv4z7o/e7QqgMcyE44bVOF+/OWkRuf
DZ05cEzuybyN+zcbaH/QypWDoGrxjljc391FZnfsdedgwK1Lwjca98EIxv6w
J379kI+SHT4vREhdFQR6cVDlXLZQH583ZibYbI85woHnzFJ51WDcB+VmNCV5
czAY4/ln0kl8Xkh9vfmOL/pU3/r8Oz5vPVWOe1bix8HYt7/PtnrjPphjYVgT
gD5IN2uQ/z+/VEP6yZsTHEQEbn+W4Y77YFGjTtcpDhIq07dEOOM+qBtT/D2I
gy/a+U8OOeE+WGmmNfY0B/vfrlO0dkQ/jMXzpc5wsEgi32uNHe6D9c8WzTnL
wS2zIzlzbNAPy/Bbi8+h/1ZhzcJWFGlo2ThfJ5KDqZmLq92WU8TeXuSGaTQH
mhuXnUtG7u2okt0Zi1+XPyD8EvmES0jCwQscFKk0ao/TwueF/nUyvpc4kHdx
U16BfNX7X3RoPAcG7WvqDyCrjjyeeCmRA/Vo3cWXkYsDT5xJvcIBe+joxmfI
G0XWjsm/hvkRzs4cQX4TMXyi/Dr2941fhtoK9EOq+FfdDQ7cbY0/2iIPxvt6
M6mYF1M3ffj/3+9D5VYMfEznIGlccHIpskzqd7dfNzl4rfpJ8hNymvL9D6JZ
HHSONXF6vBr9yPHaNy0b53Ht0SjXNRSp0FjaNj+HgxH5QY8Za9GPoj5bzTwO
Lvf6jqWQeZ2cN+vy8Xwf2k28dNCPSleLrffx9aqKDeR1KTJqtLBhdwEH3pM2
fq9Gjqr/YOJeiPX13Wd9VA+fFywz6YBiDhrOqropAEWyW5zWnyvl4HNCpNYz
ZG37+Y8Tyzhw+Bp17+g6itR0vNPOLOdg8m3197PXox8uKQUFFRwwJa5Pq5G7
v9gvq6rE+ZlrZH9YH/3wnp3zkuLAbODJbdkNFBEeYVTan2L+fhZkVSHHBV5N
/1KD70/x0i53A3xeENk5508tB4UK7U+mGlLkfsSMa+L1HN5XDFOGvE7qzXTZ
Rg7sSj1uO22kyIv4uIuqLzmwUq1RkzBCP+QsJVe94mDNOXmHB8hfUqQjDF9z
YKEbbGxrjH4ovxCxeou+GypyQiYUkciJCd7bivfRASJ72Qz90Nj8x4vh4Dyz
9jeFrFYk7h/IYT5JBMR9RS7VqR2MbuNgxbB/9+zNFDGuDPdKesfBx9S1X02Q
W4yMerM7OAgVJQU+yAfqRZxLuvB+UBHWSEUesqA6qj9wcGKc+IE65NCWEIc3
HzloufbK8ifyVPv1TOdnDhQGdo/M24J+dPzb/r0P6yeUvdMMWdOlvGnMAOZb
XdFhX+TKLye2SH1D/6zO6qcgm3uvrVUYRH/lW0J8tlGkfXjYcPEQ9tsh+cw4
C4p4BhY/WfsLfz5Ebu0F5L/Cx3RNRziQUhW7qWCJfkSsKLEZ5cAjy+HpHWR5
qUGtg385EC08kqSN85gdfz/fR4gH+9/uKjTyGrnD6qFjefAMMz64zZoitSlL
sy4K82Dc1rWLQ7ZR/jI/VZSHu50HRVy2U6TnTs6NuxN4OH+yct8gsq+Gm1y5
GA9psT98A3dQRLRoYWKdBA/jNcaAGOZBnE6PDCPJwy6nrkdxyEqVmTEfpXhI
UkrrU9iJfhjtF/slw0NQ7KrmLGT9+vlhotN4yLC8eUjTFv2weD9m2gwe3MN6
ySNkx5aUk/Nn8TA7X5Q22EWRgd0OwxpyPBQvGDxVj3yqY7bPutk8ZEa+6rPG
fJJ0YQe2zOFhXVqENI+c9OWq++55PPxctfjT/t0UUffe2eM2n4fH22f49yGX
Ds9wCljAA+lPJt72FDENfNMWrsJDTVFphOoe9EM4flfiQjzvntv2W5GdIyzf
3lzEw/Upo598kH9NlrEsWMxDfv39pUnIYfEvGiqX8sDH1qtXIk+XizV9qcGD
mq3Z+w/IGSmbn7Ytx3qqLzWftJciWsoS+l9W8DBlvK+vJnLlndrHo6t4KPg4
13oHsoXGudXia7AezUt7jyO3Fxo9nKXDw/rqtLUpyF46ohqqejysrPTfQCEL
VVI5K9fh1+mCcT3IMUanVQ31eTi0XPx+M9ZboX59hqUBD93xC9rvYn9yLITm
7t3Ig+o0++YI7KdOS/k1L2Me/Jzkzu/HftfuPjkj0JQHgz/SkuvQD9uOtZei
zXhIn2G3VRZ96nEekUzawsOEoWHLQfTT70txRLY5DwnZbXIN6LOo9zHREgse
pDqm3bplTpGE4RUh1VY8VPRf+RG0lSLKgYN/Xm/nIeSJ23hbnIcC4Qf+nTY8
vNGIZDVxvgwiDv/4ZstDj+Evb3Gc56bJyw6P2c3DgdH7LzpMKbI3/kvvZAce
Zto86n/0/+fZy+Y6K+zhwUJbuukS5kdQilun+j4eNGsLjrlhvkgqqzmu3c/D
kr032vUxj5Lv9DAmB/F8r99LyGJeLdG4tcPGBd/fJ6/RAcy7ssL9rw644esn
brxbjflopqO01ceDh8KumAXJmJ+CJ+9rTx/iQcZA3MEb89bVKHXjxcM81Kn2
2ZpiHv+qc6hMOYp+tNlptfz/92ILBb27Pjz0fd1R8Qt5egtb8vgYD7IyuiKz
VlIkc/e1FXX+PGivkxi3+v+/F3fsvCc4zoPpCbrEBplynrn440nkp84L/ZCt
vrzJ+hmI368wtC0R+f3ReCXREB4UQj2WFyIfGbZMmRrKw8DPhvpmZKFAGfn5
YTg//rLzviOfF36ZqBGOeTDRfLH0/59XFRE7ZV0EnufWoW9LkPMmb4ndEsXD
HQt/LzNknXgJ8d0xWE8Jj1suyHWyz8PczuO8Bx4WGcXz26WcGxtwEeurXeSw
A+v1aYHxqfA4Hp5qtx26j/UMuCM6kpDAw1bXNUsnYb0naNA+Ny/zsDYyMfkg
9uNy4emvD67ysMpGvfwJ9ktZR9+jMgnn93VntNz/n0f0ROjji2Qeah0fTPLB
/hsYEae2FB68pmbpNmzCfbDuZHtfGg8bustmq6A/ThY6dqMZmDdC33ID0a9v
b0feit3iYe5Goy9v0b+Q3SWWs27zkEeX8UvRV6mOY40qd3j4G2AReBZ9TnFe
uWllLg9PPCa84DFfl3wZfGpwF/PuLP9iBc5D+dEH+pb3eJDoaA6OwnkxGz5c
vucBD1lV3e/f4zyxp5at8XrIw5mxSoPaOH/uwv0PTxXxUPbp2MMYzLeRc7ka
0SU8XN3drdyJeRYx2T332iMetnx0N16N+TQzXm1h9mMesntqZ8VgPmXJ4pMv
wfngpK+9d0A/Um7NrX7Cg6CNOxeD+9zTBQeSXlehv+c/TLqNbHVHaWYnzcPJ
TFnTKuTOZR2XvlWjz/OO6XHIRwpTJ4+p5SFc6M+nof/3QR3HyMl1PDQZ5GyV
csF98InCeIUGHob6Qt0XIv8Hfw7K+Q==
       "]]}, {
      {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
        NCache[
         Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[
       1.6]}, {}}, {
      {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
        NCache[
         Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[
       1.6]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0, 0], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwUW3c81e8XV6KoiMyGFX1FQ0kJOZRVaZCMklQqe2WPa5eVvbP3dnEX914H
SZRKkoZCkaSiEErp9/n9dV/v1/M85/0+5znP+Zzzx5W+4mJ8bSUHB4cELwfH
/385hUMzIprasWPn3q0N/d6gVn7lw4HGdiz8aHXgTa83uKsf3TlR3Y5HH3cm
r3zsDZVPtnlllrZj7aitimK3N3y4vKr1eH47Dsrrbja57w2bfo7x/Mlsx9+P
Wq/7zHiDceT9szXJ7XhLE2zsF70henNpjtWddgy15qu7sOwN7bW3PvHfbkd5
xcAdhqt84Lf2jb1twe1oHv7qjTqvD+x7oe/v7teOExwa9xQ2+EDB0hr+F07t
yFIuOsi9xQeCDWIOZJn8Xy8HuVHZBxiDDsEnThH6rlUJ5Rzyge/Ohg//6Ldj
9SrflgjwAfmVu4RqtdtRy08tz0nXB6xT11tdUm/H71IqvUYnfCBDfqpsg0o7
aiieqHp/0wd6mU9+tO1uR52zPMcnXXxgzek69Zvy7Sh4ImLPrIMPwIf4CFkZ
gk8QL/y54QNenq5PX2xuR+5K2hMuGx+oXWMkflu4HXcIOEbyW/vA+N29V1X5
21HAYDhS3NIHJPYI1nxeQ8T/1IbebeY+YNo+M5+1sh05/rn4Jyv5Qty551qG
f9owOGdgZ/1FX+icaIz++5PAgs/seqJ9Ydk/pb92ug2tPXmef6D7wgF+Twnr
z23I8VNacm7MF5wLz9kKjLbhmRBFew5BPxjqEvlzc6AN8+1GP/M4+gFbOHPb
IXYbbjAvSBiR9Ie5cl+nSRphT8SpvNvQH3ZqnKffJbdhq4kwucbXH2yeqq04
WdmG5P3hTbGl/pB9ZfOJ5SLC/tu1Xdef+0P/z6WUupw27JoyW1v9IADWRb0d
sk5vw8lbPx8vtgeAzha2vGBiGy7LDI3ptgRAQF2O+73oNpxvFziT3BQAlCMk
lkd4Gw5cT+B/TwmAry+suLeT2jCH7/y2PeQAkLWDMy+929C42TkmsCoALvyR
zIp0a8NPdk/0e0oDICmeY+yQQxvabvU131wYAA9l3u/6YtOG8sz9+4b2BcJK
Wpt3tlUbTvjZPVU1DAS1Y4VtJ83bMLK46kz8tUD49aF0wyu5Nhxhd3G83kMC
je22kSsk29BghK6z/wQJgu12cCiKteGa6oPisddJ0FE96W0i0IavolwDR0JI
sOZ71XQgL8FvcURpbw4JDJWdbpRxtmGHTwPbWSUIErx2D/f+aUXN5EqToT1B
0N80bfr7Zyt21TqZn1IIArG/5CfbplvR/tFSV4tsEFhqueudnGhF6c8mpXsk
gyA/TLnF630rflrt+z1fPAjGOudU8t+0Ys9/tmWCQkHwHy+tpvt5K7INZB6F
8wWB/UlvudmeViz33rmJ8wsJahNUc7Z0tuLOCtVAkyESzDz/JaSHrbi/o+xB
6TMSHBBlxrowWrFfa8jjdwcJ/M4HrMqsb8W385WXTzNI0JJzOKC9shXlZb4k
l1SRQFe21UE4h7DvurrzXBIJTPbeP84MacVX8vZX7l8iQYbHrfYxv1aU2Paf
t+xZEryl66vxebQin4dCRbgeCaSW1jQcdGrF1h9KHJ8PkeCq5sMdl6+3YrTl
B8MKIRKUhsQURF9qxdCA0pAj/CSY7DAUp5i3olZWsdRbHhK4n3i6ZvWJVhR/
eipnw79AoMUlBCvptKLa+G+/ql+B8PuZ0aLF4VbcvDTSrjcXCJrCG13DDrRi
5/oVnh+mAiHEvP9T9Z5WVDVUb2RbB0LCtdedxkKt+N387SxPfwD0l2dpBqwn
+HgLusaJ/BP7eoFWwt2KvUE2iQ/uBIDmR9aJHz8QlXq7llP0A6DTAdR1xhDF
zN2KQmQD4ORMm0L6AOJ3PVUN9xWEPR+dTZNdiMFJD7uuD/mD5b9OnsNMROtH
9gcvMf1hLOLYr/gaxDOTBd0XMvzBYV3PxIc8RHdHCkvgjx/MJJ16pZKE6KL8
943Sgh/4iT97EBmOeMWTbXFmxg9W5p+lD3ohntj3U9X1mx9EbR8o3W2HuM2+
2Cdhwg8ylAcj+k8iNh63E+8b8gOp5oue/2kh2s6S/GZf+0GZ1oiN3z7EDaLr
NIRf+MHuB1dMHssSelav5t4b5gu0kx+PSoki9r5i7bmq7gua/TeUb/IQ/g/F
P8qZ9YH75ydlOpda0PW8EWukygf6b0yvcBxpQSWVzQ1BRL02uPtptvR5C+av
93ua9dobmE+GP77vbMEE+jcVdpo3FKr0dpvVtOCGOOkhUQFvELbrYiblt+DI
1yHJM0+8IDK7teZxcgue+dFYER/jBX+eMvLW3G5BDhO7xAEDL3DhrE886teC
raquRrLcXvDhQEUYyYngmzlk4HfPE0ztCzybrFtwfFnrtWOBB3TnZN6YO9uC
J6wXOydzPEDjWaLFHv0W7FF++dM2ywPIq6JP2Ku1oJ3vu2uf0jxgm2ro4ZJd
Lbh971rR68kekObgt2dEiuC/YM3zMd4DePPcpTcLteDP+bcaNrEeQOqz32i6
ugV5uULqRyM94AfXVa7E32xU2hWV+uLGTbA5dGHh0Tc2Wsd2DZrK3oRXjmc/
c79noxbtrMv7EXc4kX9iULuf2J83E3Azxx1anh99HPCA2L+pZWbdeXcoUdtf
P1PDxuDQ+yKmz91AzHln0a4C4vzo+D2uBDeILZBNtU1hY8Js4CuWoRu4rxH2
HfIj9h/jVdXudIVx9fUO4s5sdG2cCeULcwULF66LJpfZOCK1XWUUXKGn8O+p
eBM25rtuKiD9cgGtgZ9aD/XZKHXzW4/uTReg8Ezt41InMAf746ZvzvDf4XFZ
rd1s1DD3Do8KcYQs1yERf2k2Ppj7j7M8wBH4igfW0ITYWBuy4l2ntyOEvHzy
+/tqNv5Y5hQcd3eEOd4HXxWXWJjmuKeQy9kRBt3ovQXvWfhVbEW/ro0jnCqp
a3/bz8JiszLP65ccof1VGUW0i4XNt7zcb593BJV1+aXGTBZu6GyfXPPOEcoh
I+NOLQsTmq7NLfxwhC03E6K7CliolelaMsbtBPGlkQGcqcT+IxY9TzY7gdd6
X2tffxaSZYpu3tV1gkktN2OKMwvXTA4tBJ53gosedjrTl1nIKHz446KLE+gM
WshfMyDsr6PoiWQ6AZ3PeFO+Ogt9uv8VTNU4gcKR4+sGd7NQqe+Ye0e7E+R6
HlkWlmFh75rHtPSXTiBQofb9jDALXatE822/OkH4230fYtYQ/FY0vYMrnGGR
X7G/c4mJw5s0luMCncHh6LbOFdNMfMRPgZM+zjDktZmh8YGJr8ifRtfedAbj
yo2V3i+Y+PXvwORDJ2e4/25tdkMXEzcthJhE2zpDtc6fIPk6JpK/8Z7htXIG
l7W7k4oKmSg4pKP+0dwZ9vVdKpZIY6Jzmk1E61lnmM9IpGVGMTF/VkXKoMMV
mi7d6xIKZGJwsVvD3o1uELD955t4VwLLmAcJXnEDrW/bv/HaMFEqqNN1kuwG
nX7RAitOMLFVPXI06JQ7RGmztgVoMpGj+86Vw0Q+G66ZUlnYy0Qt/Mw/88Ud
nqcanf8mRuAc1k+tqJuQZhnmaLuO2L9p6+7Blzfh/DYqafRfM0p196U4bveA
EbJY0evxZuTgvz3kcc8DiryPU03eNKN12VuZrwKecF0z4MHTx83YWsp6bWHt
CQpcta+PtzXjNqOtwvxvvODbo+Ev9ynNqMFKUVIc8AJyksCyVjlhz1gsRb/P
Czwsjm5g3W1GT8FysCHqz0EpT5mD8c2Y/feocshDL/g9Xrq/IbQZnTd+dc7t
9IKNW1U6oyWa8fur3J3iMr4wMHr9FZcgYS+XGTZ02ReyKjMmg7kIfM8sJ7vA
F6RU//B5f23C4FpNMU5pP9h59p7Z1WYCi04o+hL92LT4T7uhmia05vlyZ9Ul
f2gY2R5gUdCEvRxpnyNz/cGrzDyuP6UJ+7e9WBRYHQiHnKPzT0c24SXZjpti
KwPhz35Ww0P/JrTdY3pC8m8AtC5969B1acIJnZig7YsBoBdl9FndtAlPxw/9
VZkKAJ4zYUu0Y01EP/BHX/NzAPSIUNfvO9yEKZwtU3pjAZDwblyyRqkJ3U7K
zJweDoCzxWL75GUJPS9t/x2FQBBxOK5TJNqE8rOrVk6fDoQ3ewNMJdY2ocE/
L9Jd4vtqjcN+QjMMNBBQtpsKCQS/n07rvt1h4FxywNdP3CQ4t+Wyn3kwsU7q
rvwoRgKloyYT99wZuE6/9L/3CiRYa69vuucaA8l7BXIGNUgwnqDWkWXGQI6+
4Z9NeSRoo+/ax32cgQxli/XLmSTIHpLKd9NgoNYuk8wjKSQw3rk6wECagSmf
nvA9jiTBrrO/PzduZKBD+alFwTCif/P7ZibJzcA1K86YWgSSYDR/5H70Ih29
fvTJ53sT/c+D58rzk3QMXq0Q4VpLgsypzoLL7+hoUOlI+UIlgYdwM//jp3Qs
jcreYsMmgeLV/C9FFDqOBJdFG/WQgDs62YK/jI5PyoJjOp+T4AP51gO/TDq2
6jdeVxsk+qVlxyIjEh0jdXdVS0yS4KactQDblY6WtV4i8T9IcMrwbJD8VTpm
3/x+fnmRBKuyDl34p0/HgB2LHq9XB8Fw685uezU6/km3jdPlD4LmT5IHB3YS
+qJqrteJBEEq38YSbUk6DhZ1Bd82CAJXFe6NNQJ0lAu/5VFwJAhOWP4KFltF
Ry3RJyNMjSDYHvZ1Kmyehjsv5t0fOBAEb3v7Hp4fpKHdiuHF9YpBQF+4r9r5
mIbMSyf1FeSCIEmiqXRvKw2HXHX59Il+1Um3WiingYYXb++gpewOAgPHvNA1
JTTcc5TFFtsVBNuSk77fTKehS5F8UzZhb7kpwmo4ioY50QrpUkQ/TFntqEZz
puHPGBkJ+f+CIH73pXLpyzTMFnbrqiL47M8Zi9w5S0PrI58v7yH6Zaki1Zmr
qjTkKbO5ckA6CJa6Fa2fKtDwMc2yu4nQM/Bd4onaVhq2r5GSOCwRBA2ighql
/DT8dPDP5dYtQXBHk6tSYCUNgzl0249uDgLba4uigXNUFLJY6Xma0KcT+yVi
YpyKAaFxa68R/JKNQ7NnX1Pxv4/Fm/0J+79fP7uMj6goH6Jbkkj05y847j9V
aKHiDVPX8vKNQUD+j3E4jUzFKRs5udb1QRBzqqpqRREV26ttNr8i7u+6Z664
UyoVh3ftjvm+Igi0sxNvv7pNRb2JEA+ePyTYci/851E/KgYn+ym/NCTBwmfv
q3WOVOSo1blxWY4EfRscnm26RMWRZ+wD3/8GQs1BK7hlRMU13wtSwgYCIdLK
qObHUSqShzkjN9cR/XD1wagueSq6ql/ea0G8T67g/F+btxB477RAnnog9Jzl
sXfhJ+yLbfsxIRII55feHBeZp6CScmBV5OMAkH56lGn3mYKupC+3hsoDYKKw
WpH9loJnmo/cUA0PgFov4ewNvRTsMlHkS7sUAJ7HSets7lFQ7PK7hwtqAaAh
8SmATqPg5IGhH3ol/rBy5vQ33koKvrB0cjTP94fu+4yLVjkU3EIS17O/6w8J
mdJP6hMo2Jz1gRSQ5g9mTtGaXOEUJDd0icQn+oOE9mytuTcF/95/tL4w1h8+
CllKVttTsKj/y1XqbX+onuiI/3eRgqVD8uLdof5wk7WL46wRBVslpXa0XPUD
tYQ011Idwh/oe64g6QcrbP6N/DpIQS2xUvrdN77QddDW6KQise5+6OPGNF+I
X/usLV+Cgvnu8oPJRr5gOnxo35wABa2v9wZuXu8LY7fWbry72IjfOT70aIf7
QNV5j7CpL41I1on0HQEfcN/9blZ7uBFdY7X7by15A8dAbf/E/UYcGfmZPOnu
DQ8qRHU1mhrRulbmd9lub4gLDKbGVzcS/dyVdU6TXmBi9FluNK8R8xXv9Bwq
9YLNcsZpB5IbUSvmdSLfFaL/XWzmjr7ViCtqt566IuEJ5T3bvN/5NuLDN0fd
0jd5gkt+7Cclp0Y03/LzXY+IJxzw+GkWbt2Ile57U1Zu9IS/+lZdL882Yvu7
xWRVfk/o2PxAVVG/EbMvnnjnvNYTYqb3VJDUGlFtRt61ZLUnGN/LEO/b1Yi5
dxMN33J6gnj6img56UbstIhw38jhCSP29r99hAh/H38MvPPgJpRpPrfvWU3g
VnuvG7dugrOgxqDkUgOecZ9cNtC9CSrjxSduTjVgfv6Fxb2rbsKfpvWszvcE
3h58QuaeO0RfHs526mpArRpbXnFtdzBSMVjfxiTWEwo8JTncQYynPlCorgE3
yPBr7kI3KCWHWjFTGzAhKHbc6rAbOIV/ecIX1YDfB1s6Q/+4wn5zE7gSQPCP
P+WsZbrCb0V2HdWlAYO9ZYtH/Fyh7Z+cFM/VBhwJY9duUnOFyOdxCZamBL/i
6AX6jAucKlvgIB9rwHJ/ktrQEycQ9rd24zzcgCLD9if8up3g7anu96ZKDXjk
qe99kQ4nKJLZZ1y5rQEVDKvKG1ucwH4+q/2vSAO+OPdv7kyTE+x9yKlsxNuA
6l89K6canWAxx7Go+G89WvHzd8fWOsHLZ2kuE9P1aMzpspJR7gQ0rjb1nR/q
sZfr0UhvmSOkHPqy2rW/Hjcsc3/StXOEm07C/Y2d9eh64/qzNgVHMC6A/AVG
PSrdnTLX/eoASi/sHNWriPOK+h69NQ4wpdGy6l58PTF/Lfr+VXKAx64Tvdyh
xP4Db6/mzdhDdbFgznGPeuR4iZ8MKPZgt+6GSp85Yf+lB7vhoD2MDfJffy9N
rOf/8HqvaQf3+NX2yQnVo11OkJ/faVsoPGqzbMtdj09rEktrj9tCsHfcw+pF
Mlp+SlUd1bWFS1WMtO+TZOQ4Hqskpm0LmsMfrux/R8b2Fx5xJzVsYcvG9Xt8
npKxOPq0cdhBW1jSO7jEbCNjnu2WgKZ9tvDG7/KDf41kbHYZXPt9ly001cYk
Hy0lY3DP4yzhZlvI+EC9dDuDjOQoz0dP+mzBS2RE8VE0Gc3T4y3Dv9jCueO8
i3yBZDyzryPvwCo72E/a32HsQqxrR8d+3GIHgg1WCWmXybjmWN32RBU76BVv
lJfQI6P8181Xh67bQd3Jd3OXVcnYlW3HFRxkB3Ehq9tKFMgYOSlzTiLDDhyp
e+983kLGBNceoyayHZz4fMFiFz8ZDQ5y/T3TbQcKW2/Jua0go4/0tyMf39uB
QKH1qN2nOlRyvrnR67cdPOGh+v94VIfnx6N3xpPsIdaNR8iXXIesyTRvQ197
OP76YjVHah32b+dT5vWwh9XaDUTlqcOsrO9WXc720FHO/Y7fqg4l9DSXbtnZ
Q+iGC57pR+rw7I6F1Xo29qDlU7de8r86VNPZHMF1yR7+DnOWlq6tw1dple73
LeyhWd9cc/f3Wvx+mJe3YI8D+NRVD1D7a7FV8MVhDUsHOCC6wuVwUy363Nff
3RfpALOkc6vv59Qi2d1V4QrVAZxPLR/sv16LYirrbrnyOYLNt9OZM4s1mND4
hq3X6ghnFGcv7Nlag4ajzxoiLjhDTVPz/oMra/DewmfR+HPOwGsQuh4+VeP7
r59/Z5x2BtuBY+N6PdWY1v7sQtExYv6xEcBT9dX43adArfaoM8jMvko3TavG
L/wW6U2HnSE4JN/Vyr8a81PN4vqqXOAdv+2x69bV2LpLudGVeM9quXtknHWr
Ueli2uPQLa6QvnPht6dCNWa830XuIubjueaW54H81aja6M3De9UVal+ejLjz
ugpblxOlgipcYe11YavUliqUP6Az1NDjCrZzbw/kFFWh1LlmwQ/TrrBNwHGi
2qkKX/35N7zvgBsE5ym3UYyr0DywyNfEwg2Gdi1lsg5W4fdHa2+7BbiBOqvd
vWNLFWqJ5ClH57lBxvHoEz0rqtD2T4O6k7U7/HxlJNs/Xoke+2ZMeizdwfiG
+N/BR5VIH9jOVLRwh3Xh5bVfUitx3s7V+YuRO9gJut6e9avEKfMI5gliPuvM
P2i9dKkSJWjx56qPu4Psnn+qnLqVGBsSr7Fe3x1C2J0CaxUqUZUZ7up81B2G
TsRNCvJXopbZlwdtv2+Cxptz9zbNVSAHn2yvoJEHZNpuzZZ5XYHfr6XLWZR5
wPz8mIdCSwX2+sl7p/z1gLMR1Sf3FVXgSBXv446znkDe6LFdLbIClRbE/pus
8AQHJc5Xx4wrkFxT8WmjqReM2Emr242XE/XLIWu0xhsOL05sdHtUjlpJUXws
Th/IukX+6kMux/wtcyujLXxgQcjnfnBqOYbVsOa2bvEDkyLIjfQrR46SfdXf
RPygfu9q74RL5XiH73QfW8AP+FqfnM7QKcfdkwI34tb5QffbiyvK+cqxcCH6
rdJKP9juIPembrYMvXZos1f+9YXwX18b6K/K0PJxzroXC77w/jYlBtlleHo0
/2HZjC9oigTYPCgsw96oJe7nL/3hbvHRw09vlyFZ/qzR2P4AWNy3VuSlYxnm
f2x/8TkxABpOZz0YP0Dg5It8z04EAv/Q5fypzQQWKGU3lAeCo+MO33mOMvwu
m+UbyUWC/6IYCtyPSrHXKUJ0A5IgXDSYk49ciq53w3+1Ef3rhxL9t8KpxLoQ
98QNnyCA/fzUrX6lqNWxYXTFiyDIbh+4I3epFDl6FX4/EAuGZ5VRDn91S5H8
81vUt6PBwJ2scezFzlKcSTXvbjoUAur+09trNpbi+5FAjbADIeB6tXBVxO8S
FKJ+nDZUDoGSE+c+WL4vwVuCCaMiSiHwRnlN6/6uEtT4FSD6fmcIHF3l7D+W
WoIuVyS0vLaHgM9XKQtWQAl+Huvbr70tBKr7nx9IuVqCpd+77dZJhcB71i0h
x+MlGOsTubX/dgiIlByaObq3BP+c2r8e74bAiTtfn24WK8HsFa13yupCINgz
r2Z2uRhtr4mn3bkXApO6XHZFPcXYMze80/hLCEjuZuj5NxZj8OapVqV/IWAi
4iB7NqsYX7279GbdxlBoGe8dXmlbjL2qvjlstVBIvJ1teoWzGEcUGVdWRIdC
p8vp/WqTRdgfOyvbkxMKv81WCgo+K0Lzsm1bUupDYY8WdfozvQilsgT1P0mH
gY287eO23CKM+/X61WmJMMjcsLkqM6IId99508DYFAZPFh9HujkW4ZpzQi+k
RcNAtVtZR1qtCK1DlGfm+MPAqX5c+pdUEQ5+FPtmtS4MCjMz//WuLsIE0kGl
7jVh8DLE8F35VCH6nYhnKnOFwTr7f83BLwoxxXauhaYWBtrGDRnmrEIcuOt4
xvNIGHipXfNSKirEofft5fuOh8Ew76O9I66FaNKhI1JpEQZCs4H8DLNCDL+a
qGJzOQwMBpW+xWsWYmi9pO5WuzBoqEorh3WF2HtORiXWJwxuGV6RzCsrwJbY
abOL6WHQ/zTh9xbhfBSULPl7ZEc4uH2PlayazcOu2f1c4fvDQU178dgWdh7+
KUb7exAOPR+e5C6fzkP7+rbTh03DIVVZrdtFPA/Llw4/9b4cDlbhJbMjH3Kx
/VFrNdkxHH7IBRjc88zFNb21wVvDwqHZ65P7fshF5wIWySguHMIfGOeUrMlF
Xv3hirDMcDgp1vJApC8HeVPyXB+OhIOI3Y6Z23dzcL8vX3Dg23AYbkrZ8ssm
B8djtaeUXoVDOS+Hvv3uHJR/qsoce07orR64a9iWjRrDN91OPgoHzr/anezo
bBSqoZ9f+YDQf7Lm+26TbPSpwEJ6O6E/V2xz/tZsvENWmTV8QuifDtMV+HQX
5zNyCt89Dof/tKZdQsl38UDIISsnAn9POJ8163sXj+RECP3tCYewfXunX6y7
iwonz2zbQmDDsGxx/YEsPH69waeK4BfpX63DyMtCZ5OxajUCl3sOZWTty8Ij
d8j15g+JeHceu7f2Tyauv3Es9FM3oV+U+i3gfibWGI/u9SIwp62U2FRcJl4t
XtO6isA9jJgjl8wzUW+hcEdyF6GfZ8GxVzoTTw7xV0sT2Or8lXTtLxn4cDZ8
zc0XhP6qx20NlAzsuuk/Jv2M0L+k+nUbKQM9xISknhF6mwyLRVL1M7D//Slm
MHE+NIdfm1sgA8efKtKUOgh/pvwcvN+kI/lD5Yb3GA7CMJ46UZSOuzb1PExk
hsNQvFGrhVM6XvCKHztCJ/wbYU0+PJCOHe5LcRVmhH975YU1ONLRZvpS1QtN
wr/QZKjpTsPY+cAAru2Ef8+X7SSS07BjKPC86nrCv232KfGWafg2YUHHeS4M
rO5rfXabTkWDM681R9vD4D+R6o2jjFRcTOs+JVMZBt+vi2qahKbiHOOKg01i
GIStmUo6IEzsdwx9+ONSGBhaWLDLhlJw7OnXdYf1w0CksuOTWHkK+tRRLWN2
E+/p9x7BaLcUdI0Sf/BWOAzKT9zVWFJLQY8YTRulv6Hgls19w3FVCk76XIsJ
KAgFtW9uie8eJ6PwHruoLKKecGq+Y55KT8aH2WPvGJmh0BNnMI7Wycjf/jLy
ZWoopA43btirkIyTuUei5xNDwUpJUr1wNglPKct9EI4LBfmQ6Gsb2Ul4JCgo
QYWoVz+e/YwPv5WEHaFGqeduhYL9wMGO1LNJqHXruOtqoh5+eOO7WCqVhPKa
6/abd4fA+WHmTsa3ROx9VPepuiwEno/+te5uTkSlfSZ3uW6FgOEEpL65nYjm
0jYGV2xCoONrSPcXk0RkZNhOtR8JAepPrn180wk4kqopl/AvGHb/1r8uyUrA
xSgh2p93wVC6HJWlFJWAtmvfgRMrGCQ4e55omyagT1FK+/usYEhfzcd5dlsC
Mi4e0jzvGwySYvnOXSPx2PpZo2HALBg2SMu+nPSLx0UXI1mzA8GwQqEc1gvH
oxgPQ3lQKBhm9u0s31MXhxoxfCTDMRKMqpM3GB+LQ+l6mZ/aQyTo19nv6zF6
B99n2k4efEUCmqnG8SbRO/ijMeq0XA8Jyi61NgzWx+LRjza4pZMEGbY6m5dP
xKLta7caoVYSRLl1hUmNx6BXAll8fTMJ/PwMvx4JjkFzXulV3BQSOIT1mlzb
FIOtOxw4TzcFgGWsCfs2JRoTVj/Q5TweACdTX8lVnopGLcONDfff+INmrmVc
z0QUblBudEx18Ic9ZSPzU6FRODLzOM79jx9IkW0uCWwl8LFliYt3/GBlu6OS
qVEkckS8uX2+zhdmH37P8PlyG10f3LJ20vKFseceK+5G3Mbg0sbSO898oPNj
QN9w0y10vZrgPz/rDfQpDvWVJrcw30+TFyK8oXwhvEh2KgJbS2TWpIp4QyYH
zzr9yAhUKh93WizzgmieOx52MhFo3c6qsz3kBf6CAu9iWOGocPTcZpKxBzhu
TtWtNQ3HA0JnuYNOecBFWfHa3u9hGG6prht83ANO7coRmY0OQ4EtfK9C9DwA
DkgHCcuF4Zjxo5awIx6gBCWfDmIoznLc/BWh6QHSBjvOnLcIRcPtXJGRah4g
aFTDCJgNwTftIfYxBzyA8/xe6bw7IcixR/yf8FlHmLtCjWr7j8C++TKh6Xbw
0eHQzGhbMAbf6OPXfXsdBjzY57ktg5HDxXWrlbQNxC2F3jL6GoQcz4/ue3z9
MriujzFLkyJw/OMcWYuLsH/v3V+SUYHIITiy57C7MYgcLXpoww5Ajo69gun/
jsGiSdXdih/+yEFRoIiqagLLh3lY+bwfMd+KmvFkK2Bu9D0+nzhf5HA9djLi
ljYGZz8aZrX7IEd7jjLZxhCv1D4nr1jwJuwvubfln0Xd1sEQPUUCz2byB/JZ
oOzqQNM7V70wQUloSqnODledklDsv+uJXjc4RA9W2uFYCv7b1O+BzQkvSw+X
2OG9Qev+y+s80Lw6M0cn3w4LZVZWlOvcRNNmvaUTd+0w1K4ocDrAHeuah/Bs
mh1eIesYH6C6oVPN5S8XEu1Qe+Hj9sBvrhic9DTQJtYOpTRvL92Tc8UZO3lv
p9t2yMFrlC/MckaOAat3ewQDEdOTjxXtdEKOqo1rk2WCkSQ3MKOU44AcJ9uN
3jJD8HCjWHbLentsfUGhz5qE4R+tC7qGJFvU0u/Tff0tHP0sR9JvXLqGHMOm
b/gkI/HQpIz2z6dXMfig84gVPQoXva9Nhmpdwdb0G3yBp2Pw6/YXvhpHrZCj
a/79tqA4tD9yvsdM9gJypDGPmq5NwImLwxI3ucwx3+VT5YqXCXjd18YtbtwE
pXJP/pdSmEjE6/O9igdGGPxcOGO9M1EHrd/tjDY6SfT/BcNOh5IJnk/PWjfq
o/LmUKF1q9KR9eSH18ILLXTyGJhJ+JeGrmsXD1oqqWDsVsPdIktp2DsjtirZ
ThrviIx23p1PQ477i7nHDvCBx6W7LOmZNCRr0PKm2BowOuKCuz+noeWn3srW
bB1wFY/toY6loTW5kyv6zXEYKeg+cHgkDRs0rMg7Ys9A8MZtCjqYjfulX1/k
qzoLreXCtMqBHKRxmayd7TYFjpgnGtPfclF18gnj5YQFBGdIMiJX5mOuxYeo
MxutwVrhuau3eAEOP8obaS+8DMGWivwviguI+7x4UGXfVeAY1AiXViok8uPV
mLjRdQj+FDNzS68IR1NS1WNHbkBw5cMveUQfK7v6bNKyix3ke75mllkWY+mX
xzAa5whSm2Q+hLmX4KeLMWnnJJzB+u1KEfO/JSjfa/DtQY0LjDhtWrcpspTQ
zymTk+sK67nkj42uqsBzby6fNL3uBjyDn24u/ytHr+RWH/7d7nBL6/WqTUvl
mGYoWdz10x38VP4sqcyX48uWt7/VIjzg9eOBLS5fy4l8UN8+Z+gJR9zi9GI/
laPY3iyjGiEv2FbsPVDxoZyIx2LA9bdeoOWkGCE1VokWRWblksXe0BtZujnV
qIrIN9rzVw4+0Jr4S/YPMYdnCQv/S1T2hYScXNK5ndU4eLvv3Kp7fjCyflRv
mLuGmKA236ff9Yfvmb77zQJrUGbh6n4HjwDgCAgQxtkatL3+U7BPjgQbutvr
rUZqca2EZmjEMgmCT/I6pZnWYe2LWz9UXwZB/kT25paeOizvvKE0T3y3IsfH
h+ylyegns27idEcwJHQ6VDtbktGQRM6rIOYk69dnAu3Tybj1jYkZZ04IrBQz
+mXRW49TKr/4LvKEwoZVhmZxPfXYmpjTSfMMBVueorX3uuox6Zs2acOHUFgn
byqy2FGPV4+Nq9ifCoPlS9e8d7XVI/eKPSVb/wuHjs0ZGplN9fjK8rmld3I4
ZOQx859S67GC4S307F84MDTUL3A31KOf0JYeBccISNkz7XbhaAMauraGhb+K
gGw283zVxQaU6LFRH9K5BVKjfWkL3g04/R/P7MH6W2Bg8ma7VlIDJg0bXfkS
dRs0cjL2dnY2oI36vLju/G2wsU+v4XzfgCrpWc9yr0RCh3G9z+GlBnx1alTL
WD0K1hiq/SnZ04iVlbcXq8qiIGNLMqX/WCP6c+8kcwlFQ++RKta/q41oeKX3
xqXgaDDYpSD4H6kRJVo8JJu+RsMInxLjeEYjfhcXfyloEQO7fsw0pshTsM2T
Hed4PwbsJfnLdWQpmPTssl7n3lgYIbGW5yQpaLOLe1kyNxZS+ZfoJZspeCCq
kurLewfCnz18bipKwdUfTzk997oDtR2Kxms2UvCV1qzsrtE7IPR5q3IzHwUr
s9Pf3jodB42aBV6OvBQMWFRPGWHGwcNG4SipoxQ8aTJyQk0+HmqVjv8tOklB
CXI4Z0pKPKTEHzknZ07BxYiUd14cCfBEd9WukisUfN94vanoQAKUxz932OZE
wYfvVVN7HRPA3t2EP9+bgncPvzNUeJ0AzWWM8JRYCoY71Mmb8SfCFu0s03Xp
FHTMDFkVrpsII5/07oQWUPDcg7MjZP9EOK7HlF+ooqDmTznWu/pESIni22FP
o+B/2xbTeScSYfFQz53BVgpuMHp486BEEsgHxl088YjQR8o+bWOSBH7r17U3
vSD0VTsrJkYnwarTz8KbRan48I3W6pbWJChNkpnct5GKDWs2jk7OJ8HkMSd6
FR8V7x742CK6Kxl6POq/yvJSMdyGnqVzNRkMNk5H5XJR0SkpysstMxls5bbH
i62gomnrBePcp8kgW2X6J+kPoXdq1+5HXCkQWhz8bP0ioXcLBy8RYpg0THCY
2k1F67SlwXDnFAgwOeJZepCKWRsWagQKUuA431rFi1pUXMc1ZaTInQpZHB6L
nUZU1Av6vI2hmgpCTnPzvuepGPRr7KeOQyqcv02tVbxKxZlvg5lWvamQAPXH
YjyoqGj70uHLyjRwdp3ceSiQijYf+g77qKTB+NOT3R8jqJhr+YSfyzYNJqU6
JRLjqPhyoPt9YlYaCA6o7FZPpxLxvN8o8TgNHO34F0bzqHj8UWtE1b80aBDz
i4gpp2KYLstMdV86KP1pu7+3noospO+4b5MOXuTZ/cFfqTh/qHHJKD0dTI9s
rxedoOIeSu3joe50SB3dHls3SsXC8hK3xd0ZsNskyWrkDRUHZQqORlzOgFvb
/p7zHaCiUE62sGBKBmitPFAt2EfFU6IZn3I7M+D8d43L1Y+peDsxuUnxVwb0
fhPw1OumYuva+BiGYiaYnixKW+Cg4e+I6Iu6VplgKC3pf3INDZU5bu3pS8iE
dW9v2xTy09DRL2TFpXuZMBHVqzAvQsPSuYDnX35mwliK8HMDCRoOO/uU+Mhn
wfYN9y5mydHQ+KrLsaQ7WRBwl3+T2n4axr6z3yzZmgV+07UnItVpeN/s+req
mSzgWMq99OIIDZefXUZVubuw5ebwOenjNFQ1vJh43+wuXHnssNvRiIZuneZX
jaPvgofPjkmqOQ0rtUxUhll3QcJhLHL5Eg3Hmk+vdpy+C7H7qFv1btBwq8qJ
14vS2XDen9QkUEhD0zq9qgiTbHA1d3ULyaFhwo4jgYK3s+Gj4HjMjwwarpQ4
JL3zazZ8lrw40RdPQ42M/bMMiRzwc7dS0Imhoaeg0n1doxywLxx9Qr1Fw9pY
xfS+sByg1H198V8oDSe4/7O7RMsB6yxfyAqkoUyIjPrXiRzwpfD2mVTQ8MLS
1vW+m3OhstlFRqGOhime4sNcp3KhzcDs6TKFhk+mheqTgnOh8bFkQF8zDVfb
bwiTbMyFE9lCh0paaag1tvZc9cdcCPQnc3l30rDx1cpf94/ngT9Z66loHw2/
Gi8/NA7Mg+P+Oj3jL2m4/fGv7OG6PJj77vya8o6GPdY++QG8+cAnv1/21Gca
ft7qxXNvWz4c/Dt6WXyahtyDN915DudDt7Fn3egcoT/DbfC0aT4ctf61qeY3
DeGci06aSz7oqRTHeXLQcafx5M+l6HwoEnl9cmQXHcVPXyu7XJoPlL6LhY/k
6chtOGL+oC0f2u4fdqZvo+OswQXeXe/y4em0T32RBB1HdAeYSYv50HuG3zFB
nI6Pjxg5LW4sgIEJjtxAITo2Q4+E1R4C00/qO/DTsUxDv/fe8QLoY/+8YcFL
x5RD7SE7rhdAhEzC6WEtOoYcOKwcH1IA7A0RjI8GdHRWZozNZReAtde2iskz
dLygpJx2nlEAN7Ym6E6Z09FgV61+6/MCaH1RHPXdmo4qCjt+yU0XwNNV5h4/
bOnILytp+UOuELL4Gw5P+9Dxj1TWejPtQhhQM9/yNZhOxE8YWZaF0MZTUvAp
ko4DmxJcZXwKofdC3OP3CXS8J7pWJjK5EBjm6flvMuhIFrr1/FttIQhG9wv2
5dMxR2BFxNmHhXDst87BrnI6RvMFHGj6WAjjJ2bh40c6eq9d+CSxogiysjko
JSN0tFnjnhm+pQg40lqLrg/S0Yjr2/HJg0UgpqrMLz9AR82Vtn9Ony2CkVDz
+c+9dFT896GG6lwEll5KFtWP6Cj25+KlzdFFcFuQedClk45cv15tCCkpgitm
i4n72ug48/Ns+3hrEczoTNyYZ9JxeObJTcO3/+fbceziDzr2TB+Ta1gg1vdc
bvm8QMemrx0DohuL4di7M6Key3RMHm8+NHqsGKZJs8aRaxkYPKryxeBaMeSf
+q28QZCBTiPk7NrgYqh4bf01TYyB+m9K//nSi4HJqz+aL8fA/S+l64f7iqHV
+qG07E4GSvdnX9GdKobiV7EHS/cxkO+ZqFAVTwlYqH/Z9t8hBi49Trq/Qa4E
1FykpkuBgRMP13t7aZVAcVNXvJweA188iJR/e6EE+gfKKu28GdjewflG27sE
JgdXhK12Z2BdGymmLKmEeC81b0ocGZjd8ktjfW0JzFAq63VuMDCK6THl3l0C
byJ/rR67zEAvxnTeq7ESWLeQ+S7MkoFXqfZGmhylEPQvZp+sGQPPNHxcWby5
FFQLn3LfN2Lg4TprCs/BUjj2+sZ8mR0DFaoHr7kYlwKrd8H9uz0DRStMRV84
lUK99pKsKsG/qvRZl1pUKUjdi7YLcmLgj0JDv/ziUli51RY6nRn4KPvIO4fB
UnA/pZJj7MbAoITdRSuPlYF56WHZ614M7Ll+QGjiahnc3knjKib83XRYM+Ix
qQxWbJL1fe/DwBsb9eYbMssg2vppmoQfAymfT97IoJRB1gF9kwv+DFzZeu5V
4NMy6NSbeWifxMDTaRePXZ0sg5bKCalNd4j4OF5rNuAqB0fbipnu2wycPOKk
uFuqHPqD9mv5hTLwoLhn9kb1cqLeRPEoBjIwfDpg/a9z5dDDrDj1ltDTdz+c
NORaDpYjyfxxRPwls2On78WUQ5mVgaEW4a+je4p1RWk5ZKd/+PKEsNdskP0s
rq0crGyyq7TDGLhasviIx9tyeHvvrzKFwCY/qxotFsoh+dQtt+3hDCx41CgL
ghVwGJKsMgg8VcBMld1VAabSH5d4Ioj7PPXIe/pKBXC7ftL/SuAB2ecT/YEV
oP8je97yFgNll95YNGdUwDXTh+ceE7ilbFI94kkFKN6nyNUQ/q4jzVTbf64A
91nb1C2RDLQw+b31zKpKWFYSaYshcKnCyngVyUqIe3bD7DeB5zh4OTarVYKg
5HH7lGwGar8UcOM4Vwlndz8p0kpnYFyN+IePLpUgW8K0+JbIwB3nd3SQSyrh
XHefmgHB56W0VyWttRJavP5cmw9hYAf3oVL/wUqojYlfXxLAQIF3WqKX5ytB
fk3sXhMivlaNBpF6AlXgvPj6qEUJA6ujzvxS3FkFB7pdX3BWMfDXJXN7Af0q
GHi0xa2GzMCUdbaGbwOqoENzXeJfJgPff3Bht6VXwTUNa8HiNgbubvLeXdZQ
Baz7Q1HHHjCw+9rtDe4TVVD/89KFxD4GimjEh5hxVoOxzGWq8isG2gimz2hI
VMPgcgrXi3cMXG4p7V9tUg1N7UdvC31m4InUWt1vztUg2G9Db5hiYIYDjdYX
VQ1W/Nc+np5j4Lh2y3+M4moYKRy9XSrRhMpinRk5WA1qy4cDDog3YfDUY56w
N9Vw+dzYdOfGJnzS8cLP9mc1nCkf+GDG14S2bh8tlRVrIE07T8+fswlp+t8e
i+nVwPhtT/r6ZQZySvzUXLauAe6H6WX5i8R7nftTN+pfA1OtH+ujoQlzH66S
7k6rAU3BuVUux5vwS/66pNr6GuAT8IszOteEqt5CnCk9NVC5QfPsPusmfL5N
9qPVylpYFHsUMeXZhAb5WkYem2tBs+NjA19wE7ZsuciO2l8LfSn9Z3dFN2Gl
cFoq5Xot2Jza/eNabhNKJTWseBhUC6zfGd+Cypswle+p03BGLQQMzV3MaGhC
3pgvr+fqayGDu0K7jkX4v3qNHu+jWtjkIp3a0dmE82GyDZJjtfAqcb/nq94m
dOTQllD5Wwt6es3iGVua8UPAxejjInUgm2vdcVa0Gc1++c5f2lMHA7WHPvAL
NmOPZ9oVT4M6sPbRvdmzrhmPzDQ8ib5cB62/w7yjVjfj7i9fSqnJdTC3I/P1
qr9NWHxjzcZH1cT5AZeD9xaacNOYbNDI/ToI1fBdEzrThAnW2l9+DtVB8ecX
Jsrqzcj17qLZ2sU60LOu/eCl14zsnezLCWvI0HWh8x7DqBkX7R+JbhYmw4cI
o6lFy2Z0/vQpTGk3GeYfbJbyuNmMFXLzh5hqZPDItJSvIzXj2NVV33X1yTBi
Me03EdWMFiNSlhesyWBO5fh3Lr8ZUyT2CI47kmGdYLBSdFUzPrE83OXqS4b8
htPVLFoz6ry22H8riQwkDrHwLY+bMUjUdnJDHhnmUkdeHnvVjM3nvPLvVpFB
afFfnedoM84lh5tuZ5BBZ1pCQEWJiXv6ktbVd5Ah2u5aabMCE+03FLSrPyND
jTOlUUuOicWn6nw635GhaHntoQeSTNz06NHY4DwZtmJ/1QshJp7jeZN1nbMe
CqZ1My/yMzFBf+LMD/56+F2Jyx95mPgoYp47YEs97Pyh/dZ5FRO5O1axuXfU
wwKpj9dGm4naKzfeTFSphzPyqz3WHWNigJb0ji1H6mEDMJ43nmHiD9bh1L0X
6qFB4nTn8iUm7lw6cYJ1ox50FYovFt5g4vVD51foe9RDdZ9fo44LE99SvZws
79TDlv7irAgSE7tq63RvYz34DU+ZLmYzkfMbe0mgpx6m8uXfJxYzUVOxpz77
VT3sOr9rn0I1E33s3tz472M9mORGXWhrZGJj2cTWhh/1cEqX/HJwkolTH+ef
ayzXQ6zKNkfNj0yUl+WKfsDbAF1FXf4Fw0zMzZeef7utAQR/V66z62diG8n5
jPfeBuAftZMyecLEMUtmpQA0wKpy4fvQxcTV6mu4qg0bYOWx2t+K7UxUED93
Se98A0yv5P3K8YGJJxcKmkZuELjyyXzmGBNdX0xt9PdsAKEaVY19n5hIS4zs
qksg7OGnPuuvTHzt8kLmeG4DXBm6umlhiol/TsoEjlU1wMJxFiX2BxOP8LL2
ij8g+IxFPlDnmXhtYk1sY38DTFJFPY/9YmJk57nxkx8awPzY/Pm3S0x8Ejqd
Ffq3ASqZDhIcK1j4w1rj55a1jfBV/MBSAicLhSDqNF2sEQQduvukuFl4cOtA
hdH2Rsi3bKn5IsfC80syq74qN8Jcta5cjyQLA1+7WN3SbgRV8YLdNeIszKez
GFKnG8G5oLc7biMLx2+aOp2zJ85zVVPPrmYhj3HRg2nvRih7b8Z9kODfqfRd
OjqiETJev5zYROg7zXc4QDa5ERquXQ/xI867f40aaMlvhF2JWy/OEDj14YCS
RW0j9PKrhNsJsZBRvi1mltkItKMnT4wQeNmGDfIvG6FqrXpTjzALpY/yZrWP
NUJ7gcWlIyIs1JE2m7OcaQTZn3PFdAJHv/tenrieAiTlfL4CURbWMA9z7txM
gbUtTfuExVjYmxl9sVOeAs6wdT6SwLPeL+nWByiw4V+7xR8Ci5jKCi4dpUD5
eJKxC+H/of1ujqlGFEgSXFz5gcCWgi2dey5RYO5SgWPFbhYGfeeVfuhIAY3a
Va535FlY+MTM38aPAoZdc6vcZVh4v7r4xfJtCsjXuimabWHhRPSPPZmpFOi5
5D+qQehda6cZrVxEAZ13Aru2bWDhbv2YscdkCoRuV1nDy8tCI7lXmrYtFIhT
/+jxg7hPD065zJU9FNhnJ1q/g+BPf+82m/2a4HeoPfV1LwubseXkwU8UYt5a
WlurwsJ3OWvLn81RoGXZedr5EAs5AsxXOq6kQuHU8vzuwyzUU52h5W+lwsw2
zZvVOiy0EwEBdUUqONl/+WRnwMLYuRiHF6pUqNu+ELzdkIV1fa/uu+hRIe6K
jeaH0yzsI8tJ8ZpQ4WvzIamcsyz8GefuV3yZCr8TK7ebmbFQzAn7NV2oYGhZ
Z7zhAgvVTqzb8zqACgHRHMVdViy8uMMi6mY0Ff6+k/M7H8nClPNK7+XSqXBj
rRX1bigLe2JWH3pVRIWRiaOu7wKI81PUCQ02FUQoYteuuLHQTfKO1nQ3FZ4W
rM4rcWBh+RmbjIIBKmRCsfnnaywcDlH/fnaUCqQ7U4m7rIn7bRQ04P5O+Bcz
ftz9PAtPjn3OY/yhgtqtmMCaWBaGC7ct2PPQ4HP/4u4rSSxk6mWc3ipCgxOb
LKqEM1g44+1S9lSGBrXj3Fu7cli4o0LvX8geGnzKeh3kW8RC6zdbzfZr0GCb
V2f/jgoWPtXo4c48R4OliW3nblNYyO1cZHXiCg0M/yYF729moWaeH+2vMw1c
FnfmjiALq1fsuH4lkgbU1uE6lUcsHN3H0SKUSoN7Zy4WD/WycJPNS+EHBTQw
3Xsm6tYAkR+ptU6+tTRIvrrNatdbFlEfIu4rMmmw+V3Rt773LMQFy61DD2gQ
67n+9QF+Ns7L7/dM6KfBwKkVdBseNu46v/bxkfc0iNyvKpLMyUabmA+yP7/R
IGF7w3zbXxbeZTUFlP2mwW9ZF/MfC8R9f0vot1hNh4d7XNSlZ1jIK2m7c50Q
HWb0GvKMvrJQ+wyEt0jRwdNeNSJ0nIU+ISJvXXfRwTkscW77ejaSG74pb1Oj
w+nppW5ZATZ+Gu2IeaFHh3tbU9VlhNkoIZw9evssHTgbXryUEGfjOb2b6mrW
dAg/0pi3aSsbY72PJ391pANDzyNJWJqNv18vHjG6RQfVZ+WLa3awce/a3izO
ZDq8iRV1XLGLjbYaZTPUPDqMKNrx/lJi40DuucJNTXT4vqL6wUdVNq7v3fm7
5z4dOgqLx99osFFnxSrjoD46vJcPVnqqxcaAfYMVe4fpwPF0a0G7Dhsbrzas
GPtCB5+D1qepBmycTImySFukg57vB9I2dzbKdFrXG3Ax4PcOeqm+IxstFg7y
LAkwYErY/ozjdTYmyPNfrpFggMLhJf9EazY+sBhnXFJkQG2e/Q76eTYuR7M3
CKoywOcww/ydCRtVWCm2HToMiBYZ41l1mo2O3xxavYwYMKYwpaF4jI1FEkfF
dlgxINhv4IfxUTa+Ob3JddCeAbundj/df4ONAiE/HtzxZsDBn4+dHOzYaNDQ
JakVzoBW1w6HAgc2Bo3mec8kMMDYTLZvwImNNCHvp8U5DDjVfyFvrSsb5bzl
gnjoDOjvv+5804OIj4G6/6MOBrTPNXi98CLyRdzI+04fA0zPqTw64MvGQmaA
i8AUA87Hj5gvBLKxPTbJ4fkSA6iN/xJNg9n4/mL5jVSeJogAX1FqKBs59rRc
NRNtAo/sGwuCEf//n1//JXG5Jqhc08HpepuN8OzzhcF9TRAzlh13voSNVoX/
zHK0msDd0jVzZR4bSTeFTS6daoJusq5GVQYbc3QUz0hbNkHu+y3eJklsZAlr
G47aNcH7qZ/HlmPY+Hbc1KDEuwmyXvVSygm+Jbqjzo2IJniYW0M/G8TGTVGh
WjuSm8BBO9b4nw8bD53P0PiS3wTjfk/C1KrZaK5Yq1pT2wSFg3Pjj+rZ6PPn
3n4XVhOYJJ/abklnY/rj10p7HzZBZvPfA19YRDxzp3fOviT0Df8U9W0n8s+F
awf1YxM0+HR3c3WxUUhwr/ShFc3gOjiRt/k5G5VH9bYu8TWDabNyR/ErNhpT
LMXZW5pB6O7ppp1DbHSPcBcOUmgGXjgS1DjKxkTTSAFt1WaY8d4hcugz8b7+
y13PqdcMMXOPAtlTbOxdbOT5HwVnHg7V28ZxUSnZUiFJEilRQpSlW2iTyJpS
tqSyVUhIsiekQv1s2alQicrumTln7IwxY2ZkT1lSUagU6n3ePz/XOXOe+7nX
711d1VtWwVCSKF1/thZN4WNvO1WBnHHzmY0KdUg4bXDJ0ctVsLjq2epKmTqk
4vFjUeBmFRzNUnCwlqxDJnqr/rTFVMFSfjg4vboOeQhv/hmfXAWq+j/Ie6vq
UOyg5vSJgipoO3akV2VZHSosMZkUe10FnO17Y9v+1qKWUOeJLmoVmPXQWO5z
teiThf/oo44qqHnYv9fAsA6tkI8ftu2vgoJYs7Jwszqk+CN3QOpzFThvlVAi
7erQoYbKnr65Khisq7zAc7EORV4cYTqurQbK/eAjviF1iPe5LnnxWDVsGOpN
PfCqDm0OtkBKp6pBvDzV83JtHdI3u1j9xbUaOl7oC6Y11yFH2eDyF77V8D3r
y3Uauw7d+p5YdiWsGqgXRUo/v69DGcSzl2r3q8GWop0nOlmH6hJR0ezjalBU
06i+p4FQvwv7ydsi/Lwi9DnvToQW9nzO9a+sBj3Nezp+ighJ8y/J0m6sBk7R
mfMTsgjpdIunL3RVg9z6CSUHKYROP1NOrhuuBtlgrbiuNQgFBhokhXyrhq4e
ozvGQgilHLO9b/C3GrR2iclRlyNUIe0Vt1SwBoqNG98K+iHU/TU8umF9Dbjt
NtJ9chu397qUiGjFGkh6erV0fwpCDQvXHAX21ID+bQXN0EKEHmlb6MYZ1ECh
bEErpRohjbcCs/fO1sCV3BwVrQGEvJ/fOPdfYg3M/GxyDVlNQZNpZw0K/tWA
z+GAXtKKgure7ZPZJlQLvxeX93mZU9BdCfE/z6RqoUyFT0nKlILOWE+zd2yr
hRyOZ329MQUpJ9JfPd9TC3Hjo7IhvhTkFgOb37jXgsiTK+r/EihIu2nDIu4T
0F1UmZWWSkErl891V0TVgi7/iUrNHAp6Glpyvya7FqJfOH25+IqCrqM4j/0v
a8FRsn85TyUFHVq8eIRSUwukaH7bQwoFjfhv5qFxa8HqzrHTtR0U9PrtYu/B
kVpInjWVNeNSUMTsu/LG6VoYOn47ZnCAgizV3iYe5amDU2XehStEqUjuSsLl
VqE6oHx/dz9VkIqmn3sdO76hDiTVTBuUV1IR9bOxYse2Ojjj22GMllGR4wW+
QaZhHRT+ndMf+UtBqvmDVVbmdVB+KLvUf56C/g1XP+LY18Gb+zY+gnMURJdN
9rb1qANp77SykjVUlGHva9oTUAcrSk18cyWoyCv9hNKZ23XAjC098nADFen1
KC8fSKqDe/sUTkZtoqI+65Ha9y/roGdAUMxVkYqKE6kp52rrQNlmRZ3VDiq6
0fn42khLHfx96JVhsIuKpI7bqHwaqQPh74ELG7SoaCJGbaX7TB1cf7s5kF+H
iiqbhEe+8CAQ8FBSnt5PRdHLP1O8hBEsfzIu1mdARbZGjenfNiDQ2LBNpf4Q
FW0Ly/X33o5AODTp1nNjKvqFblnNaiJIkCy/+/QSFTUs2qn6GSG4Hpt3fY8r
FT3S2Ss4Z46ARrtQQjhT0fmAteMBDgiu0nj2nnCgIo3yb+S8B4KImMvCA3ZU
tPRHW+bNQAQ/xF+re9hSEUvt2Y1/txG0XaI/+WNFRW9JEeuUJARL7/DeoZlT
UaqV3071bASCJ37rfcffCx7p429/juA0/6eraY5U5Oxn+N61CkFBhfGNg05U
dIi/sIqnEcGpJzSYwrw9WTQplYUgc1d9TTK271tl/yH6FwT7v54YnjhHRV3G
RrIXfyPI/vA1JtEF+9+TvcDDR4EGsfovOuepCP3V4aSKUOCfl1xfLL6v6uEp
YmwdBaqEnl5Sv0BFOfdyXmpIU+AVw7WkB/Pabuv0UDkK7HRYWhJ6kYqiZFfe
oW/D30N/L23D/pu7WHNtwy4K2NSLDdIxu7267HxxDwUceDQ+zwfg83/Lmb3R
oYBZ1Hgs3Y+KjhtwdHgNKKBqWng524eK6mLubDM7QgE+24BHvlewPSzddemm
FCByrXmOeOLzXXIn99hRQGqJ5uMpbG9UsU1vmBMFSsS0GSS+79zsyqaOCxTQ
dD12KBn7z02v9rW0FwX8+YPcfD3w+ZFXsi/5YnvVX5tbYjalb4l/G0gBHbQg
poaZIs4N5AulwPFiyUJRzLlP9Kwe36VA0oETJ9vd8fnfvulPJFLg9YU0zyLM
UXvzVLRSKTBitvzUHcxuzQL8nQUUqMvXeWmEuW913czG5xSwrFsmJYfZ9PTV
IbcyCqit+nbqnxsVqX3mVi6lUGCZnMWpSsx56rEF5g0UOHcwa/0jzOJB+xMz
2igQ874wyRtzNO37rc9MCqSZB1SvuEZFvwXzPfa+o4CF7tH2iav4fGvbU5GD
FEjMk5Bt98LnP151iDlCgbMxH8te4vMpO703eUzj79EDMq7h+KtdVxCsnKPA
N2WDH7Y4f/JQ99yyfxQYWLHyri7OR/EVcSMWy6hw0pl+XvYMFd0+AczMVVQY
XGe2K+z//k6ervuymgqBQvLXT+Lfu73PL9onSYWMI0GVyjg/Tb0FI1nyVDjY
IK3CtcfnV6GrsjuosNclxL74LD6fz8feczcVsm0PxoTi769LeqfFv58Koj9m
GTtOY//2xclbGVHhxOvBzzyn8Hny+quzjanwjtyxhHMS3+9NwYT2SSq8/89o
Q4g1FRmYBjwTsadC8NdX33RwvT0dPXbxowsV3C00Kb8sqEj4loxipTsVjl+T
j/yF69NX4vvIXW8q1FlFyzzHv+95SeY5B1Ah1WH/knP4ff0jj85phVBh6OEh
lfVmVLQqQOf90F0qvI447hR1hIqurBbOepNEBQM9k0t6B6mI82zIPiaNCpqb
H1fNHqAiXYOyjQ45VCjcWRN7UR/XU09kn/oz/D3Ne2KRelSkrcvgRtGo0Osl
a/97NxVldeU8smulwuPF7CUSuP8t97xmrcqkAm33+wENZSpiPpZivRukguTJ
5ENXt1LRpX8udOV5KsxIZLR+kaIi+n9ad5fwEqCssElTUBL3J1UBE84KAsR6
Emw2ieN+09QnUCRCQJnSp6YZMSricXrZfEucAGeeVyFNIlTk+js02mojARJ2
Ezcf4/nR9sDq8HZ5At5pP6R44/mhpqS4/K8SAfmZr44cWU5FycRvGnM3ATfv
gLgMHxX9Pd0W/mQvAQ5z+7fP/qMgl5kMgyAgIHPd3ick5pbYq0vMDxGwJ2rJ
zX2LeN7IG1EUjhMg8CEw8uUfCnpUI37rjyUB6rHPqhTwvFmw+qTXcZoA1ZAr
0uk/KKgxMr7a/yIBpQpfz9/5huezjFPg8csEbMzIO84zSUEJb9X3yfkRUCnK
63z9MwXNmS6f+xlEQNeBZbmT4xRkP9b9tjWcgNvFL0VdRymIdqvoWlYMAYfP
yBf1f6AgJclgjWsPCLDNEPO2fk9B90tOzBxNJuBemfu5djxvfx7ZUiqTSUDu
mjtpxpjPvP9xZSafgLv+1Uv0eimICGja1VRMwBpjn2e7uilom1jaZHoZAfui
SxLk2BQUX+j5/GoVAfNqPrXrmBQ0a6DvcYhKgJ1x9faVeN6f7hXbsaGJgLP0
aO5CKwVRfEY+TdEJmKvrbfjWREEKghVPaWwCnvQeM/jcRUExeTEXUvoIII3v
XQvB3/+me3ar1wcCEtnnTq7jUFCNJ2+exHdsTwaxbT/WD1YdJplugiSsiqoU
jHtHQUYPPp5pFSPh1MuwZet6KEjDMkhKeT0JMuPlFY8xy69b2x23iYQ7l85s
3Yrvt5Zb9PCrAgl/XgSZvsC8NMXQ0lSZBF7dRFXNPnyf072iL9VIeFs41l6L
+aO0D11kHwnZTmu/muN4dA0IxF0BEgJtD7vdwfGgZeUc7TxIgtvJiY3UEax3
nLX51Uww2y/y/x6moDx5Ji3BgoSbniHbdg9RUNLopbAZWxLyInxuXerHeujp
En0rBxKGcjmCOdheX7eUxdfnSVBufcbowfd1Ud5dvc6DhPg/X1rWYP9YTjb5
+3mTMB5N5+GOUZBBiaMm158Eg3ZmzaNPFKTmPTejdYuEA5uy+GywvWI/FS//
jiVhMvbYXhbOL94KpHw6gQRaJY/CA5x/0wEnJ6qSScjYPPfYdJqCmItR54Py
SdhKvtBowvlKIJkt/UUkUIY9LSJ+UVBp6NshvVISXJ9eXoDfFJRjaJqRUUHC
1bkytXmc/wnLRu3+1ZHQ/9Phx5sFCgprvLnesR776+lJoytYn3nfWceltJJA
zOhsUuLB+uDY86TNTBJKH+rd+rCEiiyEDlqEdZOQYztUL4f1mUFHn8iHARKO
TfG4XsT6UO2Bb7vhCAnLq//ueyGE9aKlYGzeZxKY1e8OzApQkdi6vCPLpkl4
8f3BTe0VVMTL1VnuOkdC2hnFryFYL04ns8iGv5gXUu438lLR8Gn3UMVlNCju
/HRBGNvDlOaD6FU02HVb6ssS3F+IgdSF8dU0iFr+z7wf21OapVZ1VJIGb3dr
GVeso6IEeec9qxRoUPQlsM1jPbZfmbojfj8N1pYayTFksf2Ttp8mjWhwtiex
6Ykctr/kW4HZMRoYBmT/CJbH9ntHu5SY02CGx/OZNe6HYhqycqttacA7+efD
jm3Y/p/lg1ftaZCUpp+/RAnbX272mOlCAxOPgC8crDeHA8ZOq7vTIJy6tLpI
Bduvc0sy6SoNwh7lzx7F/ZpYFOfMXqdBsEUskYH7dSl6kWgdTINtRwKoM9rY
fsMBYYlYGvgNeVpk7KGisGV+bdcf0EAm3PfjjBoVeTcKxXT/RwNvh/AnR1Vx
vO7kH96XQQPfa6lpmfg882N6y1LzaLChvpLyA9uXalhR2lNIg+ia2VWKeL4M
66g7bnhFg5wtX88HHqMiJY0XQmfKaXCaEBJrN8XfV95enV6L/R12X3QTnldV
8nkX+0kaaO/86HgFzzPejZvEZVpooGYiykfF8y5BaN3VTA4NOh9O6Tri+d6z
7L7MUB8NFtRzu17g+S33V6BN9gMNhht31i1gfeD2MzLA6RMN8s4n/D6K9Vzp
JI9izhQNbm5oi3qE9dGf0Rtdwz9o4LKE13X4Mo7X4M/QLQs0cE5e8p8K1nMx
3Ku7XHjrQbJgcb0/1nvMji99eSvqYWxEqepCItb3TRdiRoTrwdHp5J+u+9g/
lGGtrevqgXOc54JBPI5XSXfCk831kB/QWL/xDp6Xzyz1xxXrgbdypDw2Cvs7
m/512856MLsUwvkdTkUtKUfTLmnUQ0rMf5svhuJ8SKAdKdSuh17pHSmcYCo6
HQM/J/TrIebv8N+0TDyPw6pydxyuh3M9vHEv8vB+EbjH3ON4PbQqF+2gPMP5
5lPyt9iyHvyOXnjHeEFFge47ir+eqgev+4kPh8pwfpwrOLXTsR5KW/ocpipw
/lqlv37pUQ9Nq7dvEiBxPE0knL9510PkLeW14k04nkYJIrsD6kFli5fE5nYc
vz3RbqWR9WB6tviIBhfHT4VPcia2HvaX5Pnp9uH4bQ2uV0+oh8DLImWG76nI
WOa3t29yPQwWZyweHcXxFPeVfZNRD9vDS63NPuN4Ck+1/8jD/pQPSnASIZAc
v9sNzaJ6eJIS94ctSCC3fx+3XX9VD5OrQ+KMBQhU+suBU15eD3vu2hxB/AT6
M9UTPldbD8GrRHdqLCOQwbj17n20eqiPK9Z7xkugmCHGQEBLPQiuVr4uw0Mg
ZvexuCpGPVglx/ckLuJ4djbsm+fUw2O5rgsr53E8mw+M6fTXw8vwmpAlEgQq
pNYkBX2oB4m7JXdKpQg0XallUPupHgqkG7qcZQikXVo6tThVDy6K3vZicgQK
K1R5vP9nPdS9OKJIVSCQWNqWOcTbAK3Iyk9ahUCnEzPyeVY2wPCn6IUmVQLl
xK63PCDSAHX0XqqvBoHUgkReEBsa4NBE/8oWHQIF+sbY8ck1wJD73TgfIBDh
sWyl0bYGmPl8ylTakEAC50PeRuxsAM9H+ma0QwSyPDt/rl6jAZhHr95zNybQ
/fyHH+7qNMC/sPtmTqYEavu665yNQQOUJi9V7b5IoBWaLcMyRxvgiIruO3lX
AhkFuziPmTVA2sGel1fPESik4e/7lzYNUPh+oKzOkUA1wilO/mcb4NoS45FV
9gSas1F/r+/SAEvyNxidsiOQRma740p3bH+bJaPAlkBXxi4MdV5tAJPr03dm
rQlUvIvXMdW/AST6VM0fXCLQ+PX0QedbDSBsJlxf6k4geYqmw46oBggt8Mlk
eRLIcUXnwExcAxgesno/c5lA6Sfc7WsSG0CDoh6zxptAa99nnj2e3QBSyrtW
m/sR6MR27f51Txvg9Y2jU17+BIq72nVm4EUDWDD9NOICCbSUd+WZyzUNwF29
apYWTCB949xeLbIBlAyveA2FECgoQc+Op6UBUhvbzebDCFTRw+1pYjRAZHTG
f+siCfRDzvv0A24D/C1rxjMDx8tdsOfUAPbPo1/KuskE8iorOCU30gDRU0HZ
WQ9x/szrv5v4jONXVbZ/WSKBRg17bcumG+DlXNpSt/s43+Oudd/43QDTT/fM
0O8SyL5LxNaIpxGet4YIaMQSKFW6kCvI3wh9jjeNU6IJxHExOskWaoSwizvK
/mJ7xJ4PcB6vbQQ+taqlUo8JZPrD38Z1QyOUuj7YzMrE+a+3hrNTrhHQM52Y
2BwCNUQ+t/61rRFgdzkY5hOIl36YjXY1gufEqwN/nhBov/iwVbRmI7TfOXS/
pJBA5QXiVuuNGoGTfmDNhhICzU6WsN4bN8Lb5U8Pd5QSSFXrmGWheSPcT33W
FPaGQB63Rpjeto0wGn/o0Z4KAj1tvGWh49AIccp5JWNVBPooIsXkc22E5fEX
JVJqCSRr+9q8zaMRRJccaD1KIdCZLNPOJJ9G+K34piaXS6Dk8fETZwMb4f1W
K2ITm0BdquEMhdBGON734nMak0CiARtPTN5uBJ0j9XslGQQyoZZ3vI1vhBK3
/54ltRMoeqWF2a2H2J+GCvtXtxKIZv6Ffji9EZRZXj/vNhGIJzXKVDS3ETTW
+zIFGgikOyxL737WCHXr9jBvkwQKUKo+nl3SCIJ6kRZSQwR6623dfqm8ERy/
afTTPuB+UDVlolbXCMECH2K9xnC/OiZvQrY2gkxPoQWaxPXucdd4ZLQRNNur
I2wW8X0HvjTt+9oIn/eunqnmIdGomcnh+JlGuKXKky27lETF1KL64d+NcKOx
JD6Cn0Q+6quMtHiaYEYrs3pMgETa+W5E7PImGJravM1YmEQ8Ei36Q4JNwNm7
klu0mkQN0duRxpomeBb8XCdzG4ni/kTr3VnfBIOxldl2W0lk4TFe3b+pCVik
nZykPIkkBw5rq21tgsitSbVdm0k0YPakIkq5CebLnH0ebCJRHnW5Vq9aE+z0
aDQ03UgiN3XXN7v2NcEmM2Lnqg0kUs2vV4+AJmCcsdRokiTRT3GF0u6DTZDX
FfPIFp9XGx2hqmLSBBcWNCBRkUQRfz68CLVoAkep7hvt2D5jD0MVjm0TrPod
bcyvRCKOGa/SrfNNcL5TOCtAmUTpVKenLPcmeBOXt7VUhUTO6tSt27ybIGyC
BRM7STQpHrKlM7gJ3DT/bT+1m0SvowezFSKbYIvU/J97aiQK/LNfNjC2Cbba
3bdvUCeRvkdGBv1BEyj01lktaJCIf2BRektyE0zrJ/fv1iQR3exs2vWMJtBZ
aJlz1SJRErVmfVteE3gO/cpL20ui0+rSybJFTZA580Tz/SESyebfEL/2qgl+
ZR58U2WE4ynem9Rc3gSzj08eTTLA8YzWXiNTh9//2j/tqU+ifR6/RRpbmqA/
9HDUZl0cD/XrK9d/bAK9L+FnJLA9EVTvhRrxZlD84rOxeQv2jzozcPXGZth3
+WsOwvERzd/9+/yWZih0St/3FsfncfS3H8KqzZC3tzw1F8fD5Y+Z7znNZrCs
nXNJXU8iJY+X0+W6zTCXeFL/gQSJ3pp5TTkebYZbGlUSTmtIFERt93xj1gw5
18J2O+H8MVBX+bLSphliTmy0cxIh0Yr8ODf7M82gUR+T5CSE/SP+ZbzUuRly
WS39Tquwf6KPXeC/1AzsG/2aziuxf/4UjthdboaOWiLTGeevrIeAS8k1/L2U
QMlzy0g01n9peGlQM6RZc669+YvnX+a42vuwZuC36n11bR7Xv9OF8No7zTDI
+LlDc45AjI8u8n7/NYPWteTh8u8Eqvrs4DpW2gwhZTtP130kkO/zgbdkJfaP
iU5qyHsC7bx8lj+L0gx7beQ3GA7g+aLadzKosRkqDSb6lvUSKHf69FNbOv6+
zt3BJtxf7F+/m9NgN4P5lNKWuC4CSfrZHl3d1wwJEQ8KzDqxXtDipnwdbgZ3
Iqx2TQueJ7+tJ5o/NcMneVXBdbh/HKru0i741gzjMlWu4rh/8Ny0jA371Qzn
S2TbJWgEusZjrqyzrAVGU8JrpXB/s+c38SqWbYFzKY5kMu6PqusMpuNPtoDU
K+p7k2cEmuBQDNztW2BHwvHYc7gf5yVD4uHzLUD8ttALxP16vbSeBo9PC2h8
E6t+ko37YX91RF9AC7C3fVa7jvt9fKY2uyKkBR5cEP+dhecB75a9flfjW+Dd
PZGHsyl4fn9823D8YQucD+h3k8Hzyq9gj4RSegsMp70/eOQRtufi6wvLc1vA
/NeGrd5JBPq8Xb1i+FkLvIyNW5WeQKCCz69WoJIW4DfiSXiH55vjc9VTaeUt
kHlycYkmZqnLL59dr2sBkdKQowlJ/+/XO/9Y1rdAtWSN8ySef/HTxcaqbS1Q
NxF23Bjzkdc70gRZLTD1/N3KAvz9Wq3tuvVDLWAgrfnrzAN83n75YM2FFuAK
PM1risfn8eTSxfhawWby84YtmDcQmzdNrWwF9qFel5t4fnLCsy63irbCHtvv
wdw4rH8ObqI8kWiFlTHvudn3CGTMnyEaIdMKh998k/yO31/aLO3kqNAKEo0x
tvr4/QATKd716q3gluHAGsDzNs4oyIC9rxXWpyj+2IPnfYbuQNgD/Vbo/317
3V08f0s09Mnjh1uhlBKi8TEc6zPlHD4B01bobG8vqcPf65JfatRg1Qq0xvzE
E/i8MWnXiDC7VjgwsER8GLOgkNKy+YutIJMi8YcP2yezLO5g+eVW8BZ/ZJeE
WXXxa6SPXyuEJteckcd6wfrrq+Vfwlvhdt2S/YbYPxdH1hx+GtMKV87LyjAx
B/Zfu+3yoBWcxMYeO2J/ZrTvW9Gf0QoCVwKCgrC/S+rTjqTkt8JU+/XelTg+
ZO1itHVxK+To2/Y9wsx549C8uqwVdI69KBhMw/XznLqSXtkKsWo8e06lYr2d
v8U4hoJ/3+dUzcT5I5gRGXOosRUuGbP2mfxHoN3xR1ehrlbI8xqRAfw9o6ii
Yzd6W8FZISqyAttjEywUpzXcCpqZmh93/99+v8ttM+OtsLmsyGgK52ugV6dg
yRS+r+YqzYs4n+Nc1Y97/GyFb57Fj4eyCJRp//DutsVWuKd86KZtzv//X/VT
wtkCbaBzOCD3EK4PzqFq07Or2+BehsJETQGBPu3feG+9ZBvMHr3zVO0pgYR3
vRdJUGiDV/F+cdJFeB4rGp4wVW4Duj5P6f1irOc25d8XUG+DhHlns6UvsP0S
/HhDaAMVvz0u118S6KTIpdXh+m3wRdXz2yesh9z4W83hcBvUflWbs8N6KOif
csL88TZYzk8THavB+f4rnllu1QZHme8fhVYTKGvqm5ivXRtEvj0tLI31UOmY
haWqcxvQynZef4v7Qf3g68QvF9tgVcvZzhPlBOrminc9vdwG5r/HpD9jfTXR
4b/2vF8bJB9oPxX5mkALjT1Wm2+2wYccoehNZQQSoeg+7A9vg4XsLB9JrK/k
KjLYKTFtcJ87Oy1ah/V5CY+4zQNsb7XYvxUI96+nzjZiyW2gsPrRIx7cn2yz
aI/oGW3gmhxc+QvzzfvREoeL26B1IC/7I4HrKXriJF9ZG2zc9t61B+ujnBCT
ZFTZBg8PxZd34H7XcEV0/d5G7K8tOvMVuB92X/Q+NdveBhUMy8niRtxPHLtS
SrraAH0r98jC/fOvrWaPR28bOGaIXU9sxnrOPFlq+3AbRFm+4I/C/bbYG526
Ot4GjY3H8mOw3juaNJpcOdkGAyWZX87g/jz6Rqh7yY82+P7ZZPMurP/CuBoS
xvNtwBNgabikA9fTbzubhCXtsMq2zIKF9WC1VPjDHv52WHvHwyy/Dd9Xt7BL
TrgdJARv7buO9eHs2c417mvx8/cTokfx+fdvzVmUSbWDwShPKUEnkEr2poR5
2XbQtok/zsLcQhzqNFRsh640ifwPmF0/eorGqbRD9e7C8hnMvMsfmnWpt8O/
4vuRfNieDMWaeGntdrj5KUR4DWaum4DQ80PtELuSMN+N2Tdut8kPk3Z4d2KN
oD5m0Re2sXqW7ZArGhlqivnI94KVdId2CPnU/NgN80cx+hFx13YYVX9s5I85
VOPHbXsP/P6KxILI/9/fRrqxwLsdUoofkwmYq64bLp/yb4fLzML0TMw2KW4H
tW61g/PctoGteP7NVD2IuBXZDsYfBubWs/D9+yrIxth2sC4XmhfE/lf+O8gr
mtAOQb5vPv7D/m7axG9gm9wO9VKcN9P4e+cP7AzNymiHHYWXvUb+f/9z1pTx
vHZ4JRcm3I39nxER9E+1qB1sIoQetWD/axfk7g941Q6SHauX1WL/cxtbblLL
26GVWlJKx+f7fvpes7KuHfY8TB5NxfaJrlq/YE5rBzvNhTeueB8oVtbXSW1p
B92KL5vVODg/TC8EDjPaYWafhtIi5rAHb+a8+9thoGeDaEI39kdZn1b1B+zf
yqqvdu9wPnTxXeebaIenXa0XFHpw/CUsfiT+bIfuIqPd5Vgv3N8XoNG30A76
Z4tDbvXh+9tl+cjz0SHhVZrH4X58/6DGUo+VdLjf+3VWGOuN8xmT31+L0GHb
n03rOZh5Ket2L66jg0LisXfpg/j+73WvHJSmQ3BlplfRKL4/n8vLu3J0uCou
M1g7gvuXfOwkexsdvOiSuxlY33gfKlWR2UWHK+/vuQzjfUPk4jsP1z10uGEW
HjA7jPOhSPHzzwN0KNYdPCyJ9c/HNlMlOEKH9urDS5TwvhI6ee3SbVM6/H6o
nK6Dz5cRffy0w4oOBjzLi53+r6d208Yk7OhQVcG7TmAW54Pl562OTnToq+1s
f/UT54OvmOvTC3TwrV3Bsf2N71/h+HGvLx0Ke1Z15WH9VrP9yY8VN+hgNPj0
a9gSEh1P+7r8XSgdXou5aznifcYrOHB7wD06OCza20ni/eXvFEX76CM6DBbf
3zMjSKJ7Tvwm6x/ToXPbX2jHelOWdfzsp1w6uF6yDSwQI1GJUZJXZSEdtl4/
8DF4Hdbvb3tu3XlFh6MLtaE2eN/oVNz84FQFHRzP9NoL4f3COeVCznZEhySd
0u078P4xLfCi7Hc9HT6m7Go+okCisKBZWnMbHcyuW+q54v1nzaQ2J4VFBwZr
Y1Q41tt5DqFjl3pwPF7G52bJkUijs3Fu33scT4GCh7VYf9MMhAUExunw58O5
Mz2yJLJ+bbWhZ5IOlJ4vJj+0sf5XSFMu/EEHm2srJJ8Difz+e68XuECHPWKb
KefwfrB85TYzY74OSFTabrT+KIn+C/RylBLogC9R33Lbj5Oo4ux8WJVEB3zl
/fZT7SSJjnQcSIqR6YDyO1snPtiR6J1+dP5phQ6gWyhXJjrifayU/lZJuQN2
nVriYnCeRH+2rGv6o9YBHscKJqYukSjmod27ln0dcLlX9ni6F4k28OdMpOp3
gElhcuxhH7yf+I/Pux3uAPn/FHO+XyeR7sROIR3TDnCd1Gt9+YBEbXbXZFZZ
d8DSBeOEz/dJdLa9elevXQcMUecVFDFP7uc9UOTcAXNwIsr5HomCS45Y3LjU
AeZ+R8oex5NIWO7euWNXOuC9y8fi7rskykxk+2643gGlq+R91mBWXSYd9flm
B1Dd+JebxpGI4uf8X3VEB5geMYuwzCTRifGnT2NjO+D0imGJs7kken9qqtIu
oQNu3B/POP+ERLx6QX3zmR2gVm0W7/OSREZ8jzbrVnfApyDDuTBEoi7fPjVB
ogOcFC9pR5AkOj8qZ9TX1AFbGpneEY14Xz15ybq4owP2Pg3KDm8lUVTzS9cg
TgeYvfFvCO0gkbjOz+sm/R1gcaHgfTCLRE+Kde9If+yAU7pbfwRySbRXJjz1
y0QHvLgiJiPwhURN95qLar53wEGJvhSXzySyXSJaGzfXAYbnoKdugkSfvG3o
Z/51QIaV7qAk5mVFV/2DlzMgQpFPq22cRFvj/6bKrGWA3rp/hawREpXZLc01
kWCAzHz/cUXM+tsFigKlGFAbfBYFfiSRHW1dNUeWAb0McZHNH0h0/49yb7wK
fr7Ex9F9iEQyTWofalQZ8ET7Q0DtIImKHu79PKHOgOnR7c4imBtUjeYPaTPg
5YXDmaX9JLL8e5Tvmh4DMjKDZvkwD7WarcrVZ8DkCVLcug/Xc4r1mk5DBtg/
S9431UOieVe7Df8OMQA1Ny/4YI7WcNqiYsyAj6MnoubeYf/xXthhd5wBbTw7
OUGYczs81O+cYMANCacvPJhVH3vrlFsy4JvSRFNEN4nq3PwNR2wYsE2n2X0F
5mN7g4+tOc2ArUf+dsVif3cvi7A8cJYBx10LN7U1kMiVdcfusiMDsrYsHXtJ
kGgm6965x+cYUN++QjipjkQhXg/dW10ZYPHULtG/ikRpK7NvKHoyYLEsoNKg
lEQMqEgbDMD3cRDw7s3G+S1Ulyt0kwF9ptJxxGMSTfSQRTohDOisvbu0MIVE
/k+byy6FM+DBriu9Dx7i+Pl1VP8XxQB5n1LRQFwvCYZssv4OAzJhNM8Z57fs
6t7WmTgGSKma/3fsDomeDwyxNt9nwJrH84Nf/UikXTzaa5bIgP6u5UoJmBsD
vny4+YgB+m6v92hitjo8/bkohQHaZ5fy9Vwj0fDauZl36QxgPP/54Cbmy8OL
8/xZ+D52scOymBde8i3VzGUA7QIxS/ri+r+5UtClgAFynWlNrpgljomsTXjG
gPXJEvYrMedJrpOmFDOg+0PP7yw3Eu0elZKffMmA95MtyyMu4niUySpLlzHA
8PW7zRdccf8xVdb1r2RAlM59fxVn7H9pNaOCGgZc7WS8FsX9aPaTlkkX9mqW
zamFmbO4/iMNz6g24O+3Gz6vOkWidIujLvbN+HtP8sUzcH/bLmvmEdfGgHRB
s9hQaxK9/WrlW9XBgOdZx1edt8T1XH06aJzJAOd91x8dMcf9PtoxQpzDAI1N
NirKZiSyt3GNM3rHAMvkuFYR3D+/bPFI8u5jwJnWCgMdQxIFfL+anjWI869c
WmjBgERqpy+l1w0zIF6nrasW8xfCMb1vhAH7h5HdLcz5O2zT/4wzgF30K1sf
s32SWbrkFwZYJ/s8WYJZcvFQuuYUzvcn6h7EAWzP+f3pVtMMWN2j9S0Mcwx9
T7r3Dwac2BWibojZSEsl/f4cA57aBxjuxP1+MVM+/cU8A2J+baJlG+P7rpBO
b/vLAKHOh5VrTbA/egTSVyzrhHQ/mshvU+y/m+NpIas7IUHr9rlqK9xfRgbT
MtZ2wtvbKwuUbEgUaspNq5HohNYLyk4p2J/a5fS0Hin8XPdbEj/29+ymhrS5
jZ2gW2x74NppnH/RtWnimzthWPuI6zCeJ67fX6dpyHdCxW8NPjMcL9nTxWkW
ip1gR2+RrrbH8SZy064odYLVM+LzRRz/hB1pafEqnTDU8sPACLNJUkJasWon
yPjmW27CXHc+NG1cE59/NjC7C88jf7p/2nLtThDNyBx4gXm31pU0eb1O2Oh6
gB2NeSLzQpqBfif0vnGIdMact8IhzdGwE8zv/pnUwXz2qk1a8KFO0N+xjVJ2
FfeTnuNp6Uc7Ye2ayO1rcP4yDA6mVZl0gon7lqGruF7uFOmmdZt1gtFe67EO
fxIZrNVI+2nRCZeEWPtVbuD6CNqRttamE+7fjhm9cxP3M1OptBNnsL95arYe
CCPRtvLVaV4OnfBVZg9Ki8DzZtPKtDjnTlC7MfnkRxSux++/UpsudsInC0W3
J7EkEjo9lTrq3gl/DuQb/sP13kCMpi693AkqUR89bPB8DNkxkCrn3QlVn9RH
ixNItC+Jnap/rRMEBg5QeXH/mF5oS7X37wSz/ZTKi1l4Hp+npQbd6AR65a2j
ZzCfp1enpgZ3AvGsJM4Ms4xWWWpFaCdsFbYMN8DcnVmYyonoBJ4xV5U9mB+s
yEmdvY39ofElRhGz8dWUVLHYTlj1czhtPealPfdTVeM7QVv5mOMqzLUG0amm
D3A8OfLdC3je+hXdSvVI6oQjb23sHj/H/Xnt9dSY/zrhzafYFNUSPL+CvFKf
puL8KaduInH/zBk5n9rwuBO6A499tnpDojOmZ1M/ZnUC+XHrwkg5ieibTFJl
n3QCv9yjr8tqsf5StQwPK+yEHOK/kDY8n/ccOO3x8XknRAhVaCXg/p3ufHH/
09f4PlwrsQ1NJDLzuawoUNEJh3VZewZa8LyP8BP1qO4EEb8TN7Pacf0k3fzd
XtcJSWG2404MEl3KjxjeRXRCdahYsBye19JvY1sf1HeCetfIL1887xgNCa9n
mjpB47h1XwjmcG7KY+s2nO+qgQ5xmDXHs6LKOzrh6U2r0P8wT8w9ubye1QmS
ez4eyMH8eOVL2xucTnhusz27GPMJqbcH+t91woXhLZlvMS/dUasE/djebpYO
BXOFDm1N9lAn3EnQa1L7TiJ3k9YF3o+dYBB+5sKWHzieZ5kjLmOdoGckOiP2
m0RMz3f0holOeHxC33PJIokig4fKt012QtQ5p65JHhrae28sK+Y7zoeEi9t6
l9JQZskPb9M5fF6r+H8lgjRkQV2wK5nH+ZZX9ypFlIaWM/kOiv3D+bntcGXo
WhqqHBbY6cvLBPukkucXJWnIY2a1BGcZEzYo/I03laYh2aXrefauZMIBsaNn
1WVpiLVW9lOKIBPqowlJCXkailJQZM6LMEEm/hP5W5GGtDV3Vp9dw4Q16768
TthLQ5OH9uQhcSbEvnKQLsecfVL37mYpJrgUfJHqxWx10dAvfCMTMmYSSv5i
XhFg7DAiywSdFIv+zftoqPqO+ZHD8kzQ+29HthFmr1Tb3c8UmZD+deOCK2a5
IgepVTuY4JS+fTIaM7valc9zJxMSDqb6Ohyhoeg2zy/03Uz496K/rfQYDen2
+7JV9zDB8cCw6jIzGsr5G/ZkVocJar+qVzyxpqErBzKPBR1lAsVn948BZxqS
tyjQGDBhgpLP3yAlVxriOj/fqH+CCdOO/SuvXaKhGJ/Xy3MsmVBzqT2tzoOG
9kdUT/GdZII+kanGf4WGvicR3edPMyGexegw9aGhvPxmauNZJtx8vvPqQz8a
sn3LKNzuxISclyiAGk5Dqxq5ibEuTHibevPsIuY67kDQ1wtMuHJMsHNvBA15
j4+cN3NnQhvVvcsHs8LvL6avvJjQsJh24QXm7pWzWmu8meD8Lz1mHHOc1Lzs
tWtMyG7w0pOLpCHYwSvA9WfCLcvVIXaYp3VWzuwNYsIflZqAP0E0VGAi2pd6
iwmbea9QnG/QkMx0AI0IY8Jxt486owE09N9/H4onIpmwidn2+JI/9u/w25va
cfh7Kj/WXblGQzzRsq7O97C9L1Yqz+D7+qvEmMYkMGHjrsZtft40dMn/7Kae
ZCaU3dDj3LhMQ8MbG/l507E/bH9G/fWkodOk6rftmUzwYZyUCcX+ZF5M7TbP
YYL0cY90PncaMhZeSg3IZ4Kr4JklUdj/RJnns+ynTAj0unJ8xUUa0jnFfdBc
xASDkn8p9fY09PqvfuD3F0y4WhakutqBhpTzCp3XlzIhtHqf0xnMeUfXHjvw
BtvbpKn8BPPGqZvqlyqYcKjH58F3zI+SxjY8qGbC/Ldv93UcaUhY23xpZR3O
L8EXSpGYowarvgxRmSCgUmRPx/wvQp69op4J5y3GlSWc8P2V4mtVm5jw6Znw
+Et9GvrW8SvftpUJr++J/JrG+XrxmlN8CJ0J8o+C6jTVaei9VKvf005cT1t3
md1Qxvc/n3F4jovr5YoTbfkmGiqbN/r030dcn7fK+RRxvStnv+hEYzgfAvYs
u4r7Q94hyaqxCSbs4iPbq3/ifvclNEdkkglyq+zO8n8jUdKDzzFa35lgY5tU
ZvmJRIJa1j4Os0zg++XAzBrG/aWvzu72Lyasvz9TNtmL9/PQbUYv/2B/TF6w
kcd62U8xQZm7yATttzdmgjFPts2v/cfDgl0ZqdvfYb7gfX5x61IWKBfQ5tSq
8b4g0TFiyo+f0387xmG2rd1L9xNgwT5xbecRzAznnLcZQiwwCY5c0Ksh0dEV
gpkNoixwWt636xFm4vm125NrWBD2Qm/hK2Zty8HL4hIsYBT29e//j0Slc0ds
90uxYKvTTyUtPF93ZJTqu25kgXl6gaUq1tfSnyJXv93Cgp+PfRUU8LxPip/6
3b+VBUPBP+myWC8IapwaXqbEgpci2003emI9FqxcZq3KgtU7M9slHfB95R+l
3VRnQdDCcLuELb5v87/wfE0WJHZzciWw/nS9fMmjfR8LAl4Emkli/TawlmX1
Q5cFMkLPGeux3rSp0tXbqM+CNPYLRWldEnU4FCgcNGRB0nLVk5v24H1+maiw
5yEWHCl9uldYGO+7hQE/k46yIJ9rFHINs9rcdCPPcRaoTNkvGcGcf9AjxeME
C/T/61hhJYL1Z+KIW7clCwY6Hj0iMMcM2esanWTBspTXhaqiWN+odAuVnGZB
5fS2gxmYL98wH9xgj/3RN3N+1Wq8PzS1lNx2YkHNyXVC/pitxI3CZlxwvJQC
fbbxYf1yrtbS4SILTrP8Ch7yYL3ySlOh1Z0FZlrfxnj/EkjGZHtTjjcLyg+K
5/XPEWgsVFjYIoQF7w4b/0j8/993d9werA1ngV5w+9slXwjUJr3k1fbbLOB/
dTHm8icC7XcLDHsYwwIya/eV/lEClZTPWC6JZ0F0SqrrsY8EklvmqeD5gAU5
E74+le8J9NBi9Gd3EgtsemJeDbEItCLLockomQXdTqKG9l0ECvzanVKShv2d
PnSyF/MXbQt36UwWZMXMT51kE8ghulU3OocFozucVnVhZrKNhGfzWeAZsrrQ
jEMgoy11gw7PWKARLdjWgvntFa1XrcUsOGBocfUgl0Db60rCtEpY0PZgKsVr
gEDpq5SscstYILjMIdJ3iEDCp3IVRMpZEDpsejdgmEAhBdK/AqtY8FTfpfMm
vs/MzMOm0VoWeEvLnwjF9+2Oj3avo7FgetXw38gJAuXQPF95Mlngd/C4bNQ0
gdaKjYW9Y+P78m3WjZgl0G0HR6uD71hQ4GqSGPqTQB5/LH5JD+F4R678FfCH
QAOH25qiP7Cg6UnrXsUlJDJ/eDB1dhTHsy0suAwzbbjO3XGCBVNGAgbAi/WN
6l69tq8sEBBzDm/B/PTmK+G931ngrx5jYI3jv6FVaSh3Fufbs7Bbg5jjJfNe
icyxwN7nmPalpSTicd0YfmOeBewHH72nMXuXPbIa+8sCVtG102lrSDTCI7rV
krcL6n5rOG+WwPVveudX3bIuWBhItCuQIlFLGm+z0sou+EmzOKgkg/U9f7vV
Hfku6I71T96ijev101OFasUueLo0Zs05PRK1tUb8/KLUBZOtepnZ+iTie+HY
KLOzC9zqQzYN4nrTvq+bfGJ3F5j3HkUbTmB7vCUvhWl0gaPbbvdizM+sZve9
1uoCzdWyWbq4fiXXF/dK7O+C4wVi+XYWWL/N3y4+eqAL4pLEr01gvt1/7uYN
oy54lLqZ7o/3zzoEps8Pd4FnhXrJcrx//czesGnQuAvSo+RYDng/6VKKdS44
2QXPvO34hfD+YWJ69AoZ0wUVU3PjqW9JFKGqcODHXXw+M2OjFtbD1WJLxBQf
dMFEznk2E/P0bN+wbRK+v9NxUa8KEilxK8pi/uuCPdM2RQdbSbTCcdsv87wu
EC6gCckMkEjfYGlT+JMumHu9b2cn7t/X5YeS3xR2QWQ/n0z4GIlGx//TXv+q
C6SvR7h/wP1fptVn1bHXXSB3Rqf5Adab1s/N+oLKu6C4Rv/n/j84P67yBw/V
4vdvaNc95KOhBcsPpmLULlj7afspWEFD6ppokxGtCx42HKaMYX3pJpn27Vpj
FziMnPoXvxrrqT9+1Cct2H7dpcu0FGiop88i4V17F5y3NlIYxrwa7Ty3qrML
BFMCibitNBQSPrr0MrcLkrObfYawfqw4T7CzerogxHX49p1tNDR1OKOA2d8F
wTbfJdW209BWpcDrS9/j86/+3NqD2V7Q5ojmxy4gyr+/ClXC83py9/qLY11w
Z7WP6BU1GmpnCE2kTHRBZa9ZXaAGDS0t+1TV+rULolu18yM0sR58WB+7+K0L
jhD+bXex/swSS7TaNIvtubSLN06bhvjuO2488KsLYvyib93RpaGWmPkXEYtd
IG8nax6G57ltyG7mKgE22At+NnPHerNm8W+qihAb2iz+EOeMaWjTjbZzZqJs
mNxfFmxnQkNhcynKV9ewwfdnzw0LUxoavXbhR4I4fr7OpqYC60/jGY261+vZ
cDJCQs/NhoaeX+G9zZFmw6vr2TobTtKQr/tjSaktbICvwqU3bLHeG3d7r7OV
DVcuT2/fcQrrH9e9hWe3syHZL2NTD+aMD8t8bimzoZB3TWL0aRridWLpZO9i
w+s1JyI07WjIdSBrKamGn6/37c+3oKFmO6/2j3vYMB1v4nnGHOuLdzqPlu9j
w6no0ediJ2jovs1Kh226bBDkMhqbsP2zLI6iMbAhe2y2NPg4DZ00z/vmbsAG
iYjeyxr4vjImEPbyCBuq6Ez7zKP4Pgeu5Wta4/OvHF/tY0RDosjAy9aWDS+o
ejGKhvh+uqJagXZsuJRA6+o9gO9X2f8vzR77M9fx+z3sb12toqZaJ2xP49yU
IeB4vfZ/MOjChuDC16yZPTheaodOL7nIhnV35EoLcXxdX67ZssWdDX9XHxZ0
0sLxU37/2ciLDboH5YbFcbx3Fr547XqVDSy51+ptmB8oBt2M9mVDbeECTyjW
Z7N5Rw8VXse/75s/ugfng62chEhbIBsSK18Jf8Jck/mR+/UmG0L0ZczSdXC8
N5ZmiYSyQcXNb+aWCo536q1LuyPYMOshkww7cLwljqtZ3maD1jUrzX84v40f
Ss37xuD3ixI76nA9PBcbJx/dxf6nnHUOxvuVr1C4dU8i9ldPvu8i1n/dMSdk
Fh6xoe6SxGzNRhzvFTJjG1PZ8MV/tWfQBhxfvkp/pyw2rDyXeWxeHN8/JOpA
eC4bFhz2vKrC+17zoqVAfgGOx6ilaKAYju+NzayGZ2x4czbx4j68H96fm0wb
L2aDNV2tbk4I3/9ajYtACRs65oWFKlbh+M7cUVEuY4NJ0CmBO39JVHXl5M/j
b9mwLdlH3vAf7i+T8uhyJRukp5dXLmAOWsN7lV3Dhr7a+171eF99t3dQToeC
81eE5/bdJTSkaV/TlUWy4cCoFa81Lw0lhadELW9kwweDe0MbcP+Zfuq316OF
DXIKLzcPYzajW050trMh/8Ey8a+4fxXPqKZrdeJ42c9vd50hkcB6YdPHXWxo
CFPYM4j73cX9n//xdrNBoDBL23aSRPXnml5d7GWDp4SzdudnEoW8CFunMcyG
0YSYHeQoiX4Z/uprmcL191GTVdCH9dClrnjVGTaUBo6WbOrBejP+lf6jn2yg
vtsek8wlkdc79zynRTYsrrq8M4ZJoo9eQ+5zAhyQCN6973Ij1rcpzX8UtnJA
b6Xd/jclJNqJCopjt3Pg7DvZ7VXPSRT7Mdz+uzIHKvNfyqFCEh3atZ+oUefA
GwUBg+Y8EtXQSu9YHuBAWX3o7oFkEklN3NOpNOLA5q/3Ez48xP1exPOrzBEO
6NiPLfuUgOePhnFmxDEO9Bp93vQ45P9/vqloPmHKAd+9ZofcQkl0/9ZSvhMW
HAh7Nd6uGYb1bN7712+sOcBTUv6WNxzPx6k0ydAzHLDT+1mUHEGi5esCWkYd
OKDVdr7COZJELto2QSbnOBA+JLBVOQrrcwf1naWuHDgUODI7i1k2UnRIwo0D
moqnBiXwecGFXx/c9OTAybSf325je3o7Wgw/XOFAjHjNs1+3SPRIKvLJi+sc
iJK9PssOJtEsOJ9ae4MD7kc5t40wm5+HVYHBHOhq/VhZehPr9ZLfXgcjsX+9
BP7cDSKRG5sjWxSN/fFv84p5rO8b/5QxReM4cGPtp9cXMMvLPojwu8cBjnfP
P1YgicIOemn2JXAgMZF/AjDn/Xs+xv+IAz/vTbi/CcC/r/yarJ7Cgb1W1lov
fEg04aNi7JDOgfqDZw5d/v++sNNzPiaTAwN6hs27rpFo13hx8dscDoTqClCm
MFvkfDk7nM+B0gOvlF7i+f+fuAdlXzEHqh0y7ZT9cb0wiq6ef8mB+/6jmycw
98V8lntQyoHv/wmdeYLP/2e0o6vmDQfk7qzcNYHvK/fPLXK8ggMrkJLUOewv
o8pCzbU1+Pc8Ox16sT8v+EyMAeKAOt3gpwWOZ/HYJeP/6jlg6ua6RR/Hi579
bJ5o4kCuEL3iDY7Pd7tPxZOt2D6oyVGKxvqPcVHkEJMDH78p+4rFkohacaFr
doADvDINQj14n/ro/SRSdpgD1trHDxnj/FquMqZpMsKBR5ORtZWJJNo+tnX8
+jgHXJ+Jrk/A+5hJtmtK7mecXzt8zlnjfPWyKzDumOTgffW5jGQKiR6sG53/
8x3nRx4y7sHMuXPe3mIO39/Z/ceZNBLNGeaLBM9zIH5hqe/GdKw//36kPPvL
gcILfuf6Me+vkPdmL+HC+t88bzZhdvR22bJkGRecVr2ov405XDmvS3kFF6zf
bHOcwlww+iHSdhUXGp7zeds8JtHn0+fGX67mwvS86+otGSQSXpeb0ruWC2ec
WzKjMat2DBvzS3LhQ6vV86+Y/Qydn9vLcMFHrefg20wSJS9m28ds5sLcVzbj
/39+Wl3+XuStPBfCzvzsCcLMo+zkLbSDCzsDYj0PZOP4jWZt2beTC6K/NGdz
MB/MGupy2c0FacGlv/lycH86LRt1X4MLvM7NRrgRopi1jlo1WlxQT9K4lozf
L6Znjo9pc2GPoMnaM/j9jujBlDX7ucDfIiK3KZdEaxftF9yMuCAmkX4nF/cL
zfKM548Oc8G8wOWDSz6JTl0dsCeMuXD6xrsihQLcj3fIiE4ex9979Gd4BHPG
yFnqenMuPGg8XL0P+4ua+dj7oBUXduRNa7xKxfE/1b/l6kls342E4G04Xtvp
Z6KazmJ/9SRHiD/C/Uq1WHavE/592TFLjyQSOSfMVz1x4UKeS/AYFedLuk3q
VJQ7jleFi6PHPRJVVHy689OLC0EnJA9S75KILbVP3tWbC24006l1cTgeg1zb
gwFcUDF9m1iH83PHAcWZ10FceCetHCN2G+/LuX535UO48JKn09b1//1oWYNi
UjgXtE5+qKTieg+9sI7gu82FK/oTnYm4P2Q0u5zxieGCZfSt/edxPVXteP1z
+C4XRnfm/tvz/34zZbGDSOKCRPLDW2xcX6IWOfW7k7lQetplfx6uL5XX3x2y
07jw5wbV3Bv3M2PxA39EM7mAwr1PTlzH+7///aSQHC70/r0R+QDXe3jP4M5v
+Th/0Jtze3E/yNLd1ezwjAtG6+N/DeB+8o6Hvri/hAvrXo7t33EV7w/OG5Nf
lHGh+NOxacZlEonVe6jJlHNhUYlz2s8L19OdVRcWa7nQc87uGMUd58vn00s8
qVwY2Xie5eJGosjjhWl9NC7kEGtEV14iUc7L33tMmriwyaiO7/kFvK+sPsqo
buVCZMWK/BOuJOrxSXbb0cGFrIltVz6fwfOOPbY0jckFPenTO6vP4nzaq5Up
wOGCgrW+fow9rofUqH2B77hg8bA339aBRMcX2KxPfVyo79vhsPX//97AXsHr
1BAXQnfs9pjBHEXxXdH8AddD6Oc25ESiXDlazt4xLrQPnA6NdSYRJWKN3tMJ
/Hz1Y9HPdrj/jTpzJSZx/fpP0BZOk+j3kdKrt79zgbHriqAwZvGiJYK/ZrlA
X3SYlTmF55mQeYHrHBe+/am+scuWRGaXs/Q581xQehaRCydJFK0O197wdkNR
A3+XvTXu7w/jRRSWd4PQE2qfJ97XqL/6nyWt7AbHmdbIILzPDZxSMVoq1A0R
01s6YvC+96c6aMBHtBum9tdVJOP9UEKmzf/Dmm5YuOFhWID3R42QDWssJbrB
vPL7+TIzvC8Ouz0npLrhtssmQ4opiTyNqg6ryXT/rwIzj8eqbeK4JPUgJI+k
RYusJVki24RQSkkSSiEtlihblCyR5FGSlITKviUtlCWHnFuikKXu+2yVpVSS
oo3SO++f389trjPXzG9mrgHdkVe366zHes7/p/fGYj40Zw2V/kXOn+EcPmsZ
H6ZofHZs3dBINHoXykWr8iFKKWfbJZtG4vXTH+UjGnxY+9+MHLeNjcRvTeuN
biv5YL5H0VJ9UyMxN/nSQLs2HxKuv1szirx6dCASVvNBZot7dI0tzp/tegq3
1vDBcWS3j4hVI3HVPqRU0oQPj5wP8MUtsZ633Df1W8uHEzOz+2TWNRLBNmv2
rrDmg6bEkbeK5qgX62PfEm34sNwmnl1mhv3esub0kC0fyj/5hmrgvp0GJqUl
Dnzo/Xntip4p+mscYSruxAd6xydFQ9zP1QyJDu+dfPj5cbqNqTHu3/pCe1t2
80Ep7O4ccyOsP12zb2oefIA+SLDE/X6q9snTZ/bxYbwk5Or6Naj3lY1z3x/k
g3ZK41WdVbj/LxcpXe/Lh4U3W8Z/IrNqlqaF/nwYPjZ++6F2I6GsEtcxPZAP
xb/tG6J1cN4oPfY4EMKHLdrdqpa62I8VN5xWPsEHuyo7oRY97Meyth25CXy4
uCQ3od8A62nSweNGHh+uhtYVv8f73J5IHRMq4kNG+DWnAkA9/HwR51bKh8LW
fldPvP9/o04linf5kLUlPIDB+HSPXDGJrORD9jm3mKMYv/nDVDtXhfFpzhEy
tGgkygZ3jWXW8+HjkvN/ajHe3wcy4/408qHCfM2JE5gP6OPkXR/zodRZZJsJ
5iv+tWJJbQsfeg58ifiN3MG6mcxv44PqIaEpNdaYf/pG+/HnqG+vVYJQ1JMH
v9ed7uaDUfL9Pz2o1+KepWOGfD50vmzuskK9j3Z6xqXTfKgtaquudGwkjDvy
5Mc51ONfnfJlWE+xz94WO/fyIfp+2L0UrEe55oPt8u/5oLvB7L0v1rPBQ1/5
y9/58H1B1lRZ7DfR1TeLv//C7/fW+R33bSRa7g8bO/5Bf2PdPr7BfiVTsbK9
QkgA/2XL+lljf9t557D7vyICEA6YFyr0//fWrdujQdMF8P1sxbt65KHSr6e6
xQQg3qhVHIX9O6IgqDhllgDiQltUJrF/J66RN66SFUBLjYj6Lezf6a01z7g5
AihLvZK6B/t3oeuePSLzBKApesZbCvt3xWfhL2oLBbB5ZldhHfKj6PyTWxYL
YKlXkEkHntcx20Y2WEkAi+MsG1qQubxPeekqArhp51FFIg/pJ+vXqwsgNz5C
tw55/Inuk4EVAujmB+rcR56xi+8ivkoAC/ueVt5CXhqlGOGoL4A5GrY215C1
ZBqlwg0FIOQV7HIJ2TR3/40bJgLYXd87nIjs0nyTHLIQwIvisNzQ8P/P/62O
MtYC+KAayjuEHDI09k7fRgAZepJeHsixEWlhrrYCuGbsmOWInCxtLB5jJ4AU
zeGdNv+fb9mvMgq3CeDJvXfRVfh+LNWN0WxzFID2qNrSgxjf6ibl+lFnATzc
XrVcDuPb7NSyda6rAIKY1KxG5BcfDvWZuglg02ki9DCe1xc+K9hzL8bPcXXN
fIz3iGSFaMJ+AQRsGN/XjDx53SntlpcA6tzEwwIx/hI6v9V6fAXQf6dt1edD
uJ/wrtWM+wtgWpTIFj7qRXWHhe2iQAHs/OS5owHnkd77t5xlCN7/92GHYs9G
wvx4wmGfMAH8HQu0SsF5YTdTUzg5XABPE2pXhOP88V0VvIw5ifbb1Blb7PfZ
YVN9A5IEoCze/GAE+2O5eMGfyxcw3i3W2wVYD3WZNkkPUwWwXX3Zuwasr6cr
hxf1pQlg+n+W/sVYn4KG5DszMgRwRbBg7ALW99tteus0r2G8978+E7MC3wMD
/J5t2QKoF6v/oa7ZSAiHhh8IyxPAwd9m7c+RpcUW/coqxL832i8duhL33YzG
BLJEAI7Ny2sWaDUSyzUPzP9QJoAL2antj5AN68XKpO6g/y3XbQ9g/7K2LwO9
CgEUwWY9cexfDv1bn7s8EECEcFZcGbJHyDePqBoBfJT6ZKOL3zs848pYXp0A
/GSvqT9H/yLSjeNaGwQQuz4o+RBy4vLXc76QAgiOmHXmH+T0upgiuWYBPC++
JpW3HOuht+Wpe5sAjtzXbKE0UN/qzrN/UgL4/OTm2Fp1vK+nxDl3DvUd05fb
oYbzJouY0foG9d2W2LEHWUQQEKM7IIATt8RDh1UbCfHZypOZgwKQiT92KRxZ
xlYQOn0I/340Pu7eUsz/6cTRw58F4Ll3UshTCfttA/hRXwXwacWPJzLLGgn1
ia+DFt8FUGsf+KYeWVsvf+/NX+jv8wBrP2WMl78zJ/dHAEol3yYUVFAfRRLO
UUIUVHMTk03IG/qIrvdTKUjzPWUXgN+3WxC4edt0CsRV4ecAzhenHcpPasUo
EDFT/EcS+7NbssBCWZKC0HDX67rYTw+2JtYlzaKgzlKDdkb9HJ62ds0vWQqE
90VVnsD5Hgqjdz3kKQg2na19Hd8Pp+86F+kpUpB8arbYG3z/5F9Vvkgvp+DR
lGATe9wHy3oEkpZaFNT/2qjgg/VXKXX2TJkOBYaGWZdPYn3UbVgrIq9PwUBi
EpWG+zUvZjQi2pAChWmX5P/ivvT0Yf6vDyYU2A8OzSvFfan7h3OQgxkFprmX
Djrhe7vfp95LZT0Fa/N72TJ8jw/lBfaf30jB1qFYUWfcl8ZeKe8Z30yBnPix
UGF8v/+eSwn22lOQLvxIpwR5qsNZh2fbKfCs3qMRXYX5MHaBwL0UXJR2OyXU
g/kImVnN7Kfg60/OmqExH+X1ulbeFGhafztY2dtImCmpqM89QoFz8rumfSP4
/t5N5Z4MokBUhpxq9APjn3ZWcegoBUdOmF2TnMR4S4zJEhF438/MSLk4SRy0
KkhSPUlBZW5feaQMSRyOchG7cIqCq3N2lG6aSxKh1TNPTcTj74UrMux1SCJy
rP6vZyLG48GPO3+Q4zSDjrUlUdCWFiVRqEsS5w6qfNNPofB90ly4VY8kspiz
H8TSKbikeLEoezVJ5MuZ7QvKpCDLQl7SRp8kyuzGXrHXKYg32FkxglyZUOBi
nYvxHdOaCLAliTrSpae8gILBbN9ZHvYk0TQ5006hhILHUnotW3aQRJtBQ0tM
GQUJco1qxrtIgi1VqXesoGDnY2FGej9JFB83MYx7gPngSp/meZNEiM22exU1
FEz/R/r8Gn+SkB6MKJR9REHONOEk11C0r7y4ZB2PgkPNF1s+haP9qeKMwGYK
9hjx+eHRJHHUoV4up5UCt297q8TiSGLd0hfnO9swX3T4gcsJJDHr60cx4U4K
NPaoDyxJIgmufsqpVT0UlNp/vmKajeclzfnrxqdAaoffJwr56O4VYedpCuYw
JZdDcvC8FRajBEfBkzcFabNy0b/fToc+v6FA9aDHSAly8ZVY982DFHR+l8nl
8tD+YDp94iMFSn9nCB3NR3v98u03hylYGv/wjmQB2os2tTNfKKBmHA/Ydwvv
101vkPhGgczlWzEBt/G8nC+NRj8p4BiXBxF3MT4B0019JijIvnhYNqEC7aV1
tFum0ND/5cLarCq059aX/hKhwWN1tXRBDdrf3K2sNoMGx67U6bcekoTFxgSF
eEkarsz28aptQHuF6xfvz6JhTb97d0MjSTCDFZLvZGloM57c18QjiaL7rfFy
8mh/oXtBy2P8ftwbYat5NAitTpx8+gTP2/4jPHghDcpJoRLtrXie0swfuYtp
2GLcvfpIF573dcmRbiUaNlnvL5nejec1GHycqkqDyKR/UCZyyPnN+3Q0aAh3
+5Ks3UMS5ns8X3lo0nDT78PUx8jM76SuBl0arM5ZDHx6gfatebZf9GkouZbj
EPUS7dNrHi8youH5ruPyMnz0x+u5mZ0pDeVpKtEn2tAfg3c1kWY0fL62tXTG
M4yP6B+9W+toOJqd7J+C/hb3yJRz1jQ01A6SC1rQPtA012QzDVttIpevwvtK
mzssPLQV75PgZ1qN8WCkvdMyHGhwSArrNyfx+2WpiRMuGH/l3iF7jKfFiRJR
jd00hI2ZbqEItN/UEOXiTsOHT+WW7nX4fYWX42c8abDpSOl4V4vffz8UVHWA
BoO51PAhzNfRB8KfB73xfieHc0cxn+tOy3vJ+9HATCopPkd9SDtq9lkfoSHA
J/jH7nI8T2md69EgGsYXNygNIRePOr/MP0rDySUzCkJRPyGP/Le+OEbDpK9N
hMgdtHe7aqkXTQP/Vb2GAurpn5bs+w6xNLxueW97A1lYt1gt6DTGO7CyVeUe
SUxk3r6akoD5Ohclloh6HZteNfPuWRq8eYn37FHfn47UR3aep8E4ecrMuVgf
b+nHX76k0CD64Y7kq+sk8fLWix6tdBrKtmTIe2eQRMdcztoukwaJ7/sXrUwn
ieaYgSr/6zTU76rvHr1MEtU7xjLL8mloWrrAIjyFJO42TEi1FdGQHbjoDyST
RKnG1JOfSmmQcbi3dyrWb9bfWfuX30V/LixYfQbr+7LXXP7GShrSNOfnbown
ifNdi2x8qmhQi/3ZMBP7QbyJam1CLQ1Sb1alvMJ+El2wUrOYoGFF+8357mEk
cWyW/vUnj9B/nV/CvcgBx01l3vNoSJGQtfI4RhKeW2y/qzyloXnRg1634yTh
WuVw0LqdBr+dZsavkB2X7qL2d9LQIZ7+dRf2py1n926K66Ghb9WjaRTy+h/e
dXl8zGffXn8j9MfMPUCLR9NQLF+6KBz9NWwNy+7naPBXDRetxftoXIuPWzqA
+fpWbL8G76v0z/mf5oM03GnLqArBeMwPvOzt8ZGGBatfbLyL8ZK0zt984wsN
53tnf1VLI4mvw41yipM0zHV+bjnzBkl8dGqNN53CgNh+vug6zFf/o85xVxEG
KkzOj4ZhPpnllO+J6QwMXZjy7y3Md8+lN1yGGAN1+u+n2KO+2oTe29XOZGCa
y7ykp8hN3iOPaGkGWgoGQqxQbw9M/+YrzGGA5pk7GqDebheKzjVUYEDpUo9t
OXKxjOR/zgsY+J4sdF0F9ZYT/u+f0EUMbKhq3JSFnPF2vn/aUgYWSig6yKL+
Uu2U3txXZiCyxG78JfaLc9Ua216qMZBhqG/kR+N8U9LhfV/OwJLRao2pvTj/
zhnqy2kxIOya3X1pkCSsuODHszYwYBRgLi26gEesGUlcEryJAcPyBO35Sjxi
uXDuCf4WBtxPKnVrafAIRdkavtE2BkasM8YttHmEjHKnzjVHBgZ7q74G2fOI
aQbvzwm7MODXFdk5hvxzg9CHfa4MPBaa9T5wG49gD2leX+7JADcrtdrfgUd0
RFpOJB1gIOfb6eAh5EfJuxxHvRnQlrM6cHA7j6jICbzt6MfAxcD2pD7kwooE
ieojDMQS3rwHPjwi6M/bUOtIjMeZav+ZJ3nEAanJruKTDGicybO7dppHuCz+
d6VkHAMdhlKvVp7lEWstLQa6ExmIz9ASsU3jEeJnr231SGdg2eIq/6NlPGIy
q7KUl8mA/yWZmsm7PGKk/Nl0tRsMiL5ZUhxbxSP6HvV7JOYyEN0kdM33OY94
0T3x8HMBAwXqgT4DyE/eyszdVsKAXMwpL9dOHlH7Uy2osowBfrv+lW7k7PlO
6icqGFhtFX62votHpGr6n3r9gIE2f0l7vW4eEb827rVFLQO1Z9euL0I+bp9p
VEAwwLu3Jqe8mUf4ed67JNbIwIoTJLO+iUe4h7R+OdSE8b76JuZ1I49wiO/d
9PwJA84OCgVHGzCfpdJT0zoYOD8x7JRbi/msU9k90YX+8kTeranmEQs7TKt2
v2Rg/hrmU9t9HiEy5uu/jGPAdqBj3487POLHtNiW+DcMqJh9fpFQziM+zLm6
bKifgaOST+sXYLxYtTtRWwYZ0NINX1pegvk0ekLf+ciAzgWrP2ZFPKLR9vVq
uc8MKGx7b9eVzyMq9/xIDvuK+tvq8is4nUcUHZH8xHxjICzwulcfckbMsvVr
fzEgZLhopt1VHpGUapyT8xvznSvoq0E+WbBtUlSIhdl3n35SzsD8V3k7e09l
IXffL/Vk5AOt0feeibJgWrvn6jiyC5smtUqMBbbyr+neTB6x6fMt74szWVhn
eiNSP5BHwJTHvB/SLIysiDA38uYR2rO5RTtlWfjcs2cxuPOIZcu+Ha+bw4LP
PfjHwolHyOtLvFw8j4XKtqQJqy2oFxfDs4OLWYiIyvm72QTvN+Xeu1nLWFiT
doYb0sV8Fa4wN1JlYUZoSlPCch7BfVv046wmC49jZO40zeMRlzLSt95fxcLV
gtMVnrN5xGYL2dLXuvh7g8YjYXEeIfrhrKiYAQs2SZL868I8ou78dHcdIxY4
W4OvpuM4v/Sja3aZsnDo45GKYzi/Nbnxf+PMWMh/lqTVjfw2NujwrXUstMQW
/l2O8z5LY7iFb80CX7p2ySlkx84Dy4Q3stBxpOUKgywZ9iZSYzMLtwu6PHXa
sX8p7qQctrIQfudlzBnkE03duhEOLKhfePGdQ9Y9tDmpYAcLbVYdD3U6SGJo
dvP7DhcWzPbASDj2v9xqs3Xjrix8dZJgVhaTxC73mqyl7iw0+/Iu92J/lZ2h
92uTJwvyF3tUUzNJ4mlZ2baQAyzs1so5Z43zzvj3jRlPDrHQmxbHL8F+P5Y9
b+/XwyzkTSutdY3Febch9eG8IMzntfRgqQjs95fjA/yOsbC9r3NfwBGS6DYR
fnb5BAtTw//NXOpDEon9x1UaolhwC1pW1O2J74f/vkV/iGFB57dUwqndJPF7
lT8z+zQLGlsd1652Iol7/MHVJgksHBv0ffp2K0n4Rnok7z/LQnv3mMEN3B+U
lJmPSedZGJNMKh9GZp5ut6pKwXwt5kcZ4T6Bfet67yUWXoh3FJ1G3qSwYUI8
nYVLbSEaXcg1B4zLd19noZjpMDiI+0aAZKVYfA4L01VjydvI6hUr993OZyF9
49vCceTenUUEVcRCk7WQ9Q5DkkgXXqogchO/P3POTzcjkrAvyghaUc7CKf6p
US9jkhCzk2t3vMtCqZOwYYAJzu/Mf2KLqljQHEorigKS0F4Xw3XWshByMrsz
bi1JfPjw2+A3wYLWCnXrRDOScDEY+bS5iYW0/rsyqRYkIfPKa33oExbMyyq8
0taRRMupvuwbT7F+5HQlrlqSxMnlrn9a2lkgv5uMZ1jhvO56sWOsk4Xz8Q46
WdY4b8Ps7ix4wcL6o2xt1nqcd4taJKwFWG9SJQ2pm0jC47HFgcMMC94mQgUU
soLfw4Yrr9C/OT/7FuI+1SmrP7+xl4VZWRdCPZATaspDhgZYMH7e7pmH/GtG
rgYMYfxNtNepbSaJ+hEqv+kzC371ytVHkOP4s5ZsHmXhQqrt7ipk2/r1mT3f
WajPURFo4X4mWxgp7zrOgvVrp3tLt5EElVSZ0v+HhZUfm2//60ASN45+kvSd
wsGDcqFO0e1Yb9Y7px2fwcHwnb3H3jqSxDfNC1HCEhxU/8kQ7sH9rlbuycQZ
KQ70bGNvPkI9bXi7+muaHAdNKbt8rrrge+mUzKtKJQ6eBG2NM0f9aRza4GKq
ysFTJYVveu4YL4eoHp4GB1MyndaGIj8wvm9nu5KD5uCKB1XIkUrDrd3aHMy7
pbV7HNlKYpn1rtUczNjQomXoQRISYzsf9a3hIM7ipFYYchd9wcTHhIPULCfX
+8jpjU8efF3LgaGL7f0xZPcSId1j6zhYZSHwSkd/VVP0b01Zj78H6e3JwfsN
H/NTP7ORA8fMuhslGI8Kj7w86S0cOHytX3UX4xduwyxKs+fg+42fktV2uK9o
z85QdORgRcTRNfUY744p0Rc0XTnoP2sQ0mKD79H392dWunEQ8eZYfBvqYffz
4XgTTw68tCbfPUf9KFUtE+EdwPOs6y92o94+Xt8VucmHg3cjDedemJPEnfiU
8S4/DnQHCl+8RP2GHm4J3hnAwbp4c3e+KUmA05QvvcEcyHqWDU9g/YiuNfD1
DuNAqG/9HB3c55+p+L/7Es6B8pFEPy/ki1L5HmFRHFyUDBvLQnb5wbBCsRwY
1EgWdSEvfjXbOf40B4pHbROn474/2GTTLfUffs9cL8vw//8PKIvecvkcB4Xz
mzhf5OBLD1oWXuDA99jZ1fPQX+OIz5b5qRzIML63/fA+U/crN6y4wsHY8Xtr
G/C+LbauxhUZHIz7dPTLbCCJHQtatckcDmIV1vvcRX0H1OYr9t5G+9aLR95j
Pgxy2XSvCg5ezFct0HUmib//ycp9ecCBWn7cl4id2O92npQQqudAM2CoSdqN
JLZZVJ0+3chB2f2apXkHsb40RoSlHnOw+NB2qU7k1zIqEZdaOMjtdlOZRC4Y
d/21oA3jO8z6qHmRxP8AJkT4Pw==
        "]]},
      Annotation[#, "Charting`Private`Tag$86853#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{-0.14628669061428093`, 
   0.48133040137602123`}, {-0.1705577346242651, 0.010191465668806306`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.8198034445293784`*^9, 3.8215146050030947`*^9, 3.821542882383358*^9, 
   3.8225555800160728`*^9, {3.8225556115846577`*^9, 3.822555619063655*^9}, {
   3.8225556925981073`*^9, 3.8225557019321446`*^9}, {3.822555738214141*^9, 
   3.8225558925462646`*^9}, {3.8225566160916104`*^9, 3.822556673278695*^9}, {
   3.8225570690135307`*^9, 3.8225571066390867`*^9}, 3.822557632522315*^9, 
   3.8225853472705793`*^9, {3.8225853803842306`*^9, 3.8225854256421704`*^9}, {
   3.822585611799341*^9, 3.8225856229973745`*^9}, 3.822586019110131*^9, 
   3.8225864861326675`*^9, {3.8225868521090775`*^9, 3.8225868632273707`*^9}, 
   3.8225869055920453`*^9, 3.8225869387533607`*^9, 3.822587419488449*^9, 
   3.822587462325887*^9, 3.822587517115361*^9, {3.822587587764443*^9, 
   3.822587609021572*^9}, {3.822587653824782*^9, 3.8225876872043056`*^9}, 
   3.8225931603889656`*^9, 3.8225932849234643`*^9, {3.8226345038938637`*^9, 
   3.822634513776434*^9}, 3.8226345718438773`*^9, 3.8226445046514463`*^9, 
   3.82264454875979*^9, {3.822644618061558*^9, 3.822644633580876*^9}, {
   3.822645146741465*^9, 3.822645181851208*^9}, 3.822665194443864*^9, 
   3.82266588611421*^9, {3.8226659973407516`*^9, 3.8226660170071573`*^9}, {
   3.822916578087105*^9, 3.8229166145416126`*^9}, 3.822916662908291*^9, 
   3.8229167141183376`*^9, 3.822916882639626*^9, 3.822916920580171*^9, 
   3.8229169899187355`*^9, 3.822917023892877*^9, 3.8229171808002524`*^9, {
   3.822917240406079*^9, 3.822917250200912*^9}, 3.822917303536251*^9, 
   3.822917344799898*^9, 3.8229173951193266`*^9, 3.822917524144292*^9, {
   3.8229175855960336`*^9, 3.8229176001541004`*^9}, {3.822917716546057*^9, 
   3.822917753131215*^9}, {3.822917933318511*^9, 3.822917963258442*^9}, {
   3.822918001412405*^9, 3.8229180307409706`*^9}, {3.822918061598447*^9, 
   3.822918132722237*^9}, {3.822918164068407*^9, 3.8229182141295257`*^9}, {
   3.8229183400577803`*^9, 3.822918352149561*^9}, {3.8229184287307286`*^9, 
   3.8229184424131365`*^9}, {3.8229186458756533`*^9, 
   3.8229186737999744`*^9}, {3.8230704081102157`*^9, 
   3.8230704215675955`*^9}, {3.823070486772138*^9, 3.8230705341711655`*^9}, {
   3.8230705764382553`*^9, 3.8230705973007603`*^9}, 3.8230837022069016`*^9, 
   3.8230837504652243`*^9, {3.823083999895061*^9, 3.8230840161223598`*^9}, 
   3.831803206274767*^9, 3.831803248273156*^9, {3.831803278581917*^9, 
   3.8318033318480215`*^9}, {3.831803460686459*^9, 3.831803556328517*^9}, 
   3.8318045511679306`*^9, 3.83180461646743*^9, 3.831804711844429*^9, 
   3.8318047673538933`*^9, {3.8318048574682245`*^9, 3.831804887256955*^9}, {
   3.831804924756407*^9, 3.8318049420554886`*^9}, 3.83180499562009*^9, {
   3.831805051274948*^9, 3.831805080407712*^9}, {3.831805114965923*^9, 
   3.831805142707274*^9}, 3.831808640388009*^9, {3.83206409322665*^9, 
   3.832064139044303*^9}, 3.8320641717382317`*^9, 3.8320642505475516`*^9, 
   3.832064318383456*^9, 3.8320643495751524`*^9, {3.8320647773756623`*^9, 
   3.832064800373431*^9}, 3.832064903572591*^9, 3.8477912845834208`*^9, 
   3.8513415541459446`*^9, 3.8513416741071053`*^9, {3.851341708730936*^9, 
   3.8513417313585825`*^9}, 3.8513417655682993`*^9, 3.851341795628669*^9, 
   3.851341840613058*^9, 3.8513419144732103`*^9, 3.85134201546*^9, 
   3.851342227574349*^9, 3.851342273905164*^9, 3.851342307224535*^9, 
   3.851342337899176*^9, 3.851342393751606*^9, {3.851342427855219*^9, 
   3.8513424433100204`*^9}, {3.851342512645342*^9, 3.8513425381864014`*^9}, 
   3.8513425738390884`*^9, 3.8513426398936553`*^9, 3.8513426701858044`*^9, 
   3.851342790203044*^9, {3.8513428327742195`*^9, 3.851342907047329*^9}, 
   3.851575940006257*^9, 3.851576421221033*^9, 3.8515765685903964`*^9, {
   3.8515769396989145`*^9, 3.8515769839604445`*^9}, 3.851577076220728*^9, 
   3.8515773571888876`*^9, 3.8515774558719997`*^9, 3.85157749333473*^9, {
   3.852972535846305*^9, 3.8529725858709073`*^9}, 3.8529726352546415`*^9, 
   3.852972677509247*^9, 3.8529727273592825`*^9, {3.8529728523667574`*^9, 
   3.8529728909104347`*^9}, 3.8529730385901146`*^9, {3.8529731040912075`*^9, 
   3.852973129566221*^9}, {3.8529733074521933`*^9, 3.852973333943157*^9}, 
   3.852973747796214*^9, 3.8533054293680887`*^9, 3.8533057698662624`*^9, 
   3.8533058884176517`*^9, 3.853305993856407*^9, 3.855477159197074*^9, 
   3.8554771910805984`*^9, 3.855477264265504*^9, {3.855477294421765*^9, 
   3.8554773183149967`*^9}, 3.855477350934482*^9, 3.855480297499581*^9},
 CellLabel->
  "Out[726]=",ExpressionUUID->"4eeede56-5405-453d-8180-6aae06a86d8a"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", \\\"0.04000858`\\\", \
\\\"}\\\"}]\\) lies outside the range of data in the interpolating function. \
Extrapolation will be used.\"",2,729,2,30695057089682616481,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{3.855477351180483*^9, 3.8554802977237453`*^9},
 CellLabel->
  "During evaluation of \
In[705]:=",ExpressionUUID->"1dc40e73-13be-467b-8daf-248d60d18b77"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjns0lAkYxqdcqtW6pIvsMA26sV1QbpW3QlSy0bFKi+rkNhqN21lFW1uY
rTFSS9o01EadplqxdvgwXswMDYaZaUwf5quOS6m0pdvGop394z3PH8/z+52X
eehoSPRMGo22S3//Z6bD/d82TOfCZGxGbZyaxAm2W8yoHx8Ywvj6ed0kptc0
uAj4fEjdEsbEDhLTdsg7pul5YMNxeb1IRmIiZ2CqecN5yFCMZMlrSFwb+ZVz
WUM+fHH6MOUqINFOuLHQceIi5MZGj2XHkThr6/UI97Qi2MYyc8+nkSiIlm5z
uHQNBjqfqQ8ve4RuTudEvoxyeJsjiuo/pMXqUNHukgu3IWlL4etLwh58fjep
LuXwH7D4kdWn+y81yD/95QQnuRLq3F4wWr01SJPxjYcH/gSvQwGyCd5DfOb5
ncMnfxF8eurrJR5U486K8VUPz9TC70Yhpaa71GhSn8D4+00dXHU+c9bnvgp3
tLVOalzE4JjuoLhjr8JJo9Cje1kIXUX2hotKlZjF7hma+6IJkoTSl4sXKHEH
+YG7Z3YLdCQ8na1x6cZNpp9tCZAAJ5O71NO5C1lUAY2dJIVb88e4094K1H67
jMzJk8EB9z7SKKYTOf7FN1DSCh4ZrgHaMx24fcAwOnKoDSS/xjb7Eu24OyDE
mm4jB7+ZfBH7mRzz/T2tV+xuB1GhFWGwRI7mbfPNryR2QHhZpcvGxAcottCM
O5Z3gnBa1Wj0VxsKddxeZpsC9ipt9lqbtaFyc49B7GAXNMhGDmcnt+I8D4ML
wyZKiFLTa8K7ZagzW1jcXqyEN6fsw+mbZLhRYc1AdxXINsyhd5ZJ0TPsyIM+
pQq09j+rUxZI8Xtm7ZHbUWrIqI1Y97hAgnNUH89xJ9RAFvWqRk0lqGtaVWbF
ewgZMnZN/6UWDDxRNaC00sA2Wu66xKUtuIexsvhylQboJc0ddhXNeGzGlSDL
rT1gZdO5x82vGd3kkxkCqgdWmyR71Wmb0FK1r6wvUQt5x704OSlNyC83eOc9
pQXj2xaekwuaUBBVSlQVPYK1glSjGfGIin3rM3uXk3DkbNq7bqIRCzzFtWZS
Et543PIJNmjEf4YvWLMjeqH6Cq+FFybG4+oDP54Y7YWU0FmT/uIGLChjBgm4
fZB12ifGj96AXSIdg2PVD07t1tUaXj2WFQ4tZN3sh8Dt06cyDOrRIvwxN2Wz
DgTvR0zmpNVhSaT6/RqlDj6L+lmOHwlUrfSQVKp1EC61nRp/R6DhR8FF1x4d
rEwrfSV/SyCLF+/s3qeDr5v3UaxRAt1raUe9h3QwPKPKsnKQQKXFmpeBn3Uw
uHysI0hNoIGM9zR+CQXmRkJWdwWBbvljFa/sKJg4eT1LeE/v2x92kr2UguAS
7UT2HT0/Zmeb5EiBr2z83023CLxqW7c/fR0F3g32wVUlej59RJsTQMFPQcb+
d/kExvsE3Zy9k4JVNNKBz9PvTavTzu2iICD0eWTiWQJnlp+cnxdCgeRF43Pn
bAK7VQtDCn+gQFEfHCjO1PeCTOaiKAqe/GI+9/pxvT9u4O3lgxTsH5+7Ijtd
75u+d/5qDAXF0sbUoFQ9L7eMso2nIIKRWu6arOcLj62+lkBBrk2sy2IOgesP
PJliJlKwHIu++cImMM7JT3GDo//P0PjgcAKB/wFDNYu8
        "]]},
      Annotation[#, "Charting`Private`Tag$87104#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0.5, 0, 0.5], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVz3s01AkUB3ChXa+oPJK17MhjsUrtmsmKK6tIhWVTVF7bVIRR0gunVtaz
EWV6YGxt1LJlpEz6zW/mtiUSMjPMxDQ/dTTSVsejN6H97R/33PM5937vOZcR
zwlja2tpaa2n6/+ead9w1mvmGKwsG3M9X4g4mczc/moVF7o7ExqdaB+4QS7j
c7nQWmaxs74AMT2ovWPGuhia7FN7RPmIKamD0/94HYeT/ovqlLmI7tEGS6vJ
EgjNKdhodBTRrm4Fz2XyBHTqRDTuz0D80u/8Vlb6aejVHt0RnITIZ7estj91
DoLCM5yK1iIyXQuF/rY1YJd7SWnihnh9gzC0qrQW3lb61K82QRy+vJtI21YP
5rpWDuajEuRmf85K3XMVsssE0W4yCWrd5X4xNHgNctO9T75skOAzzxD79wFC
OLJa81tcqQTXCibceo42g3mdtcR4rwQNRbtsR0YJ2BdZcSX+FwkGtbVO9S4T
Q9b7tNhRpgSnZm/gbEpEyF/TSLpaSTAnWaEx+vcWVBmzF5l/EmNQ39u8cL3b
gM77/dwHxOht/NHmJtwBaXnYo2mJGBOpMq3k3S0QZzDSmXlOjMrvHPtyi+9C
zZwfNznmiDE1oOIC3mmF17/mGhawxbhmUJcdrWkDxruI8/PXiDE0MMzK+ut2
+Gq6aWGUixhLAjytvg29D9dwaCLESIxz28zmlqd0QIJkQsgeI1E8r3fCpaYT
Htt8WuArJ7FOndfPaOsCx57yWSwhiVJfhc6Opw8gUbzSQVFO4vzlOqVDhlJo
W9w16J1FotrEouJ+hRSEcxoCyTgSV3RZ2SJLBoTZDZ6BP4meG5PuqaQyaOhj
ams7kRjBaE6qjZFDoPklpp4Rifqyd4V5k3IQvOVs0YyIUH3LrdqyqAdaKrTn
d/aIcF1W46DUshf2BqgMIm6KMNzWueJMYy/EO3TMiCpFeHBWebCpnwKCOB6P
HbNFyGyfyuBTCigQ3OPtYYvQVBZZrUpRQuuhgjm3gkTIrdF57TOthL8vDQ1f
dhchP+aPm42nH4JP06nsI2Yi7Ir0yOx36oOU4aHwkEkCyzzFzSYtfbAvjC3U
HyDww1CpVfLWfhh9rhzedpvAQ/LY/Vmv+qHUO9+96S96v5oRzM9Tge5r1pP3
xwh8IFTbplo+glqPYpZLGoHVPI1F4sVH4F+ytOtDJIHzogby0nzVYO/CKSV9
CKyKlr9ZIlWD77YQVZIDgTLn5XeuytXgbXbBaMqeQN13/BPfK9QgiB/wLaKd
WJSwlKVSw5jKUFC7iEBWsxbHR6OG4eV+fz5jECidt+TFuo9quFZnrYm1IVDn
btGThG8ouM7OV0QsIJBZMi54aUeBn6bb/5kFfW/zxsPJDhSsmvW5KZ22dNzO
ZrcLBXUWZlVl5gRW2hCbD/xAwfP6hb/LTen8gefK3EA6zztRHzyXwISfgi/q
raVg4afwFQMm9L7x9fTC9RRs/zzVkUxbu+awWXEYBVuezh4/Zkxgt8wijLeF
ArR883OHET3nZzIWxFDgtWd8JIo2c+fg2Jk4ClwTH3JfGNL3Zq4cr9xOwS6P
KJk+7e520xibBAqa9T6knzWg87yDi8/toiDzUIa1M22P2MfTjBT638LhlmZ9
Ane6ruq6kEpBjKcXJ5D2f2ZygDQ=
        "]]},
      Annotation[#, "Charting`Private`Tag$88411#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 1, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQXaOyYab1vx77riq1ysviR/YrrbKZqvVrEpzP7rQw
1rx0Opw/N/WIm8q0BXC+mXbXNhf5pXD+ltBtAfMmroTzn68p3FWcsg7O7236
X1tQtBHOZzjay/b00WY4/5mlv8o3921wvvf6n7qXm3fA+dy7s+Xfvd8F53sd
P/bnitFeOP8Pa2h+RNZ+OL8l9+oTnpcHEOpvfGkP5jgE59vy/ZDbaX8Yzs+6
O4Uht/AInH9NR+1GW99ROL/Affbi/YePwfmej1hS454ch/MDPIKkZGRPwvkT
3C2lNAJOwfkCx0UEZuWdhvP3Cl75qbX0DJy/6k77TcXjZ+H8Cw5XmdMfn4Pz
hSyYJz7lvgDn3+EXm31qNoJvc1ZKfr/5RTjfMjznxK0LCH6Y4o6clfGX4HzO
i1+72n8h+HcO6C6R6L4M5/vUbnp0QeIKnB8srzl7xiYEv5Jxlp+w01VEejj5
p3ruXQRf+GLkklt51xDxv5T5k91fBH9u/Pydm6Zfh/PPRprW3FS/AedPsdy7
g/8Igv/96USp3NibcH7VpYTy2jcI/pQlin5z22/B+ee23ZEvkLgN5y+Z+kQs
axmCLxh1r73Y4Q6cPy/u0mf9Cwg+89HuB5kKd+H8DG3Xs4sLEHwAAiWjug==

        "]]},
      Annotation[#, "Charting`Private`Tag$86947#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwV13k4Vev3AHCJoqKSDCkkQ4hCUqKVWZQrXEOSG7nKVfqmqC6VaEKDBg2X
xrPPwTnKPGeZMoWM5+x9BiKkMjegUr/9++s8n+d9nr3fs9Z613r36oAwtyBx
MTExhTliYv//20S5JPWeZoDej+UOmTUC9J7Sa61OYMC752lyJ8sF+E5+/mJm
CgNKd3X8a18kwO9/YGJIOQPqd45rj7IFuLZ2/eXPcwjwcd3x9uAtAcblLDkr
eYUA58ORPQsDBWiR0B6qe5cJJ35VL5aSFCDbwtPxf7lpMBCtuply5+OipBsK
A/aZsJIvGv2fOIVRdesbfGuzoDL46lPf9zw0ZWk/iO/OgSobjuVYLxdf/C6I
0NfMh8oht7+i+F04ylma8cO6ENpkRoiX45042i75wfJ6MdRePTs7MtOB2T7S
pa9aS8HGNof9enEHbjHlvYv69BJcDrsJ2szbsdJWbVGHcgVsHW4Nm+fVhg7K
RbvP6lWCb8Kg3JG4Vlz/kPyrxbQKTnYbpf4+/gYje16d4HpVQ1RNVEzA62bU
cFbaFPF3DdhFGetYWDehQbjZz5aEVzA7IqNW9l8jPnDuTmhk18ILgx0bQyUb
8JDLx1q/ojqwclFeb3m7Du/LVM/PENTD8ztx/GyZWtSfEvty9VMDFF8xy3XM
rEHV1IWDenKv4U2c3S7z7dV47HPqkxCTJlCV1ur2H6pE3eN3pKytmqFwJDma
m1uB27N9TrQHtYB+Qd0Ol8lyLFaKvfo94g04znp/a20uQ2elB4UBVq1QcXn1
kO+lEjwk7sNmtLdCeK+rYoV5ERbFNB433tMG0kYRPN39BWjmr1G5cqQNUr41
T3y+m4fv5bcd845uh3pOGRT9yMF6/0UzPXM7wEDXji91Pxv5UpXiNXc6YOMx
TWHJtixc5bC27/OqTgjWTLuzcPtzTPJz1z7xrBPGVQK+aLlx8MCzsNQiohMs
Tv/hGuDEwU0fEuR/sjpBLwMbn1pzUHi8RjyW0wkz0/uUNphwUDvRtOdGfifM
SRq2vC/PwZISxXucuk6otHpZyyLZ+E5RKN3/qRPkd71WaT7ARtP2AyNuG7vg
7ztdawwTM3BvH+9W2KYuYGv25OhdzMC4SSfzxM1d0Per55L+uQxslzO69Mqi
C+KVrRMtjmfgUfdZ9c12XaAc79ybszcDMzrveKzy7ILW7IZsRcMMVOfVlr6P
7IJli61zyzvScYFwbXxUaRekb+eRuXrpuNi2I13chQvZwckN1oMslChKm9By
5YJn67sjwl4WTuuf2bLDjQtO+W9zIkUs7Fum23DdkwvLUHJZbicLC96dGVrp
zwW/EtUIu2oW7o3V0zE7yoV/2rSfyz9hYUZVDOOfm1y4nTczLO3PQjurDY86
uVyQPLbVI+odEx/U3Fs3QnJhsEqidqiHieMOc0okBVz4ZeZ4zFvIxBSX9s5N
PVw4+T3uL4cuJk76Hl9w/z0XwoT9ad51THwYUXTCb5oLC+It9XhsJk6zt+8c
VOZB0byTfJVIJrqsT6d+qfAgUDng6odwJj7LWRqsqMqDp29HnxQfpdeL+2Ic
NXjwauKWUUAIE4nauMIMPR5srJNs7/RjoltvvUbYVh6sfBNc4GPHRI7C7pmp
vTxIasrwnVjOxNMmr6Yt/XlQXeAfwpVj4g7XLdOx+3lg4ZtTiYuZOHhl9dTi
v3mwKzTH/pE0E9VmJ77ohPFguzUkRM8SePPdzXGvGB5c33q19cYAgSezOt8X
EjzQ8CUGbhYSaN/s+H6WxYOur9l6jXkELv9YNmiTwYOdc3f/kMwhMGcNMfDm
OQ8CCu5tTeAQ+Cn5xLv3hTxofG+q1vSEwH3RCj2KjTwY15oIFSUSaOvkzY0c
5UFwRSnzVhCBwUZrJO+O80Bf533w34EExiuNmhRM8qBDveSN5X4CWwdjk758
48Exu9mk73sJ9It9sfN/v3nAjiwj2R4ERpTNqw5ZQkK+Q7P5sC2B95+1TVyR
I+HijOcXKRsCy+JT1NPlSRCahO/QsyJQ3Mf4zHslEvSXfH912pLA61/9thxY
TUKwf9W2sE0Ephnmv/AzJqG6ZIXe7FoCXy8/1x21kYTPDkG/vHUIHP3pJJOy
iQS3XImHeVoEbnz9NoRvTkLxtyPyTzQIrAxepO1lQ4JTZXNF2UoC+114HhF2
JKSsiJhxVSFQatPT2DsOJPBePrjwUZlAF4nNvR3OJPy4L/OfgSKB/MeBKa4e
JIzd7W35vJTA2UuGr8M8Sag0+eWeu4RA9bCZmWveJKjvD5M7vZiOn+V1r+a9
JBxMC/mgKEPgF6pEzimIhBW3VgfelSJQsfKC1aFg+v90z2fGzifQPM316OVD
JETO/eCbMI/AcxGDzbWHSeBkvtZ9JkGgzDK5KzYRJGQ7DqSMi9HxuDWke+Mk
CeOHkyWnfjPQVh4bhadJuHCu31uMdtTy0EURZ0lQqN5YrjLLQKVk68yqGBKo
0bI3Bj8ZmKeg7LI4joQesZd1Nj8YOKxYez3tMgkTGZwezgwDL99L2fA1noRV
VRGnPk4zUFM5vM3qKgkepWp6hrT3rlBfJkii8ydWyq37xsCmlaeTZf4joQVS
k2y/MPBgqqvZnlQSApmJy3M/M1BCVYdkPiKB1axdqUPbQq1TeTuDBLFDyaZr
JhlIPsooSWSSwAiZ0smYYOBx9RhfKo2EZg0ZazPa7NWGqccySfhldWEqcJyB
9k8ltuELEoYeb707l3afhqB7YQ4J6TvED6aPMfDMs+yz3nkk3P5j7qI9tFdo
XlYnCkio+cf23mraBYx9lRNFJIifzj81NMpANy3TgG2lJNh6FAxn047X7nvG
Q3p/lj8v76StzSqy1awiIdFsQe4q2lU61weO1pBwb63h0YkRBu5LC7r4spYE
ba+3FXW0v6+10FnQQMK/nJPEY9rJ6XL1nq9JONztoRpF21jvw8FnzSR8C+Dq
76HdkoHS429ImB+a37SN9iH95AyLdjq/2r1fTGlLcEKdr3SSMMN4qb2B9uN1
NsNdXBKs50L4etoWmcpXNSgSfD3jhSa0SYNxgzABnc/hxgOWtI8/r20pFdH1
K2sgu5P2kvWpYVJvSfA/UcD3p815Eb7kzz4Szn1f1XyStuMGp+wn/fT7R46/
T6bdn6XuNjpIwgMD8XUltM8ZTU2afyAhyV01tY/2ypzmW5c+kXA1jb10MR2f
ImPGxs4R+nkLgpcAbY/c013q4yR4a2aT4bTHTXZHHJ4kYW9XTmgmbR3TX4Xz
pkg4kXFXbD2dn6r8Tm/3GRJcbmdJRNLet4k98+gHvX/LVFE17e8FMQ+GZ0nI
80wxWU7nP9nMe+sWMQrOnIuePknbuMhQeEGcgtePQ/26abdsloxul6DgzpXP
8+zpeppnnlP+jzQFZmST3kq6/sQbVYjMhRSwqfTUy7R/+1xIGJOhIMymxHqK
9vQpb+9wOQpmL5BaArp+v0pXbcuXp4AVpR3kStf75H19rSkFCi6d6I+oo/2p
+NfEaRUK9plHh7R8ZeDQjoNk2SoKBgLG+z3p89JPtZX/UqNA9odOyDva3TOM
hPOaFIg9UEiRos9X6xZnrXgDCp4ZMDpjvzOwuSFvYdN6Cop9RPx19Hlt9FGd
lDGmIPJj5BBFu/rURHnSJtouynxT+rwXFN/1vg8UPHzI26JA94v/tvQnpO2m
YEvTfLskur/ca9h17KM7Bfs/rF8fSvef2z6F3us8KbCyejrrSPena6fitbL2
UNDlJrNDagHdj4o3YGEgBdFW7guYdD/7e0v0ZO0Jev1AhP6j5QQGNAySUicp
6L4etDRLgUB/H1d0Ok0B9c2ypZrun96n1iS2nKHAZHr07RDdX52LG7S4lygY
WVNx21OVwA1bFHwG7tPx3/q6rInu5+dvcY+IpVBgrMvEMbrfd4wkx6k8pKD9
bLSBvB49X54qZu1+SkHHoLTT/nX0PFmoPL88g4KF6SkdS40IdOhWyU8upcCr
5PnuaXN63sWuXuooouArW/bTPVcCs0S92oE9FHTatK+SdCNwzuanFmd6KZj8
LTl5zJ1AxrDGwbwBul7mKp5x9yTww5+aqD5K70/ec1CTnnfH1+ocnvlFgd+I
aoXuQQITmtc1ZKjzYZ+4kmVzDIGeldOunzX48Hnk9u+UWHo+5NeQW7X4sNdt
pWLYBQLzUvYONenyYVU3ZbPiCoHCfxLnjxnz4YbThvlXbxBouGDYzsSODw8m
85dIPKbnrT27qvQQH/LLev+6UEHgA/NIJ4lQPiy5ZHsttYrAA4Y27TuP8EHL
cWyyoobAmeWCXtExPlRqOdvKNhCoMbBgjlgUH0paMkx72wgMjw0B22t8cBt/
eMqgn0CFCt2yphw+bKhlG15bwETTMzvDR/P4QB6OSelbxEQPizC9JYV8MDmU
UreVvr/cLMq7517KB237Xr+fy5gomw0n+NV8mFr3bXXBKiZKPv3TcKiTD5Je
FSFWRkz8EhvzeO4U7RuXHJN8mLjMmuGlNUPHy2pl+7q9TDQWq5N1+MGH89Il
a5v3MfFo1KLo+N98CNgnZ7fyABOHj9/1WSolgP0PRdJ5R5j4LihTTk1ZAAs5
9Rf94pjY7kDFmW8VgHxM/TezbPp+tvx6zG5LAZC3n2zWyKPX+2zPHAQB3Hm7
TVaukIlt0VmRyTYCWKt/6Yb4Sya25l4KmXQWAHJqxjY3MLFZbZNrxl4BvPCa
bozvY+LOkU87K/cJIDk6/FvrABObSp7sIP8SwNIy/6o1H2j/KWMzL0gAvJif
Ft1jTGxM6DcNOCwAyYQxP9YsE+unbqqsOCOAc8/Z6SMrWOj4ylHJ6JwAjHc1
KNWqsrD+5i95x/MCCOgJf8/UYGGdQYhsxEUBHKzwV8jSY2FtoNWc9msCsP8x
0vbDnIU1b8YGrzwSwIX7UtqmfixE1s6cmQoB6C7SL2alsbBIVnb1tmoB3PQz
3CP3nIVZJ95cP/9KAAde4tOYXBY+tnE7vLBRALXEQosj5Sw83+O1dlWHACrN
cMsIfX+3Vwx8uH1AAEFrjx7eNzcNWy6eir8kLQSH+W6NTQfSUBjEDFjuJgTL
mX3H31mko+7dcjETDyF4JIX9l2OTjhH13IeunkLwSbr353mndFyqP1+QsEcI
oxLTIWu809F+PNhdPFAIARo2pZfD0zHrtK7tWLgQ+NpdfbfZ6Rh3naPVcEcI
sUZpCmqqGahfnDMURQkh8NaNvloZNvLtHeIogRBcjpTYHFBg4+VOgdqmbiFM
dZ2SnqfGxv4xCa+xPiHEOxdXeW5g40Ntr1f7h4VQ+cZ8eJ07G+Vu/3hi/1sI
7haOKpz7bJw5Yuu7REsEc5mJH77qcjDtJ/ktVEcE85UPitTo7zfP+MM3G3RF
UKdEmbpYcDCHSG44byiC+PJ/5YtcOBgqHDL7aiaC1c+qL1eEc/DtjqvyfCcR
hLf67WKUc/Aab3XWpl0iOLv4Zrx8PQctgwqcb/0hgj8EvuuutHHwwbme8zs9
RGConJV6tp+DHoVGE+V+Ivhi4Gv2ZEEmitvVJqr8Re+nY+v9jfKZmN2+Z+3J
ABGIJHL8m1ZlouxorL9RsAjqZf1XSBtlYtm/Sj+uHhKBcPCO7HPzTAyRzkz+
+I8IcpwDgr1sM1HprpWxwxEROFrWaEq6ZGKdJrf52VERPC0ttS/0ysT/A64a
TFs=
        "]]},
      Annotation[#, "Charting`Private`Tag$89658#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxpVSllWTSivRzMpug0hlclKvSEolq4NyiXRzG0YdYmPb3JfG
pTJa07isUSe7UVbSxL4V0oTPzJgZZnxfsytS6aJWiuOys3885/njeX4/elis
z/G5Ojo6+7T5v5Mtb/26ZeYCFA3fpX8p0+Ak2/HEG3cuBE00tvwi0GDi3SYH
AZcLmX0281bxNRjvKe6YMcsDBW9phhtPgzGcgemHW/Ihzngws+CCBu0Pf7Ve
2FQAlwzTcphJGmRUOxcxJy9CRmBMcamPBhe4VgSz4oth9Pxsh7OeBgXHW3da
8sohX5gSl3DsGTpa5zTssKiCfuejG8VSCut9G7xLC29AwHPTuFl3Cof/iBOd
PlYD3NFbw6I6ErmpsymcU7eBKFlQ42pLok4bV29o4E/YPuQULC/vxxdO+y3H
PRrgXm5bocnKftxTO2Hbk9YIWxmV1iMVajS4H2Xx7r0Igj/zknwZavRsfzwl
d2iG6Hqr2poaFU7N9409GImQit558S4qTGcrBg1fPYAJYnj8UGcfevaNZR1Y
+AhEyZWrGUf7cKvRF/N70AIpz8zDPcZ6MZK6rMOOawV1/ddWt3J6UWlj1ZeZ
1waR9DBfU+te5HjwK7HlMdxtm9TJfqzE3QPzjh8ebAfiat7u3VFK9N7lY2q2
Sgw7DtjkOxkoscDDyfR776egN93h/rBWgYvbly4uiemA/twoh/EgBTbT5BPM
qk54m+M9qpqvwGoyS0Vv74LQOF5ZR4McJS4K3ZPPCRipMNGLjZLjks26hUMG
EigZ46w2NpMjuWg5/ylfAqT+I4mVvAedu0wtkCUFXk1lGDu7B538o5+oJVKw
vcNr9nPpQT96Y/SNEBkcYRsF0mZlqC/9lJM1KYMflpw32imSIfnAVrgitwdK
pNkzr87KcG9K3YBkhRw+nRmazXCR4QGLtfwrdXKIyC+cejlHhklzSryMXRWQ
sNnEcI1Yio7iqbMCSgGni/V3RXClaCw9JFTHKOFMv0Ojp78UuVW6H7dNK+F1
YrrBzW+lKAgpu1dX3AuGJpFb97yVYNehTcmq7/pgZ9PnswZNErzs1Ny4qLUP
Ulf+s4yVLcHPQ4Wm7GAV3G+mSLmfBH+UhZ5JeaOCCY7FkpVM7V9I9xJkqeF6
cD5n0Xg3Eg2kBWdFP7h9PFVfXd6NwqLB5ZHX+iHN8oX93v3dSAt4lnXahYSF
5a3UxQkCSw/L/rWTkEAbnlaqfydQunZzy20ZCUf5FU/Sqwmc90lwcYOCBNWG
d0PrbhAYmRuxnqUmwY6WWpl2jUBWo07stkESslIuM+0qCJTQ7F7v/UICaXYs
PI9HoG5b7t8RqylYk1DzG/s8gY4FH2pHGBQM18Tor/pZ6wv0P8deQ0FXRy+/
8yct/4FhHsekQLdO6GaTTOBVc1Fg4kYKvrFfW/Y2QcsnvlRm7qJg5COZkRhN
YISb17WFeyh4wba+zozS/o3q43P2afkuxhgZQeDcqnNL83woqGYZ0lxPEtgt
Xe5TFERB6V9iP6Mw7S5IppuEUHAnIETxMFTrDx8YvXKEgndqwbn4EK1v5mb+
1RMUdGYt86eCtLzYOMQ8ggJOvVd6YaCWL0paVx5FAavNnnIPIHBTqGaaHkMB
Q3T/yORBAsOt3bsqORSsv/SeVutP4H+8hZRH
        "]]},
      Annotation[#, "Charting`Private`Tag$328145#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.014156776511059444`, -0.3878423501570294},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.58, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.56, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.54, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.52, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.8198034445293784`*^9, 3.8215146050030947`*^9, 3.821542882383358*^9, 
   3.8225555800160728`*^9, {3.8225556115846577`*^9, 3.822555619063655*^9}, {
   3.8225556925981073`*^9, 3.8225557019321446`*^9}, {3.822555738214141*^9, 
   3.8225558925462646`*^9}, {3.8225566160916104`*^9, 3.822556673278695*^9}, {
   3.8225570690135307`*^9, 3.8225571066390867`*^9}, 3.822557632522315*^9, 
   3.8225853472705793`*^9, {3.8225853803842306`*^9, 3.8225854256421704`*^9}, {
   3.822585611799341*^9, 3.8225856229973745`*^9}, 3.822586019110131*^9, 
   3.8225864861326675`*^9, {3.8225868521090775`*^9, 3.8225868632273707`*^9}, 
   3.8225869055920453`*^9, 3.8225869387533607`*^9, 3.822587419488449*^9, 
   3.822587462325887*^9, 3.822587517115361*^9, {3.822587587764443*^9, 
   3.822587609021572*^9}, {3.822587653824782*^9, 3.8225876872043056`*^9}, 
   3.8225931603889656`*^9, 3.8225932849234643`*^9, {3.8226345038938637`*^9, 
   3.822634513776434*^9}, 3.8226345718438773`*^9, 3.8226445046514463`*^9, 
   3.82264454875979*^9, {3.822644618061558*^9, 3.822644633580876*^9}, {
   3.822645146741465*^9, 3.822645181851208*^9}, 3.822665194443864*^9, 
   3.82266588611421*^9, {3.8226659973407516`*^9, 3.8226660170071573`*^9}, {
   3.822916578087105*^9, 3.8229166145416126`*^9}, 3.822916662908291*^9, 
   3.8229167141183376`*^9, 3.822916882639626*^9, 3.822916920580171*^9, 
   3.8229169899187355`*^9, 3.822917023892877*^9, 3.8229171808002524`*^9, {
   3.822917240406079*^9, 3.822917250200912*^9}, 3.822917303536251*^9, 
   3.822917344799898*^9, 3.8229173951193266`*^9, 3.822917524144292*^9, {
   3.8229175855960336`*^9, 3.8229176001541004`*^9}, {3.822917716546057*^9, 
   3.822917753131215*^9}, {3.822917933318511*^9, 3.822917963258442*^9}, {
   3.822918001412405*^9, 3.8229180307409706`*^9}, {3.822918061598447*^9, 
   3.822918132722237*^9}, {3.822918164068407*^9, 3.8229182141295257`*^9}, {
   3.8229183400577803`*^9, 3.822918352149561*^9}, {3.8229184287307286`*^9, 
   3.8229184424131365`*^9}, {3.8229186458756533`*^9, 
   3.8229186737999744`*^9}, {3.8230704081102157`*^9, 
   3.8230704215675955`*^9}, {3.823070486772138*^9, 3.8230705341711655`*^9}, {
   3.8230705764382553`*^9, 3.8230705973007603`*^9}, 3.8230837022069016`*^9, 
   3.8230837504652243`*^9, {3.823083999895061*^9, 3.8230840161223598`*^9}, 
   3.831803206274767*^9, 3.831803248273156*^9, {3.831803278581917*^9, 
   3.8318033318480215`*^9}, {3.831803460686459*^9, 3.831803556328517*^9}, 
   3.8318045511679306`*^9, 3.83180461646743*^9, 3.831804711844429*^9, 
   3.8318047673538933`*^9, {3.8318048574682245`*^9, 3.831804887256955*^9}, {
   3.831804924756407*^9, 3.8318049420554886`*^9}, 3.83180499562009*^9, {
   3.831805051274948*^9, 3.831805080407712*^9}, {3.831805114965923*^9, 
   3.831805142707274*^9}, 3.831808640388009*^9, {3.83206409322665*^9, 
   3.832064139044303*^9}, 3.8320641717382317`*^9, 3.8320642505475516`*^9, 
   3.832064318383456*^9, 3.8320643495751524`*^9, {3.8320647773756623`*^9, 
   3.832064800373431*^9}, 3.832064903572591*^9, 3.8477912845834208`*^9, 
   3.8513415541459446`*^9, 3.8513416741071053`*^9, {3.851341708730936*^9, 
   3.8513417313585825`*^9}, 3.8513417655682993`*^9, 3.851341795628669*^9, 
   3.851341840613058*^9, 3.8513419144732103`*^9, 3.85134201546*^9, 
   3.851342227574349*^9, 3.851342273905164*^9, 3.851342307224535*^9, 
   3.851342337899176*^9, 3.851342393751606*^9, {3.851342427855219*^9, 
   3.8513424433100204`*^9}, {3.851342512645342*^9, 3.8513425381864014`*^9}, 
   3.8513425738390884`*^9, 3.8513426398936553`*^9, 3.8513426701858044`*^9, 
   3.851342790203044*^9, {3.8513428327742195`*^9, 3.851342907047329*^9}, 
   3.851575940006257*^9, 3.851576421221033*^9, 3.8515765685903964`*^9, {
   3.8515769396989145`*^9, 3.8515769839604445`*^9}, 3.851577076220728*^9, 
   3.8515773571888876`*^9, 3.8515774558719997`*^9, 3.85157749333473*^9, {
   3.852972535846305*^9, 3.8529725858709073`*^9}, 3.8529726352546415`*^9, 
   3.852972677509247*^9, 3.8529727273592825`*^9, {3.8529728523667574`*^9, 
   3.8529728909104347`*^9}, 3.8529730385901146`*^9, {3.8529731040912075`*^9, 
   3.852973129566221*^9}, {3.8529733074521933`*^9, 3.852973333943157*^9}, 
   3.852973747796214*^9, 3.8533054293680887`*^9, 3.8533057698662624`*^9, 
   3.8533058884176517`*^9, 3.853305993856407*^9, 3.855477159197074*^9, 
   3.8554771910805984`*^9, 3.855477264265504*^9, {3.855477294421765*^9, 
   3.8554773183149967`*^9}, 3.855477350934482*^9, 3.8554802977706213`*^9},
 CellLabel->
  "Out[729]=",ExpressionUUID->"7c8e97fe-2eb4-4f38-8769-33c5759fffca"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[Delta]plotStoredRate", "[", " ", 
  RowBox[{
  "g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]", ",", " ", "\[Epsilon]", 
   ",", 
   RowBox[{"{", 
    RowBox[{"Orange", ",", " ", "Dashed"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8529726554803066`*^9, 3.852972656047632*^9}},
 CellLabel->
  "In[1546]:=",ExpressionUUID->"9d769bd5-e0bb-48a8-ab77-54ba47452e61"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
      Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxpVSllWTSivRzMpug0hlclKvSEolq4NyiXRzG0YdYmPb3JfG
pTJa07isUSe7UVbSxL4V0oTPzJgZZnxfsytS6aJWiuOys3885/njeX4/elis
z/G5Ojo6+7T5v5Mtb/26ZeYCFA3fpX8p0+Ak2/HEG3cuBE00tvwi0GDi3SYH
AZcLmX0281bxNRjvKe6YMcsDBW9phhtPgzGcgemHW/Ihzngws+CCBu0Pf7Ve
2FQAlwzTcphJGmRUOxcxJy9CRmBMcamPBhe4VgSz4oth9Pxsh7OeBgXHW3da
8sohX5gSl3DsGTpa5zTssKiCfuejG8VSCut9G7xLC29AwHPTuFl3Cof/iBOd
PlYD3NFbw6I6ErmpsymcU7eBKFlQ42pLok4bV29o4E/YPuQULC/vxxdO+y3H
PRrgXm5bocnKftxTO2Hbk9YIWxmV1iMVajS4H2Xx7r0Igj/zknwZavRsfzwl
d2iG6Hqr2poaFU7N9409GImQit558S4qTGcrBg1fPYAJYnj8UGcfevaNZR1Y
+AhEyZWrGUf7cKvRF/N70AIpz8zDPcZ6MZK6rMOOawV1/ddWt3J6UWlj1ZeZ
1waR9DBfU+te5HjwK7HlMdxtm9TJfqzE3QPzjh8ebAfiat7u3VFK9N7lY2q2
Sgw7DtjkOxkoscDDyfR776egN93h/rBWgYvbly4uiemA/twoh/EgBTbT5BPM
qk54m+M9qpqvwGoyS0Vv74LQOF5ZR4McJS4K3ZPPCRipMNGLjZLjks26hUMG
EigZ46w2NpMjuWg5/ylfAqT+I4mVvAedu0wtkCUFXk1lGDu7B538o5+oJVKw
vcNr9nPpQT96Y/SNEBkcYRsF0mZlqC/9lJM1KYMflpw32imSIfnAVrgitwdK
pNkzr87KcG9K3YBkhRw+nRmazXCR4QGLtfwrdXKIyC+cejlHhklzSryMXRWQ
sNnEcI1Yio7iqbMCSgGni/V3RXClaCw9JFTHKOFMv0Ojp78UuVW6H7dNK+F1
YrrBzW+lKAgpu1dX3AuGJpFb97yVYNehTcmq7/pgZ9PnswZNErzs1Ny4qLUP
Ulf+s4yVLcHPQ4Wm7GAV3G+mSLmfBH+UhZ5JeaOCCY7FkpVM7V9I9xJkqeF6
cD5n0Xg3Eg2kBWdFP7h9PFVfXd6NwqLB5ZHX+iHN8oX93v3dSAt4lnXahYSF
5a3UxQkCSw/L/rWTkEAbnlaqfydQunZzy20ZCUf5FU/Sqwmc90lwcYOCBNWG
d0PrbhAYmRuxnqUmwY6WWpl2jUBWo07stkESslIuM+0qCJTQ7F7v/UICaXYs
PI9HoG5b7t8RqylYk1DzG/s8gY4FH2pHGBQM18Tor/pZ6wv0P8deQ0FXRy+/
8yct/4FhHsekQLdO6GaTTOBVc1Fg4kYKvrFfW/Y2QcsnvlRm7qJg5COZkRhN
YISb17WFeyh4wba+zozS/o3q43P2afkuxhgZQeDcqnNL83woqGYZ0lxPEtgt
Xe5TFERB6V9iP6Mw7S5IppuEUHAnIETxMFTrDx8YvXKEgndqwbn4EK1v5mb+
1RMUdGYt86eCtLzYOMQ8ggJOvVd6YaCWL0paVx5FAavNnnIPIHBTqGaaHkMB
Q3T/yORBAsOt3bsqORSsv/SeVutP4H+8hZRH
       "]]},
     Annotation[#, "Charting`Private`Tag$328145#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.014156776511059444`, -0.49413874905405325`},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.54, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.53, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.52, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.51, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.49, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.47, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.43, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.41, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.39, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.37, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.33, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.31, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.29, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.27, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.23, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.21, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{122.94117647058775`, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0.014156776511059444`, 
   0.46}, {-0.49413874905405325`, -0.2370508992745726}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.8529733079180155`*^9},
 CellLabel->
  "Out[1546]=",ExpressionUUID->"fc9e2676-21e9-4cbc-b54a-dd86bc5f0a46"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"ppp", " ", "=", " ", "p"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<rate-plot-400.pdf\>\"", ",", "ppp"}], "]"}]}], "Input",
 CellChangeTimes->{{3.852972657953293*^9, 3.8529726580085526`*^9}, {
  3.852972943478737*^9, 3.8529729561261024`*^9}, {3.8529737426858873`*^9, 
  3.8529737432374125`*^9}},
 CellLabel->
  "In[228]:=",ExpressionUUID->"81b4fa47-2508-46a8-89a1-aa0d90a0e033"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjns0lAkYxqdcqtW6pIvsMA26sV1QbpW3QlSy0bFKi+rkNhqN21lFW1uY
rTFSS9o01EadplqxdvgwXswMDYaZaUwf5quOS6m0pdvGop394z3PH8/z+52X
eehoSPRMGo22S3//Z6bD/d82TOfCZGxGbZyaxAm2W8yoHx8Ywvj6ed0kptc0
uAj4fEjdEsbEDhLTdsg7pul5YMNxeb1IRmIiZ2CqecN5yFCMZMlrSFwb+ZVz
WUM+fHH6MOUqINFOuLHQceIi5MZGj2XHkThr6/UI97Qi2MYyc8+nkSiIlm5z
uHQNBjqfqQ8ve4RuTudEvoxyeJsjiuo/pMXqUNHukgu3IWlL4etLwh58fjep
LuXwH7D4kdWn+y81yD/95QQnuRLq3F4wWr01SJPxjYcH/gSvQwGyCd5DfOb5
ncMnfxF8eurrJR5U486K8VUPz9TC70Yhpaa71GhSn8D4+00dXHU+c9bnvgp3
tLVOalzE4JjuoLhjr8JJo9Cje1kIXUX2hotKlZjF7hma+6IJkoTSl4sXKHEH
+YG7Z3YLdCQ8na1x6cZNpp9tCZAAJ5O71NO5C1lUAY2dJIVb88e4094K1H67
jMzJk8EB9z7SKKYTOf7FN1DSCh4ZrgHaMx24fcAwOnKoDSS/xjb7Eu24OyDE
mm4jB7+ZfBH7mRzz/T2tV+xuB1GhFWGwRI7mbfPNryR2QHhZpcvGxAcottCM
O5Z3gnBa1Wj0VxsKddxeZpsC9ipt9lqbtaFyc49B7GAXNMhGDmcnt+I8D4ML
wyZKiFLTa8K7ZagzW1jcXqyEN6fsw+mbZLhRYc1AdxXINsyhd5ZJ0TPsyIM+
pQq09j+rUxZI8Xtm7ZHbUWrIqI1Y97hAgnNUH89xJ9RAFvWqRk0lqGtaVWbF
ewgZMnZN/6UWDDxRNaC00sA2Wu66xKUtuIexsvhylQboJc0ddhXNeGzGlSDL
rT1gZdO5x82vGd3kkxkCqgdWmyR71Wmb0FK1r6wvUQt5x704OSlNyC83eOc9
pQXj2xaekwuaUBBVSlQVPYK1glSjGfGIin3rM3uXk3DkbNq7bqIRCzzFtWZS
Et543PIJNmjEf4YvWLMjeqH6Cq+FFybG4+oDP54Y7YWU0FmT/uIGLChjBgm4
fZB12ifGj96AXSIdg2PVD07t1tUaXj2WFQ4tZN3sh8Dt06cyDOrRIvwxN2Wz
DgTvR0zmpNVhSaT6/RqlDj6L+lmOHwlUrfSQVKp1EC61nRp/R6DhR8FF1x4d
rEwrfSV/SyCLF+/s3qeDr5v3UaxRAt1raUe9h3QwPKPKsnKQQKXFmpeBn3Uw
uHysI0hNoIGM9zR+CQXmRkJWdwWBbvljFa/sKJg4eT1LeE/v2x92kr2UguAS
7UT2HT0/Zmeb5EiBr2z83023CLxqW7c/fR0F3g32wVUlej59RJsTQMFPQcb+
d/kExvsE3Zy9k4JVNNKBz9PvTavTzu2iICD0eWTiWQJnlp+cnxdCgeRF43Pn
bAK7VQtDCn+gQFEfHCjO1PeCTOaiKAqe/GI+9/pxvT9u4O3lgxTsH5+7Ijtd
75u+d/5qDAXF0sbUoFQ9L7eMso2nIIKRWu6arOcLj62+lkBBrk2sy2IOgesP
PJliJlKwHIu++cImMM7JT3GDo//P0PjgcAKB/wFDNYu8
        "]]},
      Annotation[#, "Charting`Private`Tag$37099#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0.5, 0, 0.5], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVz3s01AkUB3ChXa+oPJK17MhjsUrtmsmKK6tIhWVTVF7bVIRR0gunVtaz
EWV6YGxt1LJlpEz6zW/mtiUSMjPMxDQ/dTTSVsejN6H97R/33PM5937vOZcR
zwlja2tpaa2n6/+ead9w1mvmGKwsG3M9X4g4mczc/moVF7o7ExqdaB+4QS7j
c7nQWmaxs74AMT2ovWPGuhia7FN7RPmIKamD0/94HYeT/ovqlLmI7tEGS6vJ
EgjNKdhodBTRrm4Fz2XyBHTqRDTuz0D80u/8Vlb6aejVHt0RnITIZ7estj91
DoLCM5yK1iIyXQuF/rY1YJd7SWnihnh9gzC0qrQW3lb61K82QRy+vJtI21YP
5rpWDuajEuRmf85K3XMVsssE0W4yCWrd5X4xNHgNctO9T75skOAzzxD79wFC
OLJa81tcqQTXCibceo42g3mdtcR4rwQNRbtsR0YJ2BdZcSX+FwkGtbVO9S4T
Q9b7tNhRpgSnZm/gbEpEyF/TSLpaSTAnWaEx+vcWVBmzF5l/EmNQ39u8cL3b
gM77/dwHxOht/NHmJtwBaXnYo2mJGBOpMq3k3S0QZzDSmXlOjMrvHPtyi+9C
zZwfNznmiDE1oOIC3mmF17/mGhawxbhmUJcdrWkDxruI8/PXiDE0MMzK+ut2
+Gq6aWGUixhLAjytvg29D9dwaCLESIxz28zmlqd0QIJkQsgeI1E8r3fCpaYT
Htt8WuArJ7FOndfPaOsCx57yWSwhiVJfhc6Opw8gUbzSQVFO4vzlOqVDhlJo
W9w16J1FotrEouJ+hRSEcxoCyTgSV3RZ2SJLBoTZDZ6BP4meG5PuqaQyaOhj
ams7kRjBaE6qjZFDoPklpp4Rifqyd4V5k3IQvOVs0YyIUH3LrdqyqAdaKrTn
d/aIcF1W46DUshf2BqgMIm6KMNzWueJMYy/EO3TMiCpFeHBWebCpnwKCOB6P
HbNFyGyfyuBTCigQ3OPtYYvQVBZZrUpRQuuhgjm3gkTIrdF57TOthL8vDQ1f
dhchP+aPm42nH4JP06nsI2Yi7Ir0yOx36oOU4aHwkEkCyzzFzSYtfbAvjC3U
HyDww1CpVfLWfhh9rhzedpvAQ/LY/Vmv+qHUO9+96S96v5oRzM9Tge5r1pP3
xwh8IFTbplo+glqPYpZLGoHVPI1F4sVH4F+ytOtDJIHzogby0nzVYO/CKSV9
CKyKlr9ZIlWD77YQVZIDgTLn5XeuytXgbXbBaMqeQN13/BPfK9QgiB/wLaKd
WJSwlKVSw5jKUFC7iEBWsxbHR6OG4eV+fz5jECidt+TFuo9quFZnrYm1IVDn
btGThG8ouM7OV0QsIJBZMi54aUeBn6bb/5kFfW/zxsPJDhSsmvW5KZ22dNzO
ZrcLBXUWZlVl5gRW2hCbD/xAwfP6hb/LTen8gefK3EA6zztRHzyXwISfgi/q
raVg4afwFQMm9L7x9fTC9RRs/zzVkUxbu+awWXEYBVuezh4/Zkxgt8wijLeF
ArR883OHET3nZzIWxFDgtWd8JIo2c+fg2Jk4ClwTH3JfGNL3Zq4cr9xOwS6P
KJk+7e520xibBAqa9T6knzWg87yDi8/toiDzUIa1M22P2MfTjBT638LhlmZ9
Ane6ruq6kEpBjKcXJ5D2f2ZygDQ=
        "]]},
      Annotation[#, "Charting`Private`Tag$38406#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 1, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQXaOyYab1vx77riq1ysviR/YrrbKZqvVrEpzP7rQw
1rx0Opw/N/WIm8q0BXC+mXbXNhf5pXD+ltBtAfMmroTzn68p3FWcsg7O7236
X1tQtBHOZzjay/b00WY4/5mlv8o3921wvvf6n7qXm3fA+dy7s+Xfvd8F53sd
P/bnitFeOP8Pa2h+RNZ+OL8l9+oTnpcHEOpvfGkP5jgE59vy/ZDbaX8Yzs+6
O4Uht/AInH9NR+1GW99ROL/Affbi/YePwfmej1hS454ch/MDPIKkZGRPwvkT
3C2lNAJOwfkCx0UEZuWdhvP3Cl75qbX0DJy/6k77TcXjZ+H8Cw5XmdMfn4Pz
hSyYJz7lvgDn3+EXm31qNoJvc1ZKfr/5RTjfMjznxK0LCH6Y4o6clfGX4HzO
i1+72n8h+HcO6C6R6L4M5/vUbnp0QeIKnB8srzl7xiYEv5Jxlp+w01VEejj5
p3ruXQRf+GLkklt51xDxv5T5k91fBH9u/Pydm6Zfh/PPRprW3FS/AedPsdy7
g/8Igv/96USp3NibcH7VpYTy2jcI/pQlin5z22/B+ee23ZEvkLgN5y+Z+kQs
axmCLxh1r73Y4Q6cPy/u0mf9Cwg+89HuB5kKd+H8DG3Xs4sLEHwAAiWjug==

        "]]},
      Annotation[#, "Charting`Private`Tag$36942#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwV13k4Vev3AHCJoqKSDCkkQ4hCUqKVWZQrXEOSG7nKVfqmqC6VaEKDBg2X
xrPPwTnKPGeZMoWM5+x9BiKkMjegUr/9++s8n+d9nr3fs9Z613r36oAwtyBx
MTExhTliYv//20S5JPWeZoDej+UOmTUC9J7Sa61OYMC752lyJ8sF+E5+/mJm
CgNKd3X8a18kwO9/YGJIOQPqd45rj7IFuLZ2/eXPcwjwcd3x9uAtAcblLDkr
eYUA58ORPQsDBWiR0B6qe5cJJ35VL5aSFCDbwtPxf7lpMBCtuply5+OipBsK
A/aZsJIvGv2fOIVRdesbfGuzoDL46lPf9zw0ZWk/iO/OgSobjuVYLxdf/C6I
0NfMh8oht7+i+F04ylma8cO6ENpkRoiX45042i75wfJ6MdRePTs7MtOB2T7S
pa9aS8HGNof9enEHbjHlvYv69BJcDrsJ2szbsdJWbVGHcgVsHW4Nm+fVhg7K
RbvP6lWCb8Kg3JG4Vlz/kPyrxbQKTnYbpf4+/gYje16d4HpVQ1RNVEzA62bU
cFbaFPF3DdhFGetYWDehQbjZz5aEVzA7IqNW9l8jPnDuTmhk18ILgx0bQyUb
8JDLx1q/ojqwclFeb3m7Du/LVM/PENTD8ztx/GyZWtSfEvty9VMDFF8xy3XM
rEHV1IWDenKv4U2c3S7z7dV47HPqkxCTJlCV1ur2H6pE3eN3pKytmqFwJDma
m1uB27N9TrQHtYB+Qd0Ol8lyLFaKvfo94g04znp/a20uQ2elB4UBVq1QcXn1
kO+lEjwk7sNmtLdCeK+rYoV5ERbFNB433tMG0kYRPN39BWjmr1G5cqQNUr41
T3y+m4fv5bcd845uh3pOGRT9yMF6/0UzPXM7wEDXji91Pxv5UpXiNXc6YOMx
TWHJtixc5bC27/OqTgjWTLuzcPtzTPJz1z7xrBPGVQK+aLlx8MCzsNQiohMs
Tv/hGuDEwU0fEuR/sjpBLwMbn1pzUHi8RjyW0wkz0/uUNphwUDvRtOdGfifM
SRq2vC/PwZISxXucuk6otHpZyyLZ+E5RKN3/qRPkd71WaT7ARtP2AyNuG7vg
7ztdawwTM3BvH+9W2KYuYGv25OhdzMC4SSfzxM1d0Per55L+uQxslzO69Mqi
C+KVrRMtjmfgUfdZ9c12XaAc79ybszcDMzrveKzy7ILW7IZsRcMMVOfVlr6P
7IJli61zyzvScYFwbXxUaRekb+eRuXrpuNi2I13chQvZwckN1oMslChKm9By
5YJn67sjwl4WTuuf2bLDjQtO+W9zIkUs7Fum23DdkwvLUHJZbicLC96dGVrp
zwW/EtUIu2oW7o3V0zE7yoV/2rSfyz9hYUZVDOOfm1y4nTczLO3PQjurDY86
uVyQPLbVI+odEx/U3Fs3QnJhsEqidqiHieMOc0okBVz4ZeZ4zFvIxBSX9s5N
PVw4+T3uL4cuJk76Hl9w/z0XwoT9ad51THwYUXTCb5oLC+It9XhsJk6zt+8c
VOZB0byTfJVIJrqsT6d+qfAgUDng6odwJj7LWRqsqMqDp29HnxQfpdeL+2Ic
NXjwauKWUUAIE4nauMIMPR5srJNs7/RjoltvvUbYVh6sfBNc4GPHRI7C7pmp
vTxIasrwnVjOxNMmr6Yt/XlQXeAfwpVj4g7XLdOx+3lg4ZtTiYuZOHhl9dTi
v3mwKzTH/pE0E9VmJ77ohPFguzUkRM8SePPdzXGvGB5c33q19cYAgSezOt8X
EjzQ8CUGbhYSaN/s+H6WxYOur9l6jXkELv9YNmiTwYOdc3f/kMwhMGcNMfDm
OQ8CCu5tTeAQ+Cn5xLv3hTxofG+q1vSEwH3RCj2KjTwY15oIFSUSaOvkzY0c
5UFwRSnzVhCBwUZrJO+O80Bf533w34EExiuNmhRM8qBDveSN5X4CWwdjk758
48Exu9mk73sJ9It9sfN/v3nAjiwj2R4ERpTNqw5ZQkK+Q7P5sC2B95+1TVyR
I+HijOcXKRsCy+JT1NPlSRCahO/QsyJQ3Mf4zHslEvSXfH912pLA61/9thxY
TUKwf9W2sE0Ephnmv/AzJqG6ZIXe7FoCXy8/1x21kYTPDkG/vHUIHP3pJJOy
iQS3XImHeVoEbnz9NoRvTkLxtyPyTzQIrAxepO1lQ4JTZXNF2UoC+114HhF2
JKSsiJhxVSFQatPT2DsOJPBePrjwUZlAF4nNvR3OJPy4L/OfgSKB/MeBKa4e
JIzd7W35vJTA2UuGr8M8Sag0+eWeu4RA9bCZmWveJKjvD5M7vZiOn+V1r+a9
JBxMC/mgKEPgF6pEzimIhBW3VgfelSJQsfKC1aFg+v90z2fGzifQPM316OVD
JETO/eCbMI/AcxGDzbWHSeBkvtZ9JkGgzDK5KzYRJGQ7DqSMi9HxuDWke+Mk
CeOHkyWnfjPQVh4bhadJuHCu31uMdtTy0EURZ0lQqN5YrjLLQKVk68yqGBKo
0bI3Bj8ZmKeg7LI4joQesZd1Nj8YOKxYez3tMgkTGZwezgwDL99L2fA1noRV
VRGnPk4zUFM5vM3qKgkepWp6hrT3rlBfJkii8ydWyq37xsCmlaeTZf4joQVS
k2y/MPBgqqvZnlQSApmJy3M/M1BCVYdkPiKB1axdqUPbQq1TeTuDBLFDyaZr
JhlIPsooSWSSwAiZ0smYYOBx9RhfKo2EZg0ZazPa7NWGqccySfhldWEqcJyB
9k8ltuELEoYeb707l3afhqB7YQ4J6TvED6aPMfDMs+yz3nkk3P5j7qI9tFdo
XlYnCkio+cf23mraBYx9lRNFJIifzj81NMpANy3TgG2lJNh6FAxn047X7nvG
Q3p/lj8v76StzSqy1awiIdFsQe4q2lU61weO1pBwb63h0YkRBu5LC7r4spYE
ba+3FXW0v6+10FnQQMK/nJPEY9rJ6XL1nq9JONztoRpF21jvw8FnzSR8C+Dq
76HdkoHS429ImB+a37SN9iH95AyLdjq/2r1fTGlLcEKdr3SSMMN4qb2B9uN1
NsNdXBKs50L4etoWmcpXNSgSfD3jhSa0SYNxgzABnc/hxgOWtI8/r20pFdH1
K2sgu5P2kvWpYVJvSfA/UcD3p815Eb7kzz4Szn1f1XyStuMGp+wn/fT7R46/
T6bdn6XuNjpIwgMD8XUltM8ZTU2afyAhyV01tY/2ypzmW5c+kXA1jb10MR2f
ImPGxs4R+nkLgpcAbY/c013q4yR4a2aT4bTHTXZHHJ4kYW9XTmgmbR3TX4Xz
pkg4kXFXbD2dn6r8Tm/3GRJcbmdJRNLet4k98+gHvX/LVFE17e8FMQ+GZ0nI
80wxWU7nP9nMe+sWMQrOnIuePknbuMhQeEGcgtePQ/26abdsloxul6DgzpXP
8+zpeppnnlP+jzQFZmST3kq6/sQbVYjMhRSwqfTUy7R/+1xIGJOhIMymxHqK
9vQpb+9wOQpmL5BaArp+v0pXbcuXp4AVpR3kStf75H19rSkFCi6d6I+oo/2p
+NfEaRUK9plHh7R8ZeDQjoNk2SoKBgLG+z3p89JPtZX/UqNA9odOyDva3TOM
hPOaFIg9UEiRos9X6xZnrXgDCp4ZMDpjvzOwuSFvYdN6Cop9RPx19Hlt9FGd
lDGmIPJj5BBFu/rURHnSJtouynxT+rwXFN/1vg8UPHzI26JA94v/tvQnpO2m
YEvTfLskur/ca9h17KM7Bfs/rF8fSvef2z6F3us8KbCyejrrSPena6fitbL2
UNDlJrNDagHdj4o3YGEgBdFW7guYdD/7e0v0ZO0Jev1AhP6j5QQGNAySUicp
6L4etDRLgUB/H1d0Ok0B9c2ypZrun96n1iS2nKHAZHr07RDdX52LG7S4lygY
WVNx21OVwA1bFHwG7tPx3/q6rInu5+dvcY+IpVBgrMvEMbrfd4wkx6k8pKD9
bLSBvB49X54qZu1+SkHHoLTT/nX0PFmoPL88g4KF6SkdS40IdOhWyU8upcCr
5PnuaXN63sWuXuooouArW/bTPVcCs0S92oE9FHTatK+SdCNwzuanFmd6KZj8
LTl5zJ1AxrDGwbwBul7mKp5x9yTww5+aqD5K70/ec1CTnnfH1+ocnvlFgd+I
aoXuQQITmtc1ZKjzYZ+4kmVzDIGeldOunzX48Hnk9u+UWHo+5NeQW7X4sNdt
pWLYBQLzUvYONenyYVU3ZbPiCoHCfxLnjxnz4YbThvlXbxBouGDYzsSODw8m
85dIPKbnrT27qvQQH/LLev+6UEHgA/NIJ4lQPiy5ZHsttYrAA4Y27TuP8EHL
cWyyoobAmeWCXtExPlRqOdvKNhCoMbBgjlgUH0paMkx72wgMjw0B22t8cBt/
eMqgn0CFCt2yphw+bKhlG15bwETTMzvDR/P4QB6OSelbxEQPizC9JYV8MDmU
UreVvr/cLMq7517KB237Xr+fy5gomw0n+NV8mFr3bXXBKiZKPv3TcKiTD5Je
FSFWRkz8EhvzeO4U7RuXHJN8mLjMmuGlNUPHy2pl+7q9TDQWq5N1+MGH89Il
a5v3MfFo1KLo+N98CNgnZ7fyABOHj9/1WSolgP0PRdJ5R5j4LihTTk1ZAAs5
9Rf94pjY7kDFmW8VgHxM/TezbPp+tvx6zG5LAZC3n2zWyKPX+2zPHAQB3Hm7
TVaukIlt0VmRyTYCWKt/6Yb4Sya25l4KmXQWAHJqxjY3MLFZbZNrxl4BvPCa
bozvY+LOkU87K/cJIDk6/FvrABObSp7sIP8SwNIy/6o1H2j/KWMzL0gAvJif
Ft1jTGxM6DcNOCwAyYQxP9YsE+unbqqsOCOAc8/Z6SMrWOj4ylHJ6JwAjHc1
KNWqsrD+5i95x/MCCOgJf8/UYGGdQYhsxEUBHKzwV8jSY2FtoNWc9msCsP8x
0vbDnIU1b8YGrzwSwIX7UtqmfixE1s6cmQoB6C7SL2alsbBIVnb1tmoB3PQz
3CP3nIVZJ95cP/9KAAde4tOYXBY+tnE7vLBRALXEQosj5Sw83+O1dlWHACrN
cMsIfX+3Vwx8uH1AAEFrjx7eNzcNWy6eir8kLQSH+W6NTQfSUBjEDFjuJgTL
mX3H31mko+7dcjETDyF4JIX9l2OTjhH13IeunkLwSbr353mndFyqP1+QsEcI
oxLTIWu809F+PNhdPFAIARo2pZfD0zHrtK7tWLgQ+NpdfbfZ6Rh3naPVcEcI
sUZpCmqqGahfnDMURQkh8NaNvloZNvLtHeIogRBcjpTYHFBg4+VOgdqmbiFM
dZ2SnqfGxv4xCa+xPiHEOxdXeW5g40Ntr1f7h4VQ+cZ8eJ07G+Vu/3hi/1sI
7haOKpz7bJw5Yuu7REsEc5mJH77qcjDtJ/ktVEcE85UPitTo7zfP+MM3G3RF
UKdEmbpYcDCHSG44byiC+PJ/5YtcOBgqHDL7aiaC1c+qL1eEc/DtjqvyfCcR
hLf67WKUc/Aab3XWpl0iOLv4Zrx8PQctgwqcb/0hgj8EvuuutHHwwbme8zs9
RGConJV6tp+DHoVGE+V+Ivhi4Gv2ZEEmitvVJqr8Re+nY+v9jfKZmN2+Z+3J
ABGIJHL8m1ZlouxorL9RsAjqZf1XSBtlYtm/Sj+uHhKBcPCO7HPzTAyRzkz+
+I8IcpwDgr1sM1HprpWxwxEROFrWaEq6ZGKdJrf52VERPC0ttS/0ysT/A64a
TFs=
        "]]},
      Annotation[#, "Charting`Private`Tag$39655#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVjHs0lAkYxpVSllWTSivRzMpug0hlclKvSEolq4NyiXRzG0YdYmPb3JfG
pTJa07isUSe7UVbSxL4V0oTPzJgZZnxfsytS6aJWiuOys3885/njeX4/elis
z/G5Ojo6+7T5v5Mtb/26ZeYCFA3fpX8p0+Ak2/HEG3cuBE00tvwi0GDi3SYH
AZcLmX0281bxNRjvKe6YMcsDBW9phhtPgzGcgemHW/Ihzngws+CCBu0Pf7Ve
2FQAlwzTcphJGmRUOxcxJy9CRmBMcamPBhe4VgSz4oth9Pxsh7OeBgXHW3da
8sohX5gSl3DsGTpa5zTssKiCfuejG8VSCut9G7xLC29AwHPTuFl3Cof/iBOd
PlYD3NFbw6I6ErmpsymcU7eBKFlQ42pLok4bV29o4E/YPuQULC/vxxdO+y3H
PRrgXm5bocnKftxTO2Hbk9YIWxmV1iMVajS4H2Xx7r0Igj/zknwZavRsfzwl
d2iG6Hqr2poaFU7N9409GImQit558S4qTGcrBg1fPYAJYnj8UGcfevaNZR1Y
+AhEyZWrGUf7cKvRF/N70AIpz8zDPcZ6MZK6rMOOawV1/ddWt3J6UWlj1ZeZ
1waR9DBfU+te5HjwK7HlMdxtm9TJfqzE3QPzjh8ebAfiat7u3VFK9N7lY2q2
Sgw7DtjkOxkoscDDyfR776egN93h/rBWgYvbly4uiemA/twoh/EgBTbT5BPM
qk54m+M9qpqvwGoyS0Vv74LQOF5ZR4McJS4K3ZPPCRipMNGLjZLjks26hUMG
EigZ46w2NpMjuWg5/ylfAqT+I4mVvAedu0wtkCUFXk1lGDu7B538o5+oJVKw
vcNr9nPpQT96Y/SNEBkcYRsF0mZlqC/9lJM1KYMflpw32imSIfnAVrgitwdK
pNkzr87KcG9K3YBkhRw+nRmazXCR4QGLtfwrdXKIyC+cejlHhklzSryMXRWQ
sNnEcI1Yio7iqbMCSgGni/V3RXClaCw9JFTHKOFMv0Ojp78UuVW6H7dNK+F1
YrrBzW+lKAgpu1dX3AuGJpFb97yVYNehTcmq7/pgZ9PnswZNErzs1Ny4qLUP
Ulf+s4yVLcHPQ4Wm7GAV3G+mSLmfBH+UhZ5JeaOCCY7FkpVM7V9I9xJkqeF6
cD5n0Xg3Eg2kBWdFP7h9PFVfXd6NwqLB5ZHX+iHN8oX93v3dSAt4lnXahYSF
5a3UxQkCSw/L/rWTkEAbnlaqfydQunZzy20ZCUf5FU/Sqwmc90lwcYOCBNWG
d0PrbhAYmRuxnqUmwY6WWpl2jUBWo07stkESslIuM+0qCJTQ7F7v/UICaXYs
PI9HoG5b7t8RqylYk1DzG/s8gY4FH2pHGBQM18Tor/pZ6wv0P8deQ0FXRy+/
8yct/4FhHsekQLdO6GaTTOBVc1Fg4kYKvrFfW/Y2QcsnvlRm7qJg5COZkRhN
YISb17WFeyh4wba+zozS/o3q43P2afkuxhgZQeDcqnNL83woqGYZ0lxPEtgt
Xe5TFERB6V9iP6Mw7S5IppuEUHAnIETxMFTrDx8YvXKEgndqwbn4EK1v5mb+
1RMUdGYt86eCtLzYOMQ8ggJOvVd6YaCWL0paVx5FAavNnnIPIHBTqGaaHkMB
Q3T/yORBAsOt3bsqORSsv/SeVutP4H+8hZRH
        "]]},
      Annotation[#, "Charting`Private`Tag$328145#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.014156776511059444`, -0.3878423501570294},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.58, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.56, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.54, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.52, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.852972958692292*^9, 3.852973751264705*^9, 
  3.8554773623655787`*^9},
 CellLabel->
  "Out[229]=",ExpressionUUID->"caae2e36-fc83-4218-a874-defe1db653e0"],

Cell[BoxData["\<\"rate-plot-400.pdf\"\>"], "Output",
 CellChangeTimes->{3.852972958692292*^9, 3.852973751264705*^9, 
  3.8554773627145696`*^9},
 CellLabel->
  "Out[230]=",ExpressionUUID->"09ce942f-5ae4-4b7f-9398-3546c570946e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"ppp", " ", "=", " ", "p"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<rate-plot-smoothed.pdf\>\"", ",", "ppp"}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{
  3.822918465906975*^9, {3.82308381272532*^9, 3.8230838516044493`*^9}, 
   3.823083976926865*^9, {3.8318032639442396`*^9, 3.8318032660163774`*^9}, {
   3.8318046702473397`*^9, 3.8318046704468307`*^9}, 3.831804723870694*^9, {
   3.8515773346046124`*^9, 3.851577335962059*^9}, 3.852972940338196*^9},
 CellLabel->
  "In[281]:=",ExpressionUUID->"6060a1e6-ff51-4abb-80ce-b45b42fa6358"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVz3k41Akcx/FU2+5m6CQKqcYRw6ayUum7q8g1sjpIrRwj2eToLsp2UuSm
YnQR3f0MmQPzjYkRdpqGZsYawgy/hnJlH0Tb2j8+z/vPz/NaFhTpHTJ92rRp
9Kn93y+Fs0M2/psEt1sy0w9I5Lht3ldJ8tFroKM0PE02yrEgZuCXzt5rELLj
pOcfQjnSvZoNLsuSQcPOajSyQo7iSc/eUN9U2DCZ7RJTKEdqod69Ypt0aNyy
30l1Wo4NY4/nOamyINJ4ouoBVY76tySDB13zYEUEf1dGrAynN69gL35YCDkL
Cud5LJdi3KHDcMbkGRjrMS1cRppx+OKjZVQ+C7JK/Wzk7U04Vh2SYc4tg2cN
x3OjayToqNmntoziwe5Q3bqZ4rcYsHn9KtFxPhCfdDN2y8R4ir/Sz9u2Co68
exeaR75BRkCutoOWAHbK6xib/ERo/2Vo/SilBrzpeU53hI246ubTFqK3FmYM
Xln//YEG7FzneX0m1kHuXK/tA9R6jBU3NZqV1wOTaZTQpKhD+0P8o25ZjZB2
PNWQzhdih0Zy5sbrIrCQZAyrcmvxjvvdMNVWMZwLE6SXpdVgp561o8WatxBx
9YOl9cNXuCjoqdRntQT8htMTTSoF2G61j3rJuAmGHxlJhvqrMefYDOuc5c3g
yAncUmVYjSUOi7dOLn0HsQt1Amb4V+HvCcH6/hQp9NqmXA0oe4mTnreLiigy
yNdQmupQXiLthtbA4IQM6vDEs9h+PnID+53ie+QgKt0qWKioxA1FVb7fdbeA
bJPD2OqaCvSMFFIvSP4GxvknIwpxOe4qwScfmlph9Z5AuVLOw/ITFltyxQrI
7GVzOSNcLOYLM+kVbTA3sTKdZsVF5jmfu2R5O9yas2FvRSAH9YT6oecevYe0
hHHToudsPOlsZrTWrQOGzq67vEiTjftI3v4lrztAXpla6xVchsmvycTz0Al3
dkx3sxG/QI5aK6UNO+Fzy6S0xf4FWrj/FcGx64IrUo1x7bJSbPjoJLV/2gVD
KgvT6I2luL+RveQ5TQl5Xf79AixBt0/VDgX5SjhKMeWaeZeguYfQ4RpVBeP3
GFE3ulho23exxiBfBUnuddWOMSy82tC6kqbfDTTNvdE0Yxa2qC3Df7rZDUfY
P4TTBMUY7aqTyJrbA5fUSqv50cVop2bbKC71gLu34ywBtRjHareXjc8kITvj
SVyilECNnoRF12NIOHVTEbszjUDm+dnlD86QEH4sJdE8lcB1S5P8eXEkOJv5
dE4kExjlm3K/7QIJPIpJUH4SgR31WWuoSSRktPM4/8QTyH9+b1sxk4QFt0Tc
orMEnj5VEd9QSQIkZWv+Gk6gru4myzYkIchENWlwkEAWC0X9VSREZjrbjocR
qO6r1plfS4LLiGsMK5RAX//X+b4iEnp5bnvNgwn8ebMUu9tJmAhee3iZH4GS
9z7Box0ksPe8adbYTWBEbMusH5Uk+K+MO9vlQ+D9Fwo6jSThgLNhUcFOAhea
K1sPD0z9xW+n034jkHjFiLs4NOW3zvqg7UWgR2DP8uzPU/7HffVDngReyFGH
cUdJmGMmY3A8CDSyO6jVME4CmoQbMN0J5DV9JBQTJPh+0VnypxuBu6IidvR/
JaG1oDmA4UrgMGVw9Nu3KY/Jg08uLgT+Bzdenxg=
        "]]},
      Annotation[#, "Charting`Private`Tag$47172#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0.5, 0, 0.5], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVznk41HkcB3BnbZiOfVRIaTQkqSXZkuynS46MQsc8bdFtC4XtXCJXRHRi
M9OWDpayrmfnNzO/mfksKom1mFzrGhm+O6Zy9OwzhGZn/3g/7+f1x/t53swj
ZwKO6+no6LC1+b8/5xsd3/jlOvDMMmzz0hB3zptuzjybAZ3lWNR+DfFJ9PCm
vqEMGCqaiJmrNXvXW8urbZkwixvOvJKC2DjlNxTCuQm+0XtOBSchsvLNHpU5
3YZeN5upxbGIdePP5nkosmCz5IUVNxLR/JfmkVDv+8DrqljzkIOo93YZZVGY
D+fT06orrRHjwqPgss1vkFK6KUowIsWxpCImS1oOZt05vYZ/SHG86vgdOyEf
eIsDObfSpbjFWKVcGSGCNCPryMH9Ujy0dYNjw3kpuKdVhVyxleIl6Yr9AS6V
cG3Ws9QTnyR47BB3tjujGuo86FijFxJ0/Ty6QW3yErZ+pSrUvyVBx3vFHaVD
r8Bh2DSw9LAE+9b75Rjga6AsyzR3nSUY0yirX06/gdvM9uheXe0+XHrWJ6se
6Az1s1qZGOW6mXc35jSA2sQ2wO6RGB/uyDup8GyEGR/mOVZHirHPbPUWe+cm
iD1KMYe2iXHhkeLWfWuaIXSsaFmWqRh7VgWzkpfKwOhDE6Oa0Jh7Tn91rvVb
8Gp3DE6kaKxwt/CcsmqBJX7+T8+l0ngw9ah5kEkreJbFVrUdoHHK70FBgUkb
5I9PCjtX0ejwM2N4ZLINuC3tI9v1aBQe/uiRMtgO02utnJraROhWUMkxHOgA
X6/CL8ZFIvQ7U8NKbP4bokRXW7hxItxbgc//kXVCuPmoQOkvQvqC/TZuYxfI
uprY+21EWCatucsWd0MhoVsYU0Lkxe/LI3QPTCvqRzP+EqJZjXlIfFEvPK9S
Sb3yhXhx+/Ila33kYMC6uck0VojBRHRiUa0cSlqye0QBQsysJekJ0Ad5ibsa
0+yFKFAybnRjHzAV36s2awRov+PP04J178AybMePFm0CrHvv0epa/A7Gmg4K
JksEeKKeWlTi0A8qm3JlU7IAfT5UuT953A86Z7bFCYIEaOdb457BUoBLQNDE
g7UCdFElvbR8rICEntcz7xgLMK2uc4WD+QBEnOIsSBmgsEO5MuybewPw+o48
9ZqYwkjv+enlcwdBf9TFKSmbwnVKyqkreRD8A+24lyIpHH8VyJ8wIGB2spiZ
7k2h7mDqwpxoAk7V96KSWRTyEozoXy8TMC8wLJQvo3C91fUgURwBW09jhZvW
EZwbT7sTCVTQ/SFjTArlb7KcWdcJ3D9fmx9sRaG05NHOMh6BAucfdN0sKPzp
kjilTkIg583Yin/nULhgwXcru5GAr3P2p11al5djw8dKAnYcWeXz2RQqVVXz
v35FYE+rRdgxBoWcoNrHnAYCMU961DIjCr/d2ooDPQQ0Ka7vKwwpbO7dd1Qt
J2BZcVEzR+vTMR0zZvUTOJTrvzDMgMKnv3exHQiBA/cbd7P0KTS16++MGibA
PKc/M0uHwtIXx+KSRglExc+FUQ0ffQ8PWmd/IjDkTUWztU7MVZ4UqrV/5zTr
zfjCxyXrQhl1EwRcTbazj0zzUSR7X9o1ScDnZSBPOsXHvRGnd3+cJpCwYXLY
QusxkxG1RkNAHrrR68IkH/8DmBSeIA==
        "]]},
      Annotation[#, "Charting`Private`Tag$48479#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 1, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQ/WsZV6rNvx77riq1ysviR/af/rFa0PXJVDhfct6l
D9mec+F8pivK26VWLoPz63OL7GtV18H5n1pWKars2wTn/ziUOllj5zY434n7
9Uvtgl1wfoKzlcG5sn1wfuU+zagg04NwfkrCbD5b3sNwvuWvj1bfeY7C+QYz
197c8OoYnP/Qwm86y/4TcH7Nhctn1HefQujP3VfiNfUMnP+AsW+KzfRzcP4C
74WZT9wvIMyT0HPSMr4I54snrb0WbnQJzr+nG6/SqnAZzp9Vyqw3S+kKnL/Z
Vsr9j/xVOD+2I1kyjucanP/Hb/7y5TzX4XydGbzvP/xG8HcmvnNtf3YDzrde
fjCC9elNON8v/7hK86VbcH7Y5v1rXly+DefvLtdymX3hDpy/cd/xKb577sL5
cxrDFz7ffQ/Olzgumd646j6cX+GmLmfi9QDOj3++K036JILfd/J5d5P9Qzh/
x0ve/rv7EXwt77N5O8wfIdLXG9drlmsR/LQz26XX6zyG873eHrJdshjB1/A5
btur8gTON33dclRmMYLfdfq2po7kUzj/5kvtHP2ZCH6hp2j3JoFncL75y+2G
d1oR/B/Hgrf9ZHkO5zM+6xCfXo3gV1XuaT+9F8H/xPPh+///CD4Ams+oiw==

        "]]},
      Annotation[#, "Charting`Private`Tag$47015#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwV1nk4VG0bAHAUla3CWyGkKCp7Cym3eLMWspTojSwlLSilhUqLhJJpUSFi
zsxYxpZC4Q5FdjFjzsyYok0RoVIkvvP9da7fH+dc57m359b0C3ENlBATE1sm
Lib2/2fuJgNa72k6rPCrtWG/EGLryvtbfsXT4Y1s+urAKiEOL5Qcl02jw9jg
prolZUJcMyrwMUU62Lq9VMrKFWIVI0YvcQYBwTkT6hyaEDvmvnm1MYGAmrjp
vr69QpzoTZhOTmNAgeLRrV0SQrSP6T/k9JwFF20m9rQ6C1AuXMOnZC8bDEKj
3Bz/kJhlvXWNjaAQJMIvtriLeDioMUeF97sY2JlfUpK5XdjYeiE+YMtj6Gwy
6Blt4uLeGw9m5waXgucGhYi3bzkYrxUxf6iyHKxWu30q/dSJ/jIufzykKkC2
XbwveKIDx2Y2DZ9YUQVrx6q27ljWgdeCxM0czJ9DtZF3ucym1zi588i5tc7V
MO1yoNQ9qB1rQr3XPfqvBk7K+W7gmLXh69HlJgYXa2H/wjlWXgktaHG29vGs
2y+gs+zvsoapJvxx1OLsm8qX0Dddoejj3ojiSWaltr11UGVVtGLps1d4sEzy
hNxIPdSXhew4YluP6vaFp18vbAAdhX+ik6peosH7VZKjKxthVnPzJvv/XuDV
T5e58zya4IDGG3bMtxrcoOi7oOZUM+zrrCxm36lGO3sZUVtcC6ysy5C65/cc
Mz7f+iIsboX0jpqzArcq9Ej6dubf+jaonyW0T9SrwCKjQNQ42A7957SVTnDL
0but2n/xVDtsndPV4ZVSiiUjUo62V17DHM/K69rtj7HYztxjRLUDWBs6d8bK
l6B3SUHyB3YHXOv2DTM5WYyP6LJqUus6IXH03sQ6tSIsaPB8yWjohKG/af/+
vV+AXseuFR5348CRkKm6C2FsdLdRnU/z4EBxTXo47QAbtylnh+Xv5EDOyKJ3
xF42WuIL4z5vDnxrKf/Wu52N2jKTJZ4BHChvyy26b8zG4czgcvPjHGj/O+w2
/CMPL3fY1ognc+CoaW2vVlQeFhpJcK4JOLDEW846NSUXI6tVjchuDvifF+c7
3MpFu+1rry99y4GN3ltzpxJysSc0yK70PQeEzmyJE2dzcV5ha0XPVw68X3Y1
rXxvLobopxAm0xww/vUwWlE3F/VXrYngL+PCgfeHHdOf5WCu1j4V7cNcEP5c
nSQ+nI1xO+IN7UK4UHk6uMWrPxuDYgttDoZxoXz071DZh2xc/nXiaNFxLnx1
WNV7kZ+NGY8Smzad5cJBge4yx9psvGNVHrkjkQupQbsSzyRn43lf2bdXirig
6aPU32yVjR6pxVn9P7mQ+CXWcUcWC6Xi/Z+Y/+ZC0egNS60HLCw7pdSQMMGF
+uqqsh93Waiy88SQ/jQX2v/cNUi7zsI38zeYHZvdBeIJWpflT7Mw6Ep16x+V
Lphi+kumbmdh5NH2cVnLLkjaW0Bqz2Bhlt2Qs0FcF5zZbeicfYSJ+/g5qrsS
umBV5oyxy8FMXBm8v+/C9S6QTb9beHAfE4vje8520brgkGTkecs9TKxp7WBH
pXRBnaxotpgTE9+5l8o053UBzTRwukePiUv3nq8PauuCa8UWOpbDDMw4pQCZ
Sjz4ebVZW/McA59IFxpUL+DB9bg/L9+dYWBLyrYlPYt44Nb9Kpx1koETlbHi
6mo80HciYtccZaCHxHTtPW0eqKuQroGBDJSOH7BLWseDPQ2Xr/lvZWB46gvX
8548oDF2jy5czMA4PT/rdC8eyLaZe69UZuDDqmmTqt08sBLMPW+5gIGtPRv+
mfTlgZR/9kTEPAbqahfxIg7woNt3bbqiJAPfsNN2h5zmQXvXGJc2RKAdnti3
J5UH2bI+x/RqCTSSy3DLfcCDwtpdLm7PCVTxbrD8ncGDY+vTHY9WEjg4pqpK
I3hgM2LvWV1KIE2/uu1lPuV1Gs7JeQQK02TM9Kqp/zVxOSyVTOCLgTXLT9fy
4FuJ8ha/WwTmm+1RrH/JAz3LFlZ1EoHnuYWDvo08CJhmyMcnEKgltyPzVicP
Krkswe4LBB6JzJCZ/Ei9b/WlNOoIgTsbG37bfebBSz2rT3MOEWi56PvH2/08
qBAuKbl9gEDFki3PDb7x4Mt4THhXAIFlA/3h/r95IO2suvG6N4ES3mvfNEqT
oHNq+YMZDgQOsPY0LZQjwdzwTUq/LYGcsStlAXNJqDycMpO3hUAmTUCbUiRh
sMl7wfPNBG5tPGdrrEZCbHjUK64ZgbfNGgvvGZCgYqOmp7WKwBu60zvQiAT3
DxoKJ3UJTFBe8/eDCQkxbo2WrSsIvDSeZm9oSkKyX5p+ghaB4eVh7+osSXh3
+Mp/Z9QJDM1mxH61IuFjBKN+phqBh+4J9RW2kHBJQpO4qUpgwKktZ/6zJ4Fj
y6moXkSgu5my0o/tJKgmhB3zUSTQRdfpqbI7CUmxRxKUFKj/Vb7oCztImE8P
TmybR+C/41/z4rxI6M8qX+wlT+Ca8udbNP1JeCimPqdkDoGG2T8HbAJJeDRr
69Td2QSuvreSdmg/CX2yDdIXZlH5OXXrTelBEuxXRpRel6TibRYU4RROQlbL
Ut96cQLlddPUwk+Q4HPVqk8oRqC0ckftvZMkSF9JGh+dpqPEuPm8j5EkHDMZ
qdKZouPU59An0ueo7929GWb7l44TJLHbMJqEgeU384Mm6ThaNjf7zGUS5rUN
7qudoOMQ61/nh1dI+JO++5Uk5f67p37WXSWBZu5+Zds4Hd+dfL9Z4ToJGRpx
I19/0bHDtFTAukPCRnZ9xsGfdGzV+Xq+9S4JBW9+ZJI/6Ni4SHPFj/skpD7y
n3KgXPM77hikk/BbnbrEvtOx6jMqBz6k8sHXVK4ZpeNT8gfGZZHQaeFZZU+5
uGyPbBeThDSMVDswQsd81s3iP9kkrNScFohRzrn7ylMzj8ovK2E8bZiOjNi/
Uzb5JLDWzDxjSTnzpDFxqJAEsz02ez9/o+ODoP2OtGISBCGtIhrl+56pI6Ul
JCxb2nTYjfIdu9fJoidUfKflxBdTTjKVsphRToJIbffrT0N09P1Y17PjGQkB
ifzHBZT1aVcu5lSS0GWouPEM5UkLu+VTSIJbQUiAPeWmgdkN22uo+Bc7GahQ
vn+34SDxggRepU7a4CAdg7bEyY/XkfArbHd+LeV1ow5FWxtIAA0n/1TKkuky
7hlNJNya3FMRQZnj2Dz2vYUEl4rv5R6UM38n3LNtJ0FsfPSLBeVQYtvGlA4S
0o2W5a+hDK7yb4c4JHSIInIMKMtPt0Zb8ajzT6j0/t/duYlad/gkfNlp676W
co6nS/0XIRX/UHEpS8qnJOcHb3pDwt4tMuPOlO2KX8sm9ZAgMyvKIJDyAh9a
wYd3JBh+ZuWeo/xBxs3V9CMJu14Nh6RTflSm+DO+jwSr6PCzLyhfCOQkv/1C
9ffAkdXfKLso3N5g8pWEktkWtMVUfNTRQxQzRIKj8rxbTpQHDy44LxgmoXQ8
LOoy5YpFvKX630m4vy7LpZpy3Mvkl9E/SfjRXjRXgsqX51HPIO4vqt+2+1ba
Ul6hoSyjO0HVy7067//ne6yJz46cJIERYTrYS/nFyfsu7VMkbPXqaTej6oWm
7f19mTgfJDy8NB9S3tuheidiBh8qjWZkz6bqzfBct2mTJB/E42MvHqU8tSpN
qD6bD9U+d4reUE65rK5ZJ8sHK8Zv6SqqfoON39Yqz+UDLeTxeiOq3k3fpu87
PJ8PUsdynzIoc00185QW8GHy2ftLyVR/0D/2OgUt4oO1SkGvCtVPR2mZI89U
+PC+Rtw4k/Lcr8vW+2vwwWepuEnlGB3t05fXFOnwIXjJue7lVH8u2toXILmK
D0nTAQuaKX/6zZy1S48PX+aEM49T/XzRVXebmDEfbENSurh/6FgpuZp0MufD
lIUGUUTNC6NDRkMD2/gQW/BDZhU1f1yVOx+vceHDA7LvgKQUNU/rwqOiXPlQ
Wyld2kv5yZIy2bk7+bC7/N6SDGqebeBarDL25YPk1yVTa2SpeWixNejkUcq3
0pIWKBEYODBoUB3Oh/Xv2CKtfwiMuZv4a04EH8ZP169fv4DAhtGOmJQzfMiF
6H/8qPnrxNxFVF3ig+7XFbYti6n7ad7+dzOTqfPbCyI2LyfwZOXsnG33+NAU
a7f4DDX/7wfnhN1J4YNSQ9fBJzoEdr8YFNPJ4INW2DZZY+r+8D0VruGYzYeo
nvdWmw0JDH4XvTvpGR9eWzjK/dxAYFRJapdaDx8u7Ut6cNGVwMIZDjvhHR9m
Ox/yG3Mj8IPrL57vBz4sUT37OtiDmv8j2/lZn/kwVNye6OlJ4GL9Wd26I3zw
Gls003oPgRXMsN61EgLovjBlkhBM4MR9m6/btARg7ze+sOgSgfr93w+FLBeA
vuQBu8AYAv3MHg7e0BGAQWTQedVYAht5f4Y6VwvA6RBaJ8ZT51MqGtm1VgA6
dCn7azQCza6r/gq0EYDQ2PqtzEMqHtHD4meDBEAmWcv4IYFnr+meawkWgJhd
dsv5agIv3/ObXHxYALv0TuhkUvsIrYgz9ixMADErv+//U09gXm/ZwPhpAbRq
My172gns2RzNPX5NAOXf3efufk/tMxIK2YeLBXDaj1W9XJqBTvKOyytLBLBU
9lVsniy1b6lcypItFUBUunTv+rkM9DMeS8t9JoA1SRHOPkoMjPQT0L68EMDg
9/Ov+9QZWFiTGRnIE0Ao48JZwzUMXHjRxOW/SQF8EgVxtH0ZaGh0MubylAAU
Dohd4/ox0OFtRQVbTAiLDy2Uiqf2uUhzG92pmUL43PhJujeYgT3fPSXS5YSg
uFLMmHmcgTkBZ0t61IWwr8LvT2k8A2sVavtnawrhZkPVSMR1BnY/n6VptEwI
2z96K6xPYuBctaRr0SuE4NxyUbL+DrUfcrP2LTUUQp1zvvriTAZa2DQsCtgs
hHF2WnJPOQN3/pBzTrAWwkN3lPxRwcDQTNfLJVuEIG8TEy73nIFZU8KRmQ5C
uGAzredWx8DZpUONhKsQip8YjWzvZGDHCqWoPn8hLJUa4MkNMTBwjk9vcAz1
/pdZ5+6vZGJ76aWNsbFC8PVsLyzWZ+LGfTnJRJwQXsY8YLYZM1Gp9ue2nutC
6JNpHF1ozsQXkQlPPZKFkHeKiB53ZKLWcPlNS5YQtrADmsdCqH27S8lmQaMQ
/Nmq4bFVTHS6vOGhSbMQNhX6EIW1THxq4jvp0iqEnA/HDL69YiLtRm5xfIcQ
0svLhOc6mbjZwUpDXCiEe/6QOPyZiRmVIb8HBoRARhatblZi4R56Y061XDc8
zkvanBXKwtS5kRJy87rB/O+dq2oRLBSe1vPyVOiG3mq2fEYUCz2335jzbUE3
3B6yTs2MY6HrlEfQ4iXdYBCRHCpPsNDGs1c7wrgbDuhxFvULWKgn+ztj9c5u
cNjm3WqzLRsnj2knJ2d0w40N6bWHrXPQ/lVQXYquCLY5Z0ulmudhcOz9W9Or
RODbkRLZ/28eJtg1+/nri0DJUfHoJqc8bH1lML3SRASgliQc9s1D94ax9U83
ikDw7yvWtZg83NN4KZt0FsHPDK3V6R15eLQ5I+GfEyIQJdzu0jzCxpsJHV6n
TorArHb5JrGTbCzZOlNXdFoERt82LnsfzcZfzftf0s+JYHTF78NPbrMxskV/
yuSqCHIW5/ylVbLxSmtFiGuqCOQUJyW15PORdX1o05MHIpDP6g5wWJSPjU5L
ZFUeioCtY2V9fGk+yrZdZPUSIniklHqWXJePtDaH3tACEYiFxn/j+OTjo8TI
Ak6RCDrzbjpoBOcjxzk/yrREBJZvl2gfCc/Hhe3zVcTKRTCk1eipfDUfTW9Y
f/Z/JoJVpp+Kjt/MRy+X40/qK0UguflKXFdaPp6Zx7y06rkITgD7nTkrH1Pb
SdfEGhFEm3g+JYrz8X/TO8AN
        "]]},
      Annotation[#, "Charting`Private`Tag$49726#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzHk41Akcx3E6PE9CRYVEsmMTtmhcJfP1KEuuNB0mz5IOpMNRaktKSqkV
bSGF1mYKKYVWOVrfTOX6zYy5GGMGvzH4hVDaFp07+8fneT+vfz7L98Qww2do
aGj4q/d/PxVph6//dgUiry5znDNF4uYFX0UZ8elg+yGYv+sjiXdPjbsrh9PB
i2rdUj1Bon+gZOlFaQYktJWyokZJFHwJGI5k/Q7yggMRRB+JtCKjwgr765C2
84FlFY9EYurBAs/+bAgzML84xSbR+A/Ru4ObboMDe9NEGpPEGZIfni25XwQe
3Te8tLf3YtLhI3Da8hFYpgSO+a3uwYmU0uW0+kpojcusemPejVOc8EyrmqcQ
cnhLjb6eAj3mjgzZxNZCo6cWSk3lGLZhnR3/eD2M6JF5FtZdeLJ+ZTDTsQHe
WvU+jvOR4b6wPD033ZdQkmB7dH5qJ6799H7dpM5rOJDb9ij+hRTtbpXJyocb
oeET3WmGgRSVLgE5s7AZNPcqVYyjHZgoEHNX1LXCbeNOTpOgHdcero/3yeZC
JDOhVOLRjqRmRtb6HD7EtDlxH1RK8E/fO1H9XgKwmTZ8FLdKgkqjVR7WdCG4
zzLVV9WK0XBPWUfQGhEkDTKS93uKseenXbQL5mLYZlEa+qpHhLnHZq7KtZDA
RpsPsezjInzitsTry7J20O7SCjY0FGHIpb3GoTodcPPf3vLMl0L8ElBQXKwj
hXSv4NWSaCHa3tQdf/dZCqnXGGH3aUKs2T3mmTrYCR63ze6eIQXoWtzAmj0g
A0GIa/HiPAEGxDTRzou6IL8gEc+GCnDHE3z4RiyHNg3f+H/MBVj3q/XGPIEC
EjUfnp4rbMOK+qYs/+fdwJkq1w+PbsP85KA7VF0PuO08Om2i3YZGTcaRyaW9
MJonYWdU8vHEzyvMHHxI8GbLQtp383EXVRth0kLCycTLcYp5fMxoodLOgRL+
CjL4xbSZh9VDule7UQkt3rTx4CQeWvvyoqud+2DstVN5E/CQeOvZsbasD1gf
I1hGs3kYwX1m8thWBaEl+eKUFi76jHLc7rJVIAlEg8JsLlr5Nbml0/rhjOmr
jbwwLjqOpLxeyu4Hd4ZZtLcdF38j5CttjQcg80LKi5laXJQN2RxafWsA7JnM
DD05gXGbFqVVzh+ElmN9tYeqCHQeemavuDAI2y4NO3ZdJ3CqcevT6VkU7BGe
ED6NIVBz8JJhzikKrmm6uowGEph/Truu5DQFzCVlFvvVdll2JbQ2iQLSj01X
bSYwlnX1Xvd5CvZ/N2mRBRBItmbTaVcooOUyOM1+BNY/LtxckU+Bb5H3aJk3
gQknn6cSf6v/jGN/zHYncPFihk03UqA4GK5cqHZlJfLHGihw7OzhZAGBQyOc
RfqNFAR+C5nOYhDICm1hs/gUOJxNd8hZT6DThg4c6KGgJLhCVehCoKg3aO8k
SYGRzxstS7WjE2Vac1QUbN/KDix2JvBelcLflqLA9cm9oIdOBC60UsmPjFNQ
USKnVzsQWP5qX1LKewoyI+hprmr77R60uPGBAg/GvDlIJ/B87lBUzSQFuq5b
TzSuIdDM+aAuMU2BVVhdlI/ateK35YrPFMwvKE7m2xO4IzZ629hXCponDV8w
1Z7QeTf5/TsF/gd0LKV2BP4Hz3CaPg==
        "]]},
      Annotation[#, "Charting`Private`Tag$138215#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.014156776511059444`, -0.3878423148593359},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.58, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.56, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.54, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.52, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.48, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.46, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.44, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.42, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.82291846633381*^9, 3.8230837667111855`*^9, 
  3.8230838617311664`*^9, 3.823083977663309*^9, 3.823084026231628*^9, 
  3.83180358456513*^9, 3.831804976754747*^9, 3.84779159790709*^9, 
  3.8515771360174575`*^9, 3.8515773623178988`*^9, 3.851577396795745*^9},
 CellLabel->
  "Out[282]=",ExpressionUUID->"f1fceef3-bd6a-4abd-a9ba-6835afb4de6f"],

Cell[BoxData["\<\"rate-plot-smoothed.pdf\"\>"], "Output",
 CellChangeTimes->{3.82291846633381*^9, 3.8230837667111855`*^9, 
  3.8230838617311664`*^9, 3.823083977663309*^9, 3.823084026231628*^9, 
  3.83180358456513*^9, 3.831804976754747*^9, 3.84779159790709*^9, 
  3.8515771360174575`*^9, 3.8515773623178988`*^9, 3.8515773970251336`*^9},
 CellLabel->
  "Out[283]=",ExpressionUUID->"514f101e-5593-4a14-90e2-3f99d251d3af"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Checking", " ", "whether", " ", "the", " ", "drop", " ", "in", " ", 
   "rigidity", " ", "is", " ", "consistent"}], "*)"}]], "Input",
 CellChangeTimes->{{3.8008883295037346`*^9, 3.800888351453005*^9}},
 FontSize->36,ExpressionUUID->"7f1fe133-f7f8-4d8a-b69e-5e7ed52d96e5"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Clear", "[", 
    RowBox[{
    "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", "G1", ",", " ", "G2", 
     ",", " ", "G3"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"g1", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], ":=", 
     RowBox[{"(*", "2.869403642609392`", "*)"}], 
     RowBox[{"3.1222703395011506`", " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "0.08336178001420615`"}], " ", "G1"}], "+", 
          RowBox[{"0.008894441223598058`", " ", "G2"}], "+", 
          RowBox[{"0.3091129700312998`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
    ";", 
    RowBox[{
     RowBox[{"g2", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], ":=", 
     RowBox[{"(*", "6.763107950731276`", "*)"}], 
     RowBox[{"6.188414869493781`", 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"0.028347844712845453`", " ", "G1"}], "+", 
          RowBox[{"0.15905674309004092`", " ", "G2"}], "+", 
          RowBox[{"0.0030681531807021305`", " ", "G3"}]}], ")"}]}], ")"}]}]}],
     ";", 
    RowBox[{
     RowBox[{"\[CapitalSigma]", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], ":=", 
     RowBox[{"(*", 
      RowBox[{"-", "0.12219815117835163`"}], "*)"}], 
     RowBox[{"0.00854796983106368`", 
      RowBox[{"(", 
       RowBox[{"1", " ", "+", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"111.07469724415829`", " ", "G1"}], "-", 
          RowBox[{"20.385388794158857`", " ", "G2"}], "+", 
          RowBox[{"30.541264956646692`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"youngs200", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"27", ",", "0.91"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"43", ",", " ", "0.64"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"63", ",", " ", "0.5632"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"78", ",", " ", "0.58"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"92", ",", " ", "0.6123"}], "}"}]}], "}"}], ".", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", " ", 
         RowBox[{"R0", ",", " ", "0"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", " ", "1"}], "}"}]}], "}"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"youngs75", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"21.1", ",", "0.6"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"34.0", ",", "0.54"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"44.2", ",", " ", "0.47"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"58.0", ",", "0.45"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"109", ",", " ", "0.46"}], "}"}]}], "}"}], ".", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", " ", 
         RowBox[{"R0", ",", " ", "0"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", " ", "1"}], "}"}]}], "}"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"ylplot", " ", "=", " ", 
    RowBox[{"ListPlot", "[", 
     RowBox[{"youngs200", ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Green", ",", " ", 
         RowBox[{"PointSize", "[", "0.025", "]"}]}], "}"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Epsilon]z", " ", "=", " ", "0.10"}], ";"}], " ", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"ystored", "[", 
       RowBox[{
       "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
        "\[Epsilon]z_"}], "]"}], "[", "t_", "]"}], ":=", " ", 
     FractionBox["\[Delta]L0", 
      RowBox[{
       RowBox[{"storedLengthFunction", "[", 
        RowBox[{
        "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
         "\[Epsilon]z"}], "]"}], "[", "t", "]"}]]}], " ", ";"}], " ", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Manipulate", "[", 
     RowBox[{
      RowBox[{"Show", "[", 
       RowBox[{
        RowBox[{"Plot", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"ystored", "[", 
            RowBox[{
             RowBox[{"g1", "[", 
              RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", " ", 
             RowBox[{"g2", "[", 
              RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", 
             RowBox[{"\[CapitalSigma]", "[", 
              RowBox[{"0", ",", "0", ",", "0"}], "]"}], " ", ",", " ", 
             "\[Epsilon]z"}], "]"}], "[", "t", "]"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"t", ",", 
            RowBox[{"normalizedTime", "[", 
             RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], " ",
            "}"}], ",", 
          RowBox[{"PlotStyle", "\[Rule]", "Red"}]}], "]"}], ",", 
        RowBox[{"Plot", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"ystored", "[", 
            RowBox[{
             RowBox[{"g1", "[", 
              RowBox[{"G1", ",", "G2", ",", "G3"}], "]"}], ",", " ", 
             RowBox[{"g2", "[", 
              RowBox[{"G1", ",", "G2", ",", "G3"}], "]"}], ",", 
             RowBox[{"\[CapitalSigma]", "[", 
              RowBox[{"G1", ",", "G2", ",", "G3"}], "]"}], " ", ",", " ", 
             "\[Epsilon]z"}], "]"}], "[", "t", "]"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"t", ",", 
            RowBox[{"normalizedTime", "[", 
             RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], " ",
            "}"}], ",", 
          RowBox[{"PlotStyle", "\[Rule]", 
           RowBox[{"{", 
            RowBox[{"Orange", ",", " ", "Dashed"}], "}"}]}]}], "]"}]}], "]"}],
       ",", 
      RowBox[{"{", 
       RowBox[{"G1", ",", 
        RowBox[{"-", "0.08"}], ",", "0.08"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"G2", ",", " ", 
        RowBox[{"-", "0.2"}], ",", " ", "0.3"}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"G3", ",", 
        RowBox[{"-", "16"}], ",", "25"}], "}"}]}], 
     RowBox[{"(*", 
      RowBox[{",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Epsilon]z", ",", " ", "0.01", ",", " ", "0.1"}], "}"}]}], 
      "*)"}], "]"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ysplot", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"ystored", "[", 
           RowBox[{
            RowBox[{"g1", "[", 
             RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", " ", 
            RowBox[{"g2", "[", 
             RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", 
            RowBox[{"\[CapitalSigma]", "[", 
             RowBox[{"0", ",", "0", ",", "0"}], "]"}], " ", ",", " ", 
            "\[Epsilon]z"}], "]"}], "[", "u", "]"}], ",", " ", 
         RowBox[{
          RowBox[{"ystored", "[", 
           RowBox[{
            RowBox[{"g1", "[", 
             RowBox[{"0", ",", "0", ",", 
              RowBox[{"-", "4"}]}], "]"}], ",", " ", 
            RowBox[{"g2", "[", 
             RowBox[{"0", ",", "0", ",", 
              RowBox[{"-", "4"}]}], "]"}], ",", 
            RowBox[{"\[CapitalSigma]", "[", 
             RowBox[{"0", ",", "0", ",", 
              RowBox[{"-", "4"}]}], "]"}], " ", ",", " ", "\[Epsilon]z"}], 
           "]"}], "[", "u", "]"}], ",", 
         RowBox[{
          RowBox[{"ystored", "[", 
           RowBox[{
            RowBox[{"g1", "[", 
             RowBox[{"0", ",", "0", ",", "8"}], "]"}], ",", " ", 
            RowBox[{"g2", "[", 
             RowBox[{"0", ",", "0", ",", "8"}], "]"}], ",", 
            RowBox[{"\[CapitalSigma]", "[", 
             RowBox[{"0", ",", "0", ",", "8"}], "]"}], " ", ",", " ", 
            "\[Epsilon]z"}], "]"}], "[", "u", "]"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"u", ",", 
         RowBox[{"normalizedTime", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], " ", 
        "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", "Red", "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Orange", ",", " ", "Dashed"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Orange", ",", " ", "Dashed"}], "}"}]}], "}"}]}], ",", " ", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Show", "[", 
    RowBox[{"ysplot", ",", " ", "ylplot"}], "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"yplot", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"ystored", "[", 
        RowBox[{
         RowBox[{"g1", "[", 
          RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", " ", 
         RowBox[{"g2", "[", 
          RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", 
         RowBox[{"\[CapitalSigma]", "[", 
          RowBox[{"0", ",", "0", ",", "0"}], "]"}], " ", ",", " ", 
         "\[Epsilon]z"}], "]"}], "[", "u", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"u", ",", "0", ",", "endTime"}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Black", ",", "Dashed", ",", " ", 
         RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"AxesOrigin", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}], " "}]}]}]], "Input",
 CellChangeTimes->{{3.8008710972252083`*^9, 3.800871099374457*^9}, {
   3.800871168429682*^9, 3.8008712133355246`*^9}, {3.800871323638405*^9, 
   3.8008713894223824`*^9}, {3.800871618541996*^9, 3.800871618814297*^9}, 
   3.8008720060228033`*^9, {3.8008720423585787`*^9, 3.8008720496690164`*^9}, {
   3.800872094606753*^9, 3.800872095117386*^9}, {3.8008745647938023`*^9, 
   3.8008745719117603`*^9}, 3.8008754885117135`*^9, {3.8008756009740715`*^9, 
   3.8008756045345345`*^9}, {3.800875649806404*^9, 3.8008756820481305`*^9}, {
   3.8008866956896935`*^9, 3.8008866973203287`*^9}, {3.8008988275420446`*^9, 
   3.800898831573258*^9}, {3.800953168364375*^9, 3.800953173686146*^9}, {
   3.8010369484060216`*^9, 3.8010369495100384`*^9}, {3.8010443444883184`*^9, 
   3.801044381543169*^9}, {3.801044605256643*^9, 3.8010446118709445`*^9}, {
   3.8010578051084385`*^9, 3.8010578292518125`*^9}, {3.8010579976931314`*^9, 
   3.8010580670355897`*^9}, {3.8010581799145584`*^9, 
   3.8010583188189077`*^9}, {3.8010594767630663`*^9, 3.8010595417356358`*^9}, 
   3.801128278745989*^9, 3.801128328680489*^9, 3.801149583517888*^9, {
   3.80122936578269*^9, 3.801229384263288*^9}, {3.8012296145506983`*^9, 
   3.8012296148528705`*^9}, {3.801239813783267*^9, 3.801239826294819*^9}, {
   3.8065024711613064`*^9, 3.8065025295352488`*^9}, {3.806502609298272*^9, 
   3.8065026125056973`*^9}, 3.8065028529290123`*^9, {3.8065028850541377`*^9, 
   3.806502980336345*^9}, {3.806503078268524*^9, 3.8065030784430246`*^9}, 
   3.8065031708180285`*^9, {3.806503273960908*^9, 3.806503275832902*^9}, {
   3.8065033110776906`*^9, 3.806503396162197*^9}, {3.8065086272267623`*^9, 
   3.8065086342070985`*^9}, {3.818405553577652*^9, 3.818405577489681*^9}, {
   3.8184948729826546`*^9, 3.8184948794457345`*^9}, {3.818494942944667*^9, 
   3.818494947488448*^9}, {3.8184950020001926`*^9, 3.8184950147289195`*^9}, {
   3.818495045576215*^9, 3.81849504769821*^9}, {3.8188444445317497`*^9, 
   3.818844572355569*^9}, {3.818844752476142*^9, 3.81884476561103*^9}, {
   3.818844819531851*^9, 3.81884482577917*^9}, {3.818845534812706*^9, 
   3.8188455482268457`*^9}, {3.8188455818439493`*^9, 
   3.8188456224105253`*^9}, {3.818845688622549*^9, 3.81884575538706*^9}, {
   3.818845797348879*^9, 3.8188458047550955`*^9}, {3.818845937283801*^9, 
   3.8188459434752226`*^9}, {3.8188460136049337`*^9, 3.818846014659116*^9}, {
   3.8188460647003603`*^9, 3.8188460666192045`*^9}, 3.8188538354967346`*^9, {
   3.818853866263505*^9, 3.818853866453997*^9}, {3.818853905823745*^9, 
   3.8188539204616113`*^9}, {3.818854025960322*^9, 3.8188540267821245`*^9}, {
   3.8188552231684628`*^9, 3.8188552308868484`*^9}, {3.8188553193284116`*^9, 
   3.8188553195667725`*^9}, {3.818864300267841*^9, 3.818864300482272*^9}, 
   3.8188643813081636`*^9, {3.8188644211895795`*^9, 3.818864429035569*^9}, 
   3.81886466014837*^9, {3.8188647123707347`*^9, 3.818864713257364*^9}, {
   3.818866165684*^9, 3.8188662081155624`*^9}, {3.8194575269003916`*^9, 
   3.819457560747984*^9}, 3.8216325369221344`*^9, {3.8225568355886946`*^9, 
   3.822556841972622*^9}, {3.82298322634278*^9, 3.822983259541902*^9}, 
   3.823414356229096*^9, {3.831807461117424*^9, 3.8318074649991817`*^9}, 
   3.834728306958658*^9, 3.8366575705366497`*^9},
 CellLabel->"In[87]:=",ExpressionUUID->"3a729a4f-da0e-46a4-a9ad-6ae71069ee01"],

Cell[BoxData[
 GraphicsBox[{{}, {
    {RGBColor[0, 1, 0], PointSize[0.025], AbsoluteThickness[1.6], 
     PointBox[{{0.0127410988599535, 0.91}, {0.02029137966585187, 0.64}, {
      0.029729230673224832`, 0.5632}, {0.03680761892875455, 0.58}, {
      0.043414114633915625`, 0.6123}}]}, {
     {RGBColor[0, 1, 0], PointSize[0.025], AbsoluteThickness[1.6]}, {}}, {
     {RGBColor[0, 1, 0], PointSize[0.025], AbsoluteThickness[
      1.6]}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0.01210207769799618, 0.5439333333333336},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0.01210207769799618, 0.043414114633915625`}, {
   0.5439333333333336, 0.91}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8065033902918572`*^9, 3.806503397064748*^9}, 
   3.8065086044885654`*^9, 3.806508635663232*^9, 3.8073633546585054`*^9, 
   3.807363705314534*^9, {3.818405572231143*^9, 3.818405578954605*^9}, {
   3.8184948797677107`*^9, 3.818494894953822*^9}, 3.8184949480725555`*^9, {
   3.8184950024842243`*^9, 3.818495015173382*^9}, 3.8184950485827584`*^9, 
   3.81849524662533*^9, 3.8188444343905015`*^9, {3.8188444873309026`*^9, 
   3.818844491995405*^9}, 3.8188445251278553`*^9, {3.8188445606987553`*^9, 
   3.8188445728452864`*^9}, 3.818844766501646*^9, 3.818844826815405*^9, 
   3.8188448935729074`*^9, 3.8188449286860356`*^9, {3.8188456069658155`*^9, 
   3.8188456228892455`*^9}, 3.818845691097954*^9, 3.818845755894703*^9, {
   3.8188457983801217`*^9, 3.8188458052926416`*^9}, {3.8188459983375773`*^9, 
   3.8188460152654943`*^9}, 3.8188460681341543`*^9, 3.8188461109318495`*^9, 
   3.818851303214933*^9, {3.818853825945298*^9, 3.8188538358877163`*^9}, 
   3.818853867047387*^9, {3.818853906799114*^9, 3.8188539207767463`*^9}, 
   3.8188540275430927`*^9, {3.818855223869616*^9, 3.8188552319210863`*^9}, 
   3.8188553203776073`*^9, 3.8188643011185436`*^9, 3.818864349961989*^9, {
   3.8188643822047663`*^9, 3.8188644297058086`*^9}, 3.8188647304963055`*^9, 
   3.8188660540721235`*^9, {3.8188661789894085`*^9, 3.8188662086381674`*^9}, {
   3.819457527880741*^9, 3.819457561287513*^9}, 3.8216325370837173`*^9, 
   3.821634798399688*^9, {3.8225568289285297`*^9, 3.822556842153139*^9}, 
   3.8226569545788593`*^9, 3.822664646152847*^9, 3.82298311437743*^9, 
   3.822983229200164*^9, 3.82298326033877*^9, 3.8231659960115275`*^9, 
   3.82316604718719*^9, 3.823166575914003*^9, 3.8231689575316806`*^9, 
   3.823170262030984*^9, 3.8231703786420736`*^9, 3.823414357452565*^9, 
   3.8318031660891075`*^9, {3.8318037440787935`*^9, 3.8318037686846657`*^9}, 
   3.831804111917215*^9, 3.8318065571059103`*^9, 3.831806723173236*^9, 
   3.831806898277603*^9, 3.831807391018427*^9, 3.8318074656298504`*^9, 
   3.831808288066995*^9, 3.831819598903963*^9, 3.8318933870202503`*^9, 
   3.831893887182246*^9, 3.8318976520336957`*^9, 3.83206568748563*^9, 
   3.834728211058234*^9, 3.8347283071576815`*^9, 3.8366575753737545`*^9, 
   3.841756627644086*^9, 3.8502954774016757`*^9, 3.8503259172584763`*^9, 
   3.8503259940218945`*^9},
 CellLabel->"Out[91]=",ExpressionUUID->"7042ae95-9808-413a-8cf6-1e279bc77a90"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[1, 0, 0], AbsoluteThickness[1.6], Opacity[1.], 
       LineBox[CompressedData["
1:eJwV0mtUjAkcBvCKKe10sUR7RnYNoWhtsaemix4pyZatWBpJbNFNSS5rEm2F
XURNNztH94h2B80kodpdjGqjSaX71TTN+77TTBOxolL77of/+Z/fp+f58LCD
orcd0NHS0tpK3/9/rsGki9P0JaSKLY4lj2kg1c2NPRt5GYOSuughjQYXtSFu
6L4MV5WqEyoNZo8nLdlzPwXh+TtVn+QaTB0+N+PM4eMZY037lTYN3uw27N/7
Jg0Vic7v7R9q0G2zOLswOAuWe9p/tkvSQNjntGC5Rw5mV7CP3GRp8PrfFJl2
bjHSXtf7OP0wAr9Kjszqt1v4LNZiwL5CDZG0eenK+2I4VnxTE2CtRqcwWjIS
eQ/9zibxkjIVblpEcLbJH2A7J6hsxksF1nxptvpaNZgOJdky9TBGN/3zRaLl
I0wVJITduDqM676dUn/ZY4yfnmCu8RvG6kyzk95/SfB2d8b84oXDYKxInZsR
VwN+2zzbYJkSejM2G0ys67DBfpZ3d5kSvUb6oSL9eqzn8ePk55SYfciIly15
hv0XYjyO71NiepZHQmFRA34aFLatcVJiiUzMVvAaEScOPhNopsRz3eL2KtMm
pFR57BdqKxHNYQrSGc3gO+YsTiEpVKedb+TLmzHQGlV8vpnCEd2CBLPWFnQf
Ly0YqaLwZ573jPujl7BOd/GqLKEgDlz4VpDTCr0zRtkhAgpGDieCeMltkF9W
2zmcp7Bg/aj7zxHtyNhmIQo5SUEUPDNuvqkDkx/WjpBRFMqLfzfnru2EsWP1
d2E/UggyPlhbZtwF09FMbsFOCrGZtfKrM13Q7spZ1+BJwXx9pZSt6oYwwOza
qAsFnmGNVVNtD+4pXBt22VOw/RiuZ3CvF987Rz0tsqaQa7DCLzqjD7bsvl1a
lhQEriePxkT1o6cx6eMom8JUVhhT238AmetCe8UsCow5dgYBi14hUUks8DSh
8LjlF5/p9FcYuLH91l1DCr42Qd7lOjKcpo56duhREBZeKLc/LMPx3JzXfjoU
Kr+K72CQMqzI351aOEUiz2a6XLFjEOWpQtcz4yRsfT19DBoH6X0tJazGSAiS
hnx13OT0jq1SloyQeLFZ38igTI74rWm30ykSVazJXwMsh/DgxA6iXk4iLpFX
/UgwBPNCCevYAAnGhIvfO4YCCTWZ0z49JNwSOksPnVKAWXvx1Jt2EtyrE0+m
hhUo4Bbted9CosIhInxYrYDYsPv5EG2Tni7jTo0C9WEvHV/SfrHoYcDdMQV6
t8xhi2i75554Hz6hQKx7qFYE7XUF7yw79Al8KA2c199MwuiGhi+2ILD0EDe+
rolEpHugXf4qApZPI5dV0K4npH2XrAi0pFo9u0777Mrbq8KsCWyQCM2SaE+W
HHz6JYfAHfusNifalJAaT95MoDgq9krZCzrfi5sXu4VA1sKxHYW0r6vr3EI9
CWiWMU35tPd+fTNtozedV7IoL4p2+50Dqz/uJDD5qehvC9rferc1E1wCG2OY
l0xpp4268Vr9Ceg/MfLXpe1lbV5TGkhgiiOfkDeS+KMp42DuPgLXPpVJW2jP
iZk1LzmIgKSXVfSYdsjnRx/w9tP9lrN4ItoS8WBgSAgBwUqRdz7t/wB0/4RG

        "]]},
      Annotation[#, "Charting`Private`Tag$42164#1"]& ], 
     TagBox[
      {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwVzns01HkABXBkPDJGtlrbc7F6EOcYvSZHe5Px2FJSrZweo6NSyppKu0bZ
Ta+tjLfCJpaNVCSKPFKp8YgMRsk0Ia/5/mYYM6vVKmH2t3/cc8/nr3utAvlb
D+jp6OhsovN/z2B+cXWZioGkXf/eM3MNxAYZEedDYlGzq9vrOEuDaF0UN8li
cchsIMrGRAP9sbOWe8ri4BZrWB+rr8HE0Qva7zkJiLkhjA0bU2Nkl2l3wEgi
+KRllbBLDRl7QXr2vqvo5rzSG7ijRn6Xy+xFXtcxzBPHMTao8ffHuF7djFxE
ezbmRUQPY0clp9c+tQCNhS23C4dUKBJLrJeUFWPTy6OnnPaqIM3ni4ZDSlFm
ay26Lh1C3tLDnK395WBXbd4+GjSEuTPF6aobVbhWkMwx+TQIjfuLb87YViP6
41M7Vsogcnyl4p29z6A6l2K9zm0Qy67MP+nzRITTqZMS0YgSjMXxM5JP1UJ4
0cH4VoEShlr2ulmO9TCPf3/pSagSnSzjg0XGDfCLu/yJz1ZCP5QlSBc1otIx
osxpUoGpaV5R2X81wfmdq+vxBgUse4ut5IJm/NHpkGaRrsBLg9w3jyxaEa15
8ODnMAX4HJO0JIYE+dxF1UbeClQlXmpO6JdglntTjaedAscNsqLmv25D1zrf
7yqMFHic6aP1qH6FDyab8uIHKRTzvv4n7fprZIm28YpbKbCcwwMFwna8DLN3
UD6kMHutxuP04TfY/HQ5tzGLQtE+7ZiNeweCO2XDL2IolOTetvF3kiJA1V7X
IqAQaHak7r7ZW1w4wLyaf5BCxJW6/mvatwgOuRmX6kfBZm2l2GpIBpG/9f41
nhQEprX2rXXvcDG4+sZ0ZwqrPgcbMks7sXV63THKnkIGc/EOfnIXEoQjHblW
FNLcToYd+6kbWecmwyMtKExcPWSiu/M9yle4GfBMKTCMVjN3z+vBSt0qpzJ9
Cs/aft8yldQDVXvWdusJAl92oE+JXi9yxjdrW0cJ8rMvl6w52ouKbRUOUBNU
fvtbB4PqhbssJ6CaIshkT5XIf+zDzPL7IWv7CFb5btzCbO7Disd6bW2dBGln
B3z1uP0wjVzcYiglaPE0ZjHv9yP9zpRk6hXBo7lfLu62HQDzxBhl1kpw6oyg
qjptAHWYZNc3ETDGXXeMMuR4KjaVyRsIuFHSe6GRcrQrU0WW9QT+18afTwzK
sXC4YlJWQ/DQ+XDwoEoOi+alpyW0Z717ayZVy7FkgaPBC9ot8yp2P/ggh9+k
zqJS2h4Z4f8Gj8uRHX8yN5728qxR2w5jAtdf3IrcabNuqhOKlxIkKPp6SkUE
IR681X/aEaxO+WR+l3YDEXfF2BN4RYd65dA+v+Su3SFHAnvuidok2l9uHalZ
yCHYM1aq5dNW5CvGhJ70jld02DLaHt7+mRE/ELhsaPtsTTtHVc89uJEgMol3
YS7tAIe8xPU+BNvHXAqMab8pPLDssx9BlWUPR/GcYIVPu4T4E6QEzlG+p52o
4Qpe7ySA5lJmB21vR5vaezyClappc+pp32lNPpKxl2BNt0n3E9pGx6Z9JQwk
+HWh262HtIPMw8oF++nfw3nhhbRFxX28oCCCiliO903a/wHDE4Yv
        "]]},
      Annotation[#, "Charting`Private`Tag$42164#2"]& ], 
     TagBox[
      {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwVzns4VAkcxnFNKAy6kJYopYtQpM0l9aaQ7ULqCQmJ3CvFI6NsFCWKcqlU
WCrZkhixSrKkiCLjTimDc84YZ4bksmHZs3/8nt/z+ev7aroH7PdkSUhIHGHu
/z+PPWluNn0N6w8eoHKKxKiTTguNOh6H5Md7z7hwxYidBe7HzjgoxI1ILswV
Q3L84jKX4nhwNQh27EMxpk5dmtlqfAOWdpUm2UlifD8s//XI9wQYVXi+uRMo
RqeB+r1Mj5twl9+iA0MxcrrMlFdap6JKh5+YWiZC39GR63RkKu6PSZd2l4iw
hMyRLfw7Fc0H0g+vKRYhXqwqscMoDUWcYroiT4TAmX+EbqvS8cimvEs9U4TU
G05uNqwM5G0NsAiOEsGjYNGm2O5MLB42jbm0V4Sh0Xj+rLQsVITe8nUR0GCl
xcUJX2RhTVKgWhJBY6HFNZOm5izsS9GW/tBDY1NiTMJD9iNoBkeFmXfR+H1d
lPnOsEfg9g08tm6kIesdmnntcDb6CkLGXpfS0Gr3OKqi+hgnlGG6MYmGQ4kx
X/f2UyQWxTu1W9L44lnrFVPwFBmt1f63dtBwm+9ME3VPMWSlstTenIaPT/h4
umQuPhzS9uw0o8FZVCU/PzAXyhmFGDOkcTfwgOnonmdQ7q59Hbqcxknl4hrX
Wfk4aN6qlyVBI7+Ot3x1MRcBSpsrzCoG0J4TUCk6XgSjOkX9KOsBZK/xM97f
+wIu4gn/LoEQqgvr7tEPSnFq+9uW+utCDFq+X3xBuxxbM4T9qy2EeGjXXufE
r0B2plmgorQQOslLztqWVcJSkeZuq+2H1Krr85LOvcNw/fOIbSn9mDNjsE1J
vxp6i9v+rfHvxxcFGe98mRp09F693Ip+SJ5U4NyrrMXZg8PpUO3H9GzriMz7
H3HdZu/yvBEBlvG5mgSnHjMDH82SGwX4IJ3V+kqlAX5Fc+LoQgECjOVSEqV4
eBJmMMC7JUBpwpX6G708xLJrfwSECRAonRGxpLkR6nfs1aKOCvA63XbGqrwJ
ztudI+9YC8B1XfQjJbUZDrK/HkveIICCaYg752oLpoJ89Gk1AZS3DFqF+7Xi
jHxkNG+OAPkeM+Nalm3gJfnckRylUJj1WMtxQztUq4/JJfApuCv6VxUodmB4
0vXFlgYKoclVvXdnOjDUIjPXpoyC1paSOs2BTgxeGvE+n0uBI/9Ot6HqMyqc
o9+fS6ew6afvHHbRF6yI2sUi4imksVc5BCR1wVU+xH4kgkLKjrNBp098xQLj
Mo2WIApTN33kZjl9Q9cBmQW6XhSk5hqxndW68cAm7tT3QxQqGi/vm07sxuyP
VVzjvRTsDNxtC1l8DOuKbBrNKeRkxhSanOJjV5NBxwIjCiVLz7dJUXwYlpRk
ftOhkG4wXUgc7MHz4ZVEsyazz273PnZ9D/o3a2S7qTB7LvbZsSx6wVq2VC9a
nsKnnTIK7IJeZOTtuceVpPBKdTLaWbsPoZdaiHOTJM5d4JSWp/QhMsW70egH
CakJc4cRKQKeh2KrfQdIWES0550MI0DMHle36CXheHfizZSQwL/Kv/T8+Ezi
L1M/XyFNoNaF39bEWOlzh2K7mECw/XTjc8af1F46Px8m8CR4Q0cQY6u0kDHf
CQIG63xWjnSSMMwY0W6TIfGmaX3paAcJhUfiG9w1TLfc88tUG4njVq5Gf6wl
8fJWz9kuxjVkXdc1XRLLF9/UKGMctTp3rY8+iRO4HRzOePJP/7caxiRSlowe
ZTEW5AjGr+4kkacLQ5lWpr/HMT30NxKyEg+0hC0kHtLVFt67Sagr6al9YHxE
Lzthuy0JuVX5KnGMW5956vy0J6En62Azn/FG2xYe6Uiib5LnM9xMImHQgtPs
RMI83P9KE+M9+lrv8lyZ/rGx1puMnzQk+ae5kYj/TEiFMJ57evaCq+4kVigM
mTgy9pof9IJzjMSUtFKQCeNKbo+rlxcJXsM+rirj/wDjjQqz
        "]]},
      Annotation[#, "Charting`Private`Tag$42164#3"]& ]}, {}}, {{}, {
     {RGBColor[0, 1, 0], PointSize[0.025], AbsoluteThickness[1.6], 
      PointBox[{{0.0127410988599535, 0.91}, {0.02029137966585187, 0.64}, {
       0.029729230673224832`, 0.5632}, {0.03680761892875455, 0.58}, {
       0.043414114633915625`, 0.6123}}]}, {
      {RGBColor[0, 1, 0], PointSize[0.025], AbsoluteThickness[1.6]}, {}}, {
      {RGBColor[0, 1, 0], PointSize[0.025], AbsoluteThickness[
       1.6]}, {}}}, {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0., 0.},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0., 0.7}, {0., 0.9709175508821152}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8065033902918572`*^9, 3.806503397064748*^9}, 
   3.8065086044885654`*^9, 3.806508635663232*^9, 3.8073633546585054`*^9, 
   3.807363705314534*^9, {3.818405572231143*^9, 3.818405578954605*^9}, {
   3.8184948797677107`*^9, 3.818494894953822*^9}, 3.8184949480725555`*^9, {
   3.8184950024842243`*^9, 3.818495015173382*^9}, 3.8184950485827584`*^9, 
   3.81849524662533*^9, 3.8188444343905015`*^9, {3.8188444873309026`*^9, 
   3.818844491995405*^9}, 3.8188445251278553`*^9, {3.8188445606987553`*^9, 
   3.8188445728452864`*^9}, 3.818844766501646*^9, 3.818844826815405*^9, 
   3.8188448935729074`*^9, 3.8188449286860356`*^9, {3.8188456069658155`*^9, 
   3.8188456228892455`*^9}, 3.818845691097954*^9, 3.818845755894703*^9, {
   3.8188457983801217`*^9, 3.8188458052926416`*^9}, {3.8188459983375773`*^9, 
   3.8188460152654943`*^9}, 3.8188460681341543`*^9, 3.8188461109318495`*^9, 
   3.818851303214933*^9, {3.818853825945298*^9, 3.8188538358877163`*^9}, 
   3.818853867047387*^9, {3.818853906799114*^9, 3.8188539207767463`*^9}, 
   3.8188540275430927`*^9, {3.818855223869616*^9, 3.8188552319210863`*^9}, 
   3.8188553203776073`*^9, 3.8188643011185436`*^9, 3.818864349961989*^9, {
   3.8188643822047663`*^9, 3.8188644297058086`*^9}, 3.8188647304963055`*^9, 
   3.8188660540721235`*^9, {3.8188661789894085`*^9, 3.8188662086381674`*^9}, {
   3.819457527880741*^9, 3.819457561287513*^9}, 3.8216325370837173`*^9, 
   3.821634798399688*^9, {3.8225568289285297`*^9, 3.822556842153139*^9}, 
   3.8226569545788593`*^9, 3.822664646152847*^9, 3.82298311437743*^9, 
   3.822983229200164*^9, 3.82298326033877*^9, 3.8231659960115275`*^9, 
   3.82316604718719*^9, 3.823166575914003*^9, 3.8231689575316806`*^9, 
   3.823170262030984*^9, 3.8231703786420736`*^9, 3.823414357452565*^9, 
   3.8318031660891075`*^9, {3.8318037440787935`*^9, 3.8318037686846657`*^9}, 
   3.831804111917215*^9, 3.8318065571059103`*^9, 3.831806723173236*^9, 
   3.831806898277603*^9, 3.831807391018427*^9, 3.8318074656298504`*^9, 
   3.831808288066995*^9, 3.831819598903963*^9, 3.8318933870202503`*^9, 
   3.831893887182246*^9, 3.8318976520336957`*^9, 3.83206568748563*^9, 
   3.834728211058234*^9, 3.8347283071576815`*^9, 3.8366575753737545`*^9, 
   3.841756627644086*^9, 3.8502954774016757`*^9, 3.8503259172584763`*^9, 
   3.850325994273223*^9},
 CellLabel->"Out[95]=",ExpressionUUID->"8ba3b59e-b06c-49b1-88d2-83b061373214"],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    TagBox[
     {GrayLevel[0], Thickness[0.007], Opacity[1.], Dashing[{Small, Small}], 
      CapForm["Butt"], LineBox[CompressedData["
1:eJwVzXs0lAkABXCRthbJu8ISMpVSqMZIXbQTSTgSJckWUqx3dIRWdFJppUWn
Ymk9akne75X3mpTnJO+UzPd9M5ix4Wjz2m//uOee3z/3bjnv7+ApLiYmdoLO
//3EhR3/LN/20MHBG5MrKyIYN+t0GevsxP2wY7m3F0TIz+sNWdA2xX5unYfy
vAjeGvqtw9o2sHK86cESisA+7RLQru2KplecE9nDIuwNnW5u0fbFH0GzVvLV
IuTFHhA1aEfgOdtqZmeYCKTUT6vrteNBiQVs6PxXiDVtBnV/p8XD4LkWu25O
CN048fB2lXtgGWaFFf8jhMfqLNGg1K9QnU5ue8oXYmyRGJybSUC2on9/5oAQ
otDyfqWxRER8adAwqhZCcNG04FhxMlotS2N9IoX4dNTKtcIhDbIZKhsrpITQ
estgeHKyoTQweVvVfgpGUqWjeU0vsPztlXFy8SSqDl85x9QrxjrnDP8ljUmE
ekiXkSVlSLhkMr4pdwJtmV/VneKq4JfKDIw+MAHZ3X/qfrauxS7myproEQGu
duTeOedVj86H60y77gtQmpR3d+fxRsRomBwftBQANrkrGQrN4OSpd3+REqBx
+90mne4W+BAeXf19fCSmKCfeKm2Fbc5W35psPl7Opncnhr2G2m+xMYYRfKiM
cVWvub+B7gcjG3VHPq7O8cuCzdpREymRo2bAB+PbUqOCWCdYUjeWBhT4kLP8
4Ps6qAsTDN3fnecplN/+q8j1ZDcCK3XqPEYprFIMuDZq3QPj9j6xxVYKVkWK
U/wDXBi6KehblFDYb2m8kaP2Dunw9yp+SqFNx4CTvKEXY9KyZ13vU5BceG7A
nO1FBttMmBJNwXRc7rA79z1myydKrUIobFKyH7ja0of2me55iYsU0g7JbPd8
1o9edhD7yRkKrQXpS2apA5CQzzLVt6cwZaQdnhU/CE2WbGAHm0J14dbCId8h
vA27kPTWlMKuK0uXxd2HEdMxt5RvRMHS0HF00WIEJpGqM2V6FM6Kpy5EbfmA
9qTQuy469P/mqtRp+VEE+0nWc9UoROw4Ob9vdhTr++r19yhTsDC/4LMv5CPM
9i4nnZWl8PjSUAWL+Ai3tuZjdusoBKja9K9y+oRoZbnQTAl6L5BRY975CT+2
lSs2LJFQOtwY7mM2BktNESvyK4nxytZF6ZoxaNquDVo1Q8KgssUhyOgz3CZO
W3CnSPQYxdxsyPwM+WLJ9dv4JI6cyAuPUx/H98mSj8zHSciIHtiwEsYRd2il
r3uUhINi8Jf85XE4a54vTxkicXmk1uVxGA+1gs33fugj8V6Lkx5A8aDI0UqR
4ZI4KGwK9Rbw8HPBtuyFHhJZVXXH3Sd5eC2UKOfTDrSvWLCb5uFkNHOkhbZ0
VI7z7q88WB+NMo+ibT4QKyv8joC8PM9d1E3iRYL5dR8GAeby1FxPFwmFMwed
LmwnwFjYc6iBdrgua9cZPQKylQZxBbQta/cMWe8moPLLpS3xtMcEGswdTAKn
XqZ5s2lvPLIspI4QCH8VfLSyk8R1uW8tH60I1AaZ5OfQJobnUvutCURplcgn
0y4JnrLm2BKQia0YC6Rt+3Q455kTvVc7n6JHu9S3PzL9FAG/GtbazbRVjd85
PnQhkPmOcW0tbarjjfgtNwIPvCW9eB0k7B63DkS5EwjwmRnh0i73bCoMPU+g
6NEd50baagZ1t/w8CIQw23oKaccsVrt5eRHojyuyS6f9H8RorEM=
       "]]},
     Annotation[#, "Charting`Private`Tag$46053#1"]& ]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0., 0.},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.71, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.72, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.73, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.74, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.76, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.77, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.78, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.79, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.81, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.82, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.83, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.84, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.86, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.87, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.88, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.89, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.91, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.92, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.93, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.94, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.96, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.97, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.98, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.99, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.01, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.03, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8065033902918572`*^9, 3.806503397064748*^9}, 
   3.8065086044885654`*^9, 3.806508635663232*^9, 3.8073633546585054`*^9, 
   3.807363705314534*^9, {3.818405572231143*^9, 3.818405578954605*^9}, {
   3.8184948797677107`*^9, 3.818494894953822*^9}, 3.8184949480725555`*^9, {
   3.8184950024842243`*^9, 3.818495015173382*^9}, 3.8184950485827584`*^9, 
   3.81849524662533*^9, 3.8188444343905015`*^9, {3.8188444873309026`*^9, 
   3.818844491995405*^9}, 3.8188445251278553`*^9, {3.8188445606987553`*^9, 
   3.8188445728452864`*^9}, 3.818844766501646*^9, 3.818844826815405*^9, 
   3.8188448935729074`*^9, 3.8188449286860356`*^9, {3.8188456069658155`*^9, 
   3.8188456228892455`*^9}, 3.818845691097954*^9, 3.818845755894703*^9, {
   3.8188457983801217`*^9, 3.8188458052926416`*^9}, {3.8188459983375773`*^9, 
   3.8188460152654943`*^9}, 3.8188460681341543`*^9, 3.8188461109318495`*^9, 
   3.818851303214933*^9, {3.818853825945298*^9, 3.8188538358877163`*^9}, 
   3.818853867047387*^9, {3.818853906799114*^9, 3.8188539207767463`*^9}, 
   3.8188540275430927`*^9, {3.818855223869616*^9, 3.8188552319210863`*^9}, 
   3.8188553203776073`*^9, 3.8188643011185436`*^9, 3.818864349961989*^9, {
   3.8188643822047663`*^9, 3.8188644297058086`*^9}, 3.8188647304963055`*^9, 
   3.8188660540721235`*^9, {3.8188661789894085`*^9, 3.8188662086381674`*^9}, {
   3.819457527880741*^9, 3.819457561287513*^9}, 3.8216325370837173`*^9, 
   3.821634798399688*^9, {3.8225568289285297`*^9, 3.822556842153139*^9}, 
   3.8226569545788593`*^9, 3.822664646152847*^9, 3.82298311437743*^9, 
   3.822983229200164*^9, 3.82298326033877*^9, 3.8231659960115275`*^9, 
   3.82316604718719*^9, 3.823166575914003*^9, 3.8231689575316806`*^9, 
   3.823170262030984*^9, 3.8231703786420736`*^9, 3.823414357452565*^9, 
   3.8318031660891075`*^9, {3.8318037440787935`*^9, 3.8318037686846657`*^9}, 
   3.831804111917215*^9, 3.8318065571059103`*^9, 3.831806723173236*^9, 
   3.831806898277603*^9, 3.831807391018427*^9, 3.8318074656298504`*^9, 
   3.831808288066995*^9, 3.831819598903963*^9, 3.8318933870202503`*^9, 
   3.831893887182246*^9, 3.8318976520336957`*^9, 3.83206568748563*^9, 
   3.834728211058234*^9, 3.8347283071576815`*^9, 3.8366575753737545`*^9, 
   3.841756627644086*^9, 3.8502954774016757`*^9, 3.8503259172584763`*^9, 
   3.850325994411852*^9},
 CellLabel->"Out[96]=",ExpressionUUID->"7aec153a-53b7-4adf-9096-21c7e64bfa0e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"0.025", "*", "2"}]], "Input",
 CellChangeTimes->{3.8503832991780066`*^9},
 CellLabel->
  "In[131]:=",ExpressionUUID->"a84edb48-80c3-4e4e-a269-038b8ff9543c"],

Cell[BoxData["0.05`"], "Output",
 CellChangeTimes->{3.85038325533037*^9, 3.8503832992632732`*^9},
 CellLabel->
  "Out[131]=",ExpressionUUID->"ce355c50-1016-4862-91c7-29747d7e3466"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["endTime"], "Input",
 CellChangeTimes->{{3.850463002417883*^9, 3.850463003152634*^9}},
 CellLabel->
  "In[415]:=",ExpressionUUID->"78bc5423-3525-4536-9d0e-65e323b0f429"],

Cell[BoxData["2"], "Output",
 CellChangeTimes->{3.850463003460523*^9},
 CellLabel->
  "Out[415]=",ExpressionUUID->"70798da2-dd79-4202-8497-b32945fb901f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8510581066324153`*^9, 
  3.851058140944942*^9}},ExpressionUUID->"0afb8032-bb9b-4333-9d11-\
a12a043c5d4e"],

Cell[BoxData["0.0005555555555555556`"], "Output",
 CellChangeTimes->{3.851058138781744*^9},
 CellLabel->
  "Out[1228]=",ExpressionUUID->"5b08e57a-1aa6-4144-b14e-a42a9b952223"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"R0", "  ", "=", " ", 
  FractionBox["2.", 
   RowBox[{"60", " ", "60"}]]}]], "Input",ExpressionUUID->"c4e3820c-f333-4fac-\
844e-1b610a54db89"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"R0", " ", "60"}]], "Input",
 CellChangeTimes->{{3.850540880348801*^9, 3.8505409287554536`*^9}, {
  3.8510583134946127`*^9, 3.8510583136215143`*^9}},
 CellLabel->
  "In[1259]:=",ExpressionUUID->"a8e12bf4-cf1d-4532-96da-a16ffced72d5"],

Cell[BoxData["0.03333333333333333`"], "Output",
 CellChangeTimes->{{3.8505408811459785`*^9, 3.850540894753306*^9}, {
   3.8505409248350725`*^9, 3.850540929453159*^9}, 3.8510582827107277`*^9, 
   3.851058313892971*^9},
 CellLabel->
  "Out[1259]=",ExpressionUUID->"77db0749-128c-49aa-b68b-a2c53e539054"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"R0", " ", "90"}]], "Input",
 CellChangeTimes->{{3.8505409139733653`*^9, 3.8505409149143486`*^9}, {
  3.851058307791007*^9, 3.8510583079579244`*^9}},
 CellLabel->
  "In[1260]:=",ExpressionUUID->"794ce614-e821-4e0a-ae18-19461fda5538"],

Cell[BoxData["0.05`"], "Output",
 CellChangeTimes->{{3.8505409157008486`*^9, 3.8505409394088154`*^9}, {
  3.8510582797770014`*^9, 3.851058315388341*^9}},
 CellLabel->
  "Out[1260]=",ExpressionUUID->"390238c6-3f4d-4765-b1b6-d7f14a7d7c18"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Log", "[", "2.", "]"}]], "Input",
 CellChangeTimes->{3.8533043330464525`*^9},
 CellLabel->"In[90]:=",ExpressionUUID->"43801d06-a0bb-44ef-a47c-ece3cde0cac2"],

Cell[BoxData["0.6931471805599453`"], "Output",
 CellChangeTimes->{3.853304333605728*^9},
 CellLabel->"Out[90]=",ExpressionUUID->"04f47b03-9dcb-4ec2-8ac7-eb408e42ba2f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.851578916935443*^9, 3.851578918572317*^9}, {
   3.8533042460088415`*^9, 3.8533042513987074`*^9}, {3.8533042877133074`*^9, 
   3.8533042893999023`*^9}, {3.853304341771659*^9, 3.8533043473377657`*^9}, 
   3.8533043899533772`*^9, {3.8533046366805344`*^9, 3.853304655798046*^9}, 
   3.853585589107443*^9},ExpressionUUID->"e6e418ee-5416-4e15-a616-\
bf20f4e160dc"],

Cell[BoxData["0.7553067703627789`"], "Output",
 CellChangeTimes->{
  3.853304251699822*^9, 3.8533042906578164`*^9, {3.8533043424616833`*^9, 
   3.853304390296109*^9}, {3.8533046369142523`*^9, 3.853304656014336*^9}},
 CellLabel->"Out[97]=",ExpressionUUID->"ab99691b-03bb-40bb-b474-76d4e7f8a762"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", \\\"1\\\", \\\"}\\\"}]\\) lies \
outside the range of data in the interpolating function. Extrapolation will \
be used.\"",2,98,11,30680817007997802773,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{3.8533046560483274`*^9},
 CellLabel->
  "During evaluation of \
In[97]:=",ExpressionUUID->"454029ef-1d81-4571-acdf-2f7b823571b9"],

Cell[BoxData["0.7455122781214688`"], "Output",
 CellChangeTimes->{
  3.853304251699822*^9, 3.8533042906578164`*^9, {3.8533043424616833`*^9, 
   3.853304390296109*^9}, {3.8533046369142523`*^9, 3.8533046560942335`*^9}},
 CellLabel->"Out[98]=",ExpressionUUID->"307f1e60-719f-4cc3-b9eb-682f4460ec56"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"zero", " ", "=", " ", "0.0000000000000000000001"}], ";", " ", 
    RowBox[{"endTime", " ", "=", "1"}], " ", ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", " ", "3.2244841497907073`"}], ",", 
       RowBox[{"g2", "\[Rule]", " ", "5.65593039165689`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "   ", "0"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"gRule", " ", "=", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
        RowBox[{"g2", "\[Rule]", " ", "6"}], ",", 
        RowBox[{"\[CapitalSigma]", "\[Rule]", " ", "0.22596007807663557`"}]}],
        "}"}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g1", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";", " ", 
    RowBox[{"\[Epsilon]", " ", "=", " ", "0.1"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"ystored", "[", 
       RowBox[{
       "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
        "\[Epsilon]z_"}], "]"}], "[", "t_", "]"}], ":=", 
     RowBox[{"Piecewise", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", " ", 
         RowBox[{
          FractionBox["\[Delta]L0", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", "t", "]"}]], " ", ",", " ", 
          RowBox[{"t", ">", "0"}]}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"1", ",", " ", 
          RowBox[{"t", "<", "1"}]}], "}"}]}], "}"}], "]"}]}], ";"}], " ", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"timeSeries", " ", "=", "  ", 
     RowBox[{"Table", "[", 
      RowBox[{"u", ",", " ", 
       RowBox[{"{", 
        RowBox[{"u", ",", "0", ",", "endTime", ",", " ", 
         RowBox[{
          FractionBox["endTime", "100"], " ", "-", " ", "zero"}]}], "}"}]}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"youngData", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"timeSeries", ",", " ", 
        RowBox[{
         RowBox[{"ystored", "[", 
          RowBox[{
          "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
           "\[Epsilon]"}], "]"}], " ", "/@", " ", "timeSeries"}]}], "}"}], "//",
       "Transpose"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"ListPlot", "[", "youngData", "]"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"yplot", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"ystored", "[", 
         RowBox[{
         "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
          "\[Epsilon]"}], "]"}], "[", "u", "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", 
         RowBox[{"-", "0.1"}], ",", "endTime"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Black", ",", 
          RowBox[{"(*", 
           RowBox[{"Dashed", ","}], "*)"}], " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}], ",", 
       RowBox[{"(*", " ", 
        RowBox[{
         RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ","}], 
        "*)"}], " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"lstyplot", " ", "=", " ", 
     RowBox[{"ListPlot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"0.05", ",", " ", "0.85"}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"0.03333", ",", "0.89"}], "}"}]}], "}"}], 
       RowBox[{"(*", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0.0667", ",", " ", 
            RowBox[{"Around", "[", 
             RowBox[{"0.72", ",", 
              RowBox[{"{", 
               RowBox[{"0.14", ",", "0.14"}], "}"}]}], "]"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.04", ",", " ", 
            RowBox[{"Around", "[", 
             RowBox[{"0.84", ",", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"0.84", " ", "-", " ", "0.78"}], ",", 
                RowBox[{"0.91", "-", " ", "0.84"}]}], "}"}]}], "]"}]}], 
           "}"}]}], "}"}], "*)"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Blue", ",", " ", 
            RowBox[{"PointSize", "[", "0.02", "]"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Blue", ",", " ", 
            RowBox[{"PointSize", "[", "0.02", "]"}]}], "}"}]}], "}"}]}]}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"lstyplot", " ", "=", " ", 
      RowBox[{"ListPlot", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"R0", " ", "150"}], ",", " ", "0.6499055075099687`"}], 
           "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.025", ",", " ", 
            RowBox[{"Around", "[", 
             RowBox[{"0.84", ",", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"0.84", " ", "-", " ", "0.78"}], ",", 
                RowBox[{"0.91", "-", " ", "0.84"}]}], "}"}]}], "]"}]}], 
           "}"}]}], 
         RowBox[{"(*", 
          RowBox[{",", 
           RowBox[{"{", 
            RowBox[{"0.08", ",", " ", "0.79"}], "}"}]}], "*)"}], "}"}], ",", 
        " ", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"Blue", ",", " ", 
           RowBox[{"PointSize", "[", "0.02", "]"}]}], "}"}]}], ",", " ", 
        RowBox[{"AxesOrigin", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}], ";"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"ppp", " ", "=", 
    RowBox[{"Show", "[", "yplot", 
     RowBox[{"(*", 
      RowBox[{",", " ", "lstyplot"}], "*)"}], "]"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"SetDirectory", "[", 
      RowBox[{"FileNameJoin", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"ParentDirectory", "[", 
          RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
         "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], 
      "]"}], "\[IndentingNewLine]", 
     RowBox[{"Export", "[", 
      RowBox[{"\"\<youngs-vs-time.pdf\>\"", ",", " ", "ppp"}], "]"}]}], 
    "*)"}], "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.822664678586109*^9, 3.822664741490102*^9}, {
   3.822664775220894*^9, 3.8226648478366947`*^9}, {3.8226648862748976`*^9, 
   3.8226648948340073`*^9}, {3.822983139861228*^9, 3.8229831691009607`*^9}, {
   3.8229831996980815`*^9, 3.8229832075819845`*^9}, {3.82298326696803*^9, 
   3.8229832835576353`*^9}, {3.8318030973454742`*^9, 
   3.8318030993897095`*^9}, {3.8318038142828074`*^9, 
   3.8318038299960804`*^9}, {3.8318038996555476`*^9, 
   3.8318039229295783`*^9}, {3.831803965935495*^9, 3.831803967767669*^9}, {
   3.831804013384983*^9, 3.8318040693942423`*^9}, {3.8318041619695616`*^9, 
   3.8318041706751194`*^9}, {3.831804245328843*^9, 3.831804343696433*^9}, 
   3.8318044466060476`*^9, {3.8318067595441113`*^9, 3.831806759963396*^9}, {
   3.831806910275713*^9, 3.83180691325508*^9}, {3.8318073976846027`*^9, 
   3.8318074453263707`*^9}, {3.831807491939782*^9, 3.831807519616555*^9}, 
   3.8318083003034086`*^9, {3.8318085613658333`*^9, 3.8318085669509573`*^9}, 
   3.8318195743154693`*^9, {3.8318934016104*^9, 3.8318934094108887`*^9}, 
   3.8318941097767663`*^9, {3.8318976644884405`*^9, 3.8318976839849796`*^9}, 
   3.831898063710421*^9, {3.832065696877101*^9, 3.8320657300037694`*^9}, {
   3.8347284716771884`*^9, 3.834728591251625*^9}, {3.8347286252369337`*^9, 
   3.834728660580612*^9}, {3.834728735005761*^9, 3.8347287356919518`*^9}, {
   3.8347287772365108`*^9, 3.8347287930998774`*^9}, {3.834728834295247*^9, 
   3.8347288586202745`*^9}, {3.8347289820690527`*^9, 
   3.8347289848611703`*^9}, {3.8347290215583344`*^9, 
   3.8347290690846095`*^9}, {3.8347294840551367`*^9, 3.834729484156867*^9}, {
   3.8347295241195955`*^9, 3.8347295241644764`*^9}, {3.834729569063182*^9, 
   3.8347295692048087`*^9}, {3.834729935991787*^9, 3.8347299361573124`*^9}, {
   3.8347357195060244`*^9, 3.8347357204690905`*^9}, {3.836657657406258*^9, 
   3.836657658007679*^9}, {3.836657780508057*^9, 3.8366577935593877`*^9}, {
   3.8366578327220078`*^9, 3.8366578503235574`*^9}, {3.8417566630790644`*^9, 
   3.8417566658400106`*^9}, {3.84175686016813*^9, 3.8417569154088483`*^9}, 
   3.8417572310219975`*^9, {3.841757291971922*^9, 3.841757307164429*^9}, {
   3.8417578274810424`*^9, 3.8417578541400967`*^9}, {3.8502953846132717`*^9, 
   3.8502953960272784`*^9}, 3.850295481100696*^9, 3.8502956110620174`*^9, 
   3.850325923304984*^9, {3.850383237707051*^9, 3.8503832660122766`*^9}, {
   3.8503833140769577`*^9, 3.85038332106411*^9}, {3.850384892784233*^9, 
   3.850384897782117*^9}, {3.8503849877054553`*^9, 3.8503849949363003`*^9}, {
   3.850385342736628*^9, 3.8503853494537497`*^9}, {3.8503854860402985`*^9, 
   3.8503855351201205`*^9}, {3.850385783103627*^9, 3.850385808159327*^9}, {
   3.8503860812475348`*^9, 3.850386174093832*^9}, 3.8503869245333204`*^9, {
   3.850386966614644*^9, 3.8503869740280633`*^9}, {3.8503870561831465`*^9, 
   3.850387062478755*^9}, {3.8503871150697155`*^9, 3.850387154828833*^9}, {
   3.8503871874106655`*^9, 3.850387197813358*^9}, {3.8503872621578236`*^9, 
   3.8503872623071957`*^9}, {3.850387314597454*^9, 3.8503873226229424`*^9}, 
   3.8503873912070136`*^9, 3.850460546803963*^9, {3.850461262516863*^9, 
   3.8504612625943885`*^9}, {3.8504629694747963`*^9, 
   3.8504629699360924`*^9}, {3.8504630085525217`*^9, 3.850463021982794*^9}, 
   3.850463073344635*^9, {3.8504644866300526`*^9, 3.850464509311472*^9}, {
   3.8504713727384143`*^9, 3.8504714282265463`*^9}, {3.850472378116742*^9, 
   3.8504723866518593`*^9}, {3.8504798936475554`*^9, 3.850479940856771*^9}, {
   3.8504800535303764`*^9, 3.850480053862226*^9}, {3.8504805760309095`*^9, 
   3.850480581486004*^9}, 3.8504806329914207`*^9, 3.850480699087701*^9, {
   3.850483983753934*^9, 3.8504840427843533`*^9}, {3.850484148345231*^9, 
   3.850484157874213*^9}, {3.8504842086108513`*^9, 3.8504842225763426`*^9}, 
   3.8504842735216455`*^9, {3.8505391997192717`*^9, 3.8505392003336287`*^9}, {
   3.8505399509506164`*^9, 3.8505399549812126`*^9}, {3.8505400118531666`*^9, 
   3.850540031228332*^9}, 3.850540757645049*^9, {3.850540831597584*^9, 
   3.8505408478805795`*^9}, {3.8505409363154855`*^9, 
   3.8505409440284863`*^9}, {3.85055233922088*^9, 3.8505523973790064`*^9}, {
   3.8505647404666886`*^9, 3.8505649485282335`*^9}, 3.851058077551281*^9, {
   3.8510582045830374`*^9, 3.8510582559339395`*^9}, {3.851058290241573*^9, 
   3.85105832451085*^9}, 3.851058924776596*^9, {3.8511608307339892`*^9, 
   3.8511608310021734`*^9}, 3.852962527165839*^9, {3.852962564309357*^9, 
   3.8529626177398496`*^9}, {3.852962648324649*^9, 3.8529626770772786`*^9}, {
   3.8529627528763757`*^9, 3.8529627534740686`*^9}, 3.852962865579529*^9},
 CellLabel->"In[78]:=",ExpressionUUID->"debd816a-71ff-41df-a5c3-580255337e69"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", \\\"0.99`\\\", \\\"}\\\"}]\\) \
lies outside the range of data in the interpolating function. Extrapolation \
will be used.\"",2,83,1,30682660850915021572,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8529625910215387`*^9, 3.8529626190470586`*^9}, {
   3.8529626533977475`*^9, 3.852962677946819*^9}, 3.85296275373323*^9, 
   3.8529628779630723`*^9, 3.853304228522678*^9, 3.8535855768575583`*^9},
 CellLabel->
  "During evaluation of \
In[78]:=",ExpressionUUID->"1f917ff1-0400-40e9-a2ec-c460c17c56fb"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", \\\"1.`\\\", \\\"}\\\"}]\\) \
lies outside the range of data in the interpolating function. Extrapolation \
will be used.\"",2,83,2,30682660850915021572,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8529625910215387`*^9, 3.8529626190470586`*^9}, {
   3.8529626533977475`*^9, 3.852962677946819*^9}, 3.85296275373323*^9, 
   3.8529628779630723`*^9, 3.853304228522678*^9, 3.8535855769196033`*^9},
 CellLabel->
  "During evaluation of \
In[78]:=",ExpressionUUID->"7028c54b-77f6-4dfb-b7df-1da126862a70"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", RowBox[{\\\"-\\\", \
\\\"0.09997752857142858`\\\"}], \\\"}\\\"}]\\) lies outside the range of data \
in the interpolating function. Extrapolation will be used.\"",2,84,3,
   30682660850915021572,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8529625910215387`*^9, 3.8529626190470586`*^9}, {
   3.8529626533977475`*^9, 3.852962677946819*^9}, 3.85296275373323*^9, 
   3.8529628779630723`*^9, 3.853304228522678*^9, 3.8535855770072985`*^9},
 CellLabel->
  "During evaluation of \
In[78]:=",ExpressionUUID->"55f35e48-7f5f-4168-98b8-36ea6cbc583d"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", RowBox[{\\\"-\\\", \
\\\"0.09999997755102041`\\\"}], \\\"}\\\"}]\\) lies outside the range of data \
in the interpolating function. Extrapolation will be used.\"",2,84,4,
   30682660850915021572,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8529625910215387`*^9, 3.8529626190470586`*^9}, {
   3.8529626533977475`*^9, 3.852962677946819*^9}, 3.85296275373323*^9, 
   3.8529628779630723`*^9, 3.853304228522678*^9, 3.8535855770940666`*^9},
 CellLabel->
  "During evaluation of \
In[78]:=",ExpressionUUID->"e68c89ba-9ac2-4827-b36d-c1ddc6680b29"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", RowBox[{\\\"-\\\", \
\\\"0.013614096265343418`\\\"}], \\\"}\\\"}]\\) lies outside the range of \
data in the interpolating function. Extrapolation will be used.\"",2,84,5,
   30682660850915021572,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8529625910215387`*^9, 3.8529626190470586`*^9}, {
   3.8529626533977475`*^9, 3.852962677946819*^9}, 3.85296275373323*^9, 
   3.8529628779630723`*^9, 3.853304228522678*^9, 3.853585577130968*^9},
 CellLabel->
  "During evaluation of \
In[78]:=",ExpressionUUID->"33da3d8f-a745-48c7-a999-a7db57839974"],

Cell[BoxData[
 TemplateBox[{
  "General","stop",
   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"InterpolatingFunction\\\
\", \\\"::\\\", \\\"dmval\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"",2,84,6,30682660850915021572,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8529625910215387`*^9, 3.8529626190470586`*^9}, {
   3.8529626533977475`*^9, 3.852962677946819*^9}, 3.85296275373323*^9, 
   3.8529628779630723`*^9, 3.853304228522678*^9, 3.853585577183826*^9},
 CellLabel->
  "During evaluation of \
In[78]:=",ExpressionUUID->"914ee61d-127c-460b-81a5-c5f6d8bc6c1b"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.007], Opacity[1.], 
       LineBox[{{-0.09999997755102041, 1.}, {-0.0892042251146685, 
        1.}, {-0.07840847267831656, 1.}, {-0.05500080720599548, 
        1.}, {-0.033144328072832685`, 1.}, {-0.01663590904104513, 
        1.}, {-0.011716586299236335`, 1.}, {-0.005905610705932939, 
        1.}, {-0.000350765306122449, 1.}}], LineBox[CompressedData["
1:eJwVzns41Ikex3Fk5brZpOXILcel6LKbEOkT2kVnNOhJJLVZCmVUUpQclXJn
iXVryy2XWndSg1iLhnbDYvxm3M0Yl5nxc4ki6cz54/t8ntc/7+er7Rng7C0h
JibmJ7r/7+LLqoihNROY0XyNmPMkElH3wKvqCFz4H6RjeCQ4qn7GzoddsJO6
JTCqnYRCpJVcu9QFvPfLv3D2FxK5liXXJf1uwPsAu81Vm4RQ5Wej3KxIdLNS
aXnUWYQzslVOOkSBErDt6bjNLDYHD0vKf4mC2UBSz26zWZj1uw0FecZgIOjV
G6HWLCJSHRPsd8SDofavtxsWhVCQ0QwOdk/CQ+39dWEZQuTfl2drTv8KeO5L
MiIFoHkYOq5apcFlxcNlgiuA6f6jbb2ZaTghX9VcxBaggxtZGU1Jh5SuvSO1
TYA5mw2xi2UZYG1SilB9LICFxKrFm+uPEHugg5FCFcC3cfGYqUQO5g0Usppe
8fHOeJl++vsc9G/PvkyW8WH87KPeXc8cxH8wem5QwMd6yuf1v5pzMLgs/Jqe
zEeK38Yyz3u5kBnUY7pc4uO1stqmBMl8BOUdXfDT5mPzJetOrlQhYj+GTKQl
z4CukkRNlitBXxBd+buEadgpXFpkmpdA6G2sVf5gGkxx2zQ1vxKMq+uqm/x3
GvMza8P5jBKMRC0wXC5Pw6DBh1Z7vxRZ4aET087TSD13OH7wSxkyKTNUquo0
zPpueCvdrMAL1sdl9rMpbNbQz/OgVYPnZCt7ZGQSJ/fTnX0jqiGv3pRYwJrE
I4qDRFBmNUxOn7qh0DsJvVuB5+LaqnHATMFtijEJc6JRs06jBkyxqsHuykl4
Jrs+UumsgeOqTmlA5CQqpGJSe/bU4qF7vNyLfZNwJAWR9vOvcN18qDw8jYcT
sSvU72To8Lbb534tmYdT+lIqqtp0ZPj3zV+M58H7rGbRlCMdXCO7f87f4+Fm
pxMjspyOwBrKREwAD/llL6TbAupQrbrxYZQdDx8DwqOtZ+sRZiljbvl5Atlz
SrEW/Eaovo90rb08gXqV7lvNjc3ojR8bvxjNRalhdhn7VisUOf22Mm84KGY+
WQgKZCCjN1hS9xsOfLWPzxw0e4udDd+Gxd4ex/eSpvMPzN7h2M3QjTbzY2i6
1G3umdoFZVr/SZngMRzVP9e/dakbtxzcn/yoNAZiV/SnuKs9KASt8z8Vo7CT
lFtNZ/bC1GTXIc6ZUTTo6Yafd2WiUjZqu/jXowiy3tC6q6cf/a6rQ12xI9i0
24IbY8zCE6nx1jTFEZR6y8UWV7HxbVvNUlXqMPb475c/ozoIZsdKTKvhMBb9
dSjywUOImxIv2v12CHX0YqXQ98PgL/cop/oOoYrfwm4yHAVh1uISumUIclp3
Av4tGMWIZVah7OtBfOX0hCNZPIaYHYr1XrRBzPnOHNnrNo5Aa+2/bAwGMVQk
7ndQhQOfv1ce248OoK7zh9CHHRyMMgKk4rIHYLHI978QwgWRc0V2zWsADQfP
6GwznQDh8ynnuP4A9tI+t6pNTaDbu0DNZY6Np60+RmuFPKSN7Ok7VMuG3Ffi
4fruk9BJOgDVCDaUrD5VdspOYcddynrXcTbU8/4odm2fQqbuLuvT2myoCKvj
jW5Nw2npGFe4yIKyx7X9YxYz2CmmwfBoYaG6PbV+88oMigooBRZpLBzR4O5N
LOZjnBVC8aexwExf9xH4CDD2k7A9zIYFt08/JKSoCRESwXuctI2FsFNk8qsO
IQw4o4kXPxB4OuLl3hg1C/Mzg067uwg0UDZ+o2hOYu3z2ao7vxPYuprcpW9J
4irJ+5n7nACtUOMXHCbh7Hdb11ZkDQmTTQE/kmhJfzMg/4xAWK2XwjtnEu4O
J7dkFBI4tL1ZJu4iCU2/zIrqXAKvP4RKSP9GojQ3Luxjuqj/VLpZM5tEDqfQ
zkNkmnPKHdM8Ekrq9jrNaaJ+yXOxC8Wif0LlZeN+FfU92eutNSQMTbR+00oh
gL9NP917R+KKA6OPkkgg/eaf9KxuEjI6tgWVCQTm9Kk3q3pJvDglHakicvbd
8yvjbFFfzyqEG0dAzCz1g9UkiYWurVq3Ywi4TmjVus2QaD6x7yonmkB58u/X
rwhJ+NZf7rUX+Sfhn0vZiySI25btW6MIvMyk1rxcJtF3p8X9diQBRbuBa10r
JNTp7uucBwR8ls4bT62RMP68Xn5U5KbchcUvX0hc3P4ssOI+gf8BAyZfLA==

        "]]},
      Annotation[#, 
       "Charting`Private`Tag$20666#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, Automatic},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
     Charting`ScaledFrameTicks[{Identity, Identity}]}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 20],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8529625912628884`*^9, 3.852962619458404*^9}, {
   3.852962653827444*^9, 3.852962678383207*^9}, 3.852962754157629*^9, 
   3.852962878395466*^9, 3.853304228998644*^9, 3.8535855772596235`*^9},
 CellLabel->"Out[86]=",ExpressionUUID->"557c2512-1540-4b55-b019-5c70cfffdbd6"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SetDirectory", "[", 
  RowBox[{"FileNameJoin", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ParentDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
     "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<youngs-vs-time.pdf\>\"", ",", " ", "ppp"}], "]"}]}], "Input",
 CellChangeTimes->{3.841756935527158*^9, 3.850464695863497*^9},
 CellLabel->
  "In[163]:=",ExpressionUUID->"5de6cdeb-02d6-415b-8709-d0e3cdaae664"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Stored Growth\\\\Figures\\\\RawFigs\"\>"], "Output",
 CellChangeTimes->{3.8417569373482723`*^9, 3.8504646977470646`*^9, 
  3.8504723912645187`*^9, 3.85053921461499*^9, 3.8505400697739677`*^9, 
  3.8505409542971654`*^9, 3.8505409844303317`*^9, 3.8510589442309575`*^9, 
  3.8529626351241455`*^9, 3.852962696418626*^9, 3.8529627570775304`*^9},
 CellLabel->
  "Out[163]=",ExpressionUUID->"c04cb369-6bd4-4f04-be3c-bdc9d0701789"],

Cell[BoxData["\<\"youngs-vs-time.pdf\"\>"], "Output",
 CellChangeTimes->{3.8417569373482723`*^9, 3.8504646977470646`*^9, 
  3.8504723912645187`*^9, 3.85053921461499*^9, 3.8505400697739677`*^9, 
  3.8505409542971654`*^9, 3.8505409844303317`*^9, 3.8510589442309575`*^9, 
  3.8529626351241455`*^9, 3.852962696418626*^9, 3.8529627573134756`*^9},
 CellLabel->
  "Out[164]=",ExpressionUUID->"0109cb26-4e66-4750-91ac-40eb5eb30ddb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ystored", "[", 
   RowBox[{
   "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
    "\[Epsilon]"}], "]"}], "[", "0.025", "]"}]], "Input",
 CellChangeTimes->{{3.8347295414125433`*^9, 3.834729542747449*^9}},
 CellLabel->
  "In[353]:=",ExpressionUUID->"f2ff04d2-cf6c-4282-a2f0-3491daf0a99e"],

Cell[BoxData["0.9185618105447926`"], "Output",
 CellChangeTimes->{
  3.8347295429987745`*^9, 3.834729573674054*^9, 3.841756672460378*^9, {
   3.8417568739418945`*^9, 3.841756922790366*^9}, 3.8417572693653116`*^9, 
   3.8417573023828344`*^9, {3.84175784680455*^9, 3.841757858106971*^9}},
 CellLabel->
  "Out[353]=",ExpressionUUID->"956a4e35-4ff4-486b-9c37-7c8f8501d33b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ystored", "[", 
   RowBox[{
   "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
    "\[Epsilon]"}], "]"}], "[", 
  RowBox[{"R0", " ", "150"}], "]"}]], "Input",
 CellChangeTimes->{{3.836657759676502*^9, 3.8366577609092307`*^9}},
 CellLabel->"In[89]:=",ExpressionUUID->"9110c35f-72cc-4aed-9745-50f2ceff13ae"],

Cell[BoxData["0.8537145465574536`"], "Output",
 CellChangeTimes->{3.836657761471704*^9, 3.8417566929581823`*^9},
 CellLabel->"Out[89]=",ExpressionUUID->"c5cf8a68-681f-4f10-ac03-225fd27cb66c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"0.77", " ", "7.16"}]], "Input",
 CellChangeTimes->{{3.850480522495091*^9, 3.8504805573980503`*^9}},
 CellLabel->
  "In[175]:=",ExpressionUUID->"3e863c5e-a67b-4ed2-b161-31958418a460"],

Cell[BoxData["5.5132`"], "Output",
 CellChangeTimes->{{3.850480534913354*^9, 3.8504805580155673`*^9}},
 CellLabel->
  "Out[175]=",ExpressionUUID->"8bd11df6-28b4-41ed-a764-9c19911d2c8e"]
}, Open  ]],

Cell[BoxData[" "], "Input",
 CellChangeTimes->{
  3.850480538758883*^9},ExpressionUUID->"84b05558-2d6b-4a96-aa63-\
75bcab9ec7aa"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Estimting", " ", "the", " ", "change", " ", "in", " ", 
   RowBox[{"young", "'"}], "s", " ", "modulus"}], "*)"}]], "Input",
 FontSize->72,ExpressionUUID->"8c52185d-5989-4b74-aafe-42fb5d002f7d"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"rawFirstJump", "=", 
     RowBox[{"{", " ", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"994", ",", " ", "720"}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"996", ",", " ", "736"}], "}"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"rawSecondJump", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"1018", ",", " ", "726"}], "}"}], " ", ",", " ", 
       RowBox[{"{", 
        RowBox[{"1010", ",", " ", "703"}], "}"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"origin", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{"969", ",", " ", "784"}], "}"}]}], ";"}], "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fromPixel", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"900", "/", 
        RowBox[{"(", 
         RowBox[{"1477", " ", "-", " ", "969"}], ")"}]}], ",", " ", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"4.4", " ", "-", " ", "2.8"}], ")"}], "/", 
        RowBox[{"(", 
         RowBox[{"784", " ", "-", " ", "388"}], ")"}]}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"firstJump", " ", "=", " ", 
     RowBox[{
      RowBox[{"fromPixel", "[", 
       RowBox[{"[", "2", "]"}], "]"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"rawFirstJump", "[", 
           RowBox[{"[", 
            RowBox[{"2", ",", "2"}], "]"}], "]"}], " ", "-", " ", 
          RowBox[{"rawFirstJump", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ")"}], "/", 
        RowBox[{"(", 
         RowBox[{"2.8", " ", "+", " ", 
          RowBox[{
           RowBox[{"fromPixel", "[", 
            RowBox[{"[", "2", "]"}], "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"rawFirstJump", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "2"}], "]"}], "]"}], " ", "-", " ", 
             RowBox[{"origin", "[", 
              RowBox[{"[", "2", "]"}], "]"}]}], ")"}]}]}], ")"}]}], ")"}]}]}],
     ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"secondJump", " ", "=", " ", 
     RowBox[{
      RowBox[{"fromPixel", "[", 
       RowBox[{"[", "2", "]"}], "]"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"-", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"rawSecondJump", "[", 
             RowBox[{"[", 
              RowBox[{"2", ",", "2"}], "]"}], "]"}], " ", "-", " ", 
            RowBox[{"rawSecondJump", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ")"}]}], ")"}], "/", 
        RowBox[{"(", 
         RowBox[{"2.8", " ", "+", " ", 
          RowBox[{
           RowBox[{"fromPixel", "[", 
            RowBox[{"[", "2", "]"}], "]"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"rawSecondJump", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "2"}], "]"}], "]"}], " ", "-", " ", 
             RowBox[{"origin", "[", 
              RowBox[{"[", "2", "]"}], "]"}]}], ")"}]}]}], ")"}]}], ")"}]}]}],
     ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ystored", "[", 
     RowBox[{
      RowBox[{"g1", "[", 
       RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", " ", 
      RowBox[{"g2", "[", 
       RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", 
      RowBox[{"\[CapitalSigma]", " ", "[", 
       RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", " ", "\[Epsilon]z"}], 
     "]"}], "[", 
    RowBox[{"250", " ", "R0"}], "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"firstJump", "/", "secondJump"}], ";"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.800872581733864*^9, 3.8008726645328197`*^9}, {
  3.8008727726834354`*^9, 3.8008728757239456`*^9}, {3.8008729140912848`*^9, 
  3.8008729147624645`*^9}, {3.8008729576906004`*^9, 3.8008730802037845`*^9}, {
  3.8008731918131723`*^9, 3.80087328291438*^9}, {3.8008733291785975`*^9, 
  3.800873378882614*^9}, {3.800873518210169*^9, 3.8008736219471693`*^9}, {
  3.8008756214153643`*^9, 3.8008756313607335`*^9}, {3.8010444352654486`*^9, 
  3.80104443787843*^9}, {3.8010585325079117`*^9, 3.8010585465643053`*^9}, {
  3.8011484702700357`*^9, 3.80114847093125*^9}, {3.8012295920298805`*^9, 
  3.8012296305169964`*^9}, {3.8012398432963495`*^9, 3.801239852710184*^9}, {
  3.807363429745737*^9, 3.8073634447725573`*^9}, {3.807363717053147*^9, 
  3.807363717170832*^9}},
 CellLabel->
  "In[439]:=",ExpressionUUID->"73bc3408-fdac-471c-9b76-8e3676fca517"],

Cell[BoxData["0.632526711777563`"], "Output",
 CellChangeTimes->{{3.8008729908309526`*^9, 3.8008730148706007`*^9}, 
   3.8008730859773364`*^9, {3.8008735767774615`*^9, 3.8008736224259176`*^9}, 
   3.800875632381003*^9, 3.800886702336893*^9, 3.8008892683363523`*^9, 
   3.800894647100297*^9, 3.800898353455514*^9, 3.8008988355865197`*^9, 
   3.8009532061373067`*^9, 3.800954377238229*^9, {3.8010444145398836`*^9, 
   3.801044438962528*^9}, {3.8010585174980507`*^9, 3.8010585471357465`*^9}, 
   3.8011284309271607`*^9, {3.801148471436927*^9, 3.801148487314454*^9}, 
   3.801149383740602*^9, 3.8011496051041613`*^9, 3.8012290715961065`*^9, 
   3.801229330119028*^9, {3.8012293705509443`*^9, 3.801229388443115*^9}, 
   3.8012296316160583`*^9, {3.8012398344150906`*^9, 3.8012398531559925`*^9}, 
   3.80123994661316*^9, 3.8065025567155733`*^9, 3.8065086398859377`*^9, 
   3.807363363074003*^9, {3.807363413579959*^9, 3.8073634458028*^9}, 
   3.8073637175368533`*^9},
 CellLabel->
  "Out[445]=",ExpressionUUID->"4c51fd37-d3c0-47e8-b0c3-aceea4995b44"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"250", " ", "R0"}]], "Input",
 CellChangeTimes->{{3.8010447748880377`*^9, 3.801044775901328*^9}, {
   3.8073633982120523`*^9, 3.8073633984524097`*^9}, 3.807363772440051*^9},
 CellLabel->
  "In[448]:=",ExpressionUUID->"a19e7c01-e094-425e-adee-210b19ddfda2"],

Cell[BoxData["0.13383171326982626`"], "Output",
 CellChangeTimes->{
  3.8010447763331995`*^9, {3.807363395798503*^9, 3.8073633988354063`*^9}, {
   3.8073637666485367`*^9, 3.8073637726754217`*^9}},
 CellLabel->
  "Out[448]=",ExpressionUUID->"a4aa61bb-2b78-4205-ac63-54c7e94f76d2"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.801149297982356*^9, 
  3.8011493003470354`*^9}},ExpressionUUID->"7cee92ff-e923-44a4-815c-\
6950ac798931"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Calculating", " ", "the", " ", "value", " ", "of", " ", "\[Epsilon]z", " ",
    "from", " ", "mechanical", " ", "experiments"}], "*)"}]], "Input",
 CellChangeTimes->{{3.800961475611701*^9, 3.800961478851062*^9}},
 FontSize->36,ExpressionUUID->"4fe02cc8-8bf1-46f6-a9ad-28fd50e4f429"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"P0", " ", "=", " ", 
     RowBox[{"29", " ", 
      SuperscriptBox["10", "3"]}]}], ";", " ", 
    RowBox[{"a0", " ", "=", " ", 
     RowBox[{"5.5", " ", 
      SuperscriptBox["10", 
       RowBox[{"-", "7"}]]}]}], ";", " ", 
    RowBox[{"Y0", " ", "=", " ", 
     RowBox[{"23", " ", 
      SuperscriptBox["10", "6"]}]}], ";", 
    RowBox[{"h", " ", "=", " ", 
     RowBox[{"4.5", " ", 
      SuperscriptBox["10", 
       RowBox[{"-", "9"}]]}]}], ";", 
    RowBox[{"\[Nu]", " ", "=", " ", "0.25"}], ";", 
    RowBox[{"Yt", " ", "=", " ", 
     RowBox[{"49", " ", 
      SuperscriptBox["10", "6"]}]}], ";", "  ", 
    RowBox[{"\[Epsilon]z0", " ", "=", " ", 
     RowBox[{
      FractionBox[
       RowBox[{"P0", " ", "a0"}], 
       RowBox[{"Y0", " ", "h"}]], 
      RowBox[{"(", 
       RowBox[{
        FractionBox["1", "2"], " ", "-", " ", "\[Nu]"}], ")"}]}]}]}], 
   "\[IndentingNewLine]", " ", 
   RowBox[{"\[Epsilon]\[Theta]0", " ", "=", " ", 
    RowBox[{
     FractionBox[
      RowBox[{"P0", " ", "a0"}], 
      RowBox[{"Yt", " ", "h"}]], 
     RowBox[{"(", 
      RowBox[{"1", " ", "-", " ", 
       FractionBox["\[Nu]", "2"]}], ")"}]}]}], "\[IndentingNewLine]", 
   FractionBox[
    RowBox[{
     RowBox[{"2.", " ", "Y0"}], "-", "Yt"}], 
    RowBox[{"Y0", "-", 
     RowBox[{"2", " ", "Yt"}]}]], "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8009612135726767`*^9, 3.800961387597232*^9}, {
   3.800961459941657*^9, 3.8009614696097603`*^9}, {3.8009615365576243`*^9, 
   3.800961559379582*^9}, {3.8009723487798405`*^9, 3.800972356483249*^9}, {
   3.8010423308373404`*^9, 3.8010423309390965`*^9}, {3.801125455882065*^9, 
   3.8011255216702256`*^9}, {3.801125588375141*^9, 3.801125600135723*^9}, {
   3.801125662153914*^9, 3.801125669193123*^9}, {3.8011263647143307`*^9, 
   3.801126365990938*^9}, 3.8011264135368395`*^9, {3.801126605017045*^9, 
   3.8011266127772818`*^9}, 3.801128420953849*^9},
 FontSize->14,
 CellLabel->
  "In[905]:=",ExpressionUUID->"5715f132-be8b-4c6f-95a6-94808780b8cb"],

Cell[BoxData["0.03852657004830918`"], "Output",
 CellChangeTimes->{{3.8009613659261937`*^9, 3.8009613882305355`*^9}, 
   3.800961501140415*^9, {3.8009615378112955`*^9, 3.8009615595840387`*^9}, {
   3.8009723428477135`*^9, 3.8009723570716543`*^9}, 3.801037906055959*^9, 
   3.8010423311764565`*^9, 3.80104606580087*^9, 3.801125478896541*^9, 
   3.801125522091098*^9, {3.80112559189476*^9, 3.8011256034578447`*^9}, {
   3.8011256633287725`*^9, 3.8011256699949536`*^9}, 3.801126367014205*^9, 
   3.801126414037502*^9, 3.801126657395008*^9, 3.801128421603086*^9},
 CellLabel->
  "Out[905]=",ExpressionUUID->"8767d9f8-d445-4ecc-b031-5da1a1257f0f"],

Cell[BoxData["0.06329365079365079`"], "Output",
 CellChangeTimes->{{3.8009613659261937`*^9, 3.8009613882305355`*^9}, 
   3.800961501140415*^9, {3.8009615378112955`*^9, 3.8009615595840387`*^9}, {
   3.8009723428477135`*^9, 3.8009723570716543`*^9}, 3.801037906055959*^9, 
   3.8010423311764565`*^9, 3.80104606580087*^9, 3.801125478896541*^9, 
   3.801125522091098*^9, {3.80112559189476*^9, 3.8011256034578447`*^9}, {
   3.8011256633287725`*^9, 3.8011256699949536`*^9}, 3.801126367014205*^9, 
   3.801126414037502*^9, 3.801126657395008*^9, 3.8011284216260247`*^9},
 CellLabel->
  "Out[906]=",ExpressionUUID->"52030220-dcab-4280-ab86-ac908f66e1f7"],

Cell[BoxData["0.04`"], "Output",
 CellChangeTimes->{{3.8009613659261937`*^9, 3.8009613882305355`*^9}, 
   3.800961501140415*^9, {3.8009615378112955`*^9, 3.8009615595840387`*^9}, {
   3.8009723428477135`*^9, 3.8009723570716543`*^9}, 3.801037906055959*^9, 
   3.8010423311764565`*^9, 3.80104606580087*^9, 3.801125478896541*^9, 
   3.801125522091098*^9, {3.80112559189476*^9, 3.8011256034578447`*^9}, {
   3.8011256633287725`*^9, 3.8011256699949536`*^9}, 3.801126367014205*^9, 
   3.801126414037502*^9, 3.801126657395008*^9, 3.801128421651956*^9},
 CellLabel->
  "Out[907]=",ExpressionUUID->"d2d9d780-c452-4fc5-9e7f-82d9317ce7b9"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"P0", " ", "=", " ", 
   RowBox[{"29", " ", 
    SuperscriptBox["10", "3"]}]}], ";", " ", 
  RowBox[{"a0", " ", "=", " ", 
   RowBox[{"5.5", " ", 
    SuperscriptBox["10", 
     RowBox[{"-", "7"}]]}]}], ";", " ", 
  RowBox[{"Y0", " ", "=", " ", 
   RowBox[{"23", " ", 
    SuperscriptBox["10", "6"]}]}], ";", 
  RowBox[{"h", " ", "=", " ", 
   RowBox[{"4.5", " ", 
    SuperscriptBox["10", 
     RowBox[{"-", "9"}]]}]}], ";", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"\[Nu]", " ", "=", " ", "0.2"}], ";"}], "*)"}], 
  RowBox[{"Yt", " ", "=", " ", 
   RowBox[{"49", " ", 
    SuperscriptBox["10", "6"]}]}], ";", "  ", 
  RowBox[{"\[Epsilon]z0", " ", "=", " ", 
   RowBox[{
    FractionBox[
     RowBox[{"P0", " ", "a0"}], 
     RowBox[{"Y0", " ", "h"}]], 
    RowBox[{"(", 
     RowBox[{
      FractionBox["1", "2"], " ", "-", " ", "\[Nu]"}], 
     ")"}]}]}]}], "\[IndentingNewLine]", 
 RowBox[{"Solve", "[", " ", 
  RowBox[{
   RowBox[{
    RowBox[{
     FractionBox[
      RowBox[{"P0", " ", "a0"}], 
      RowBox[{"Y0", " ", "h"}]], 
     RowBox[{"(", 
      RowBox[{
       FractionBox["1", "2"], " ", "-", " ", "\[Nu]"}], ")"}]}], "\[Equal]", 
    "0.045"}], ",", " ", "\[Nu]"}], "]"}]}], "Input",
 CellChangeTimes->{{3.801125558335184*^9, 3.8011255791188855`*^9}, {
  3.801126618353374*^9, 3.801126642841911*^9}},
 CellLabel->
  "In[669]:=",ExpressionUUID->"5eae9dd9-72a2-4346-964d-751de393ed93"],

Cell[BoxData[
 RowBox[{"0.15410628019323672`", " ", 
  RowBox[{"(", 
   RowBox[{
    FractionBox["1", "2"], "-", "\[Nu]"}], ")"}]}]], "Output",
 CellChangeTimes->{{3.8011255690777283`*^9, 3.801125579621541*^9}, {
   3.801126625021549*^9, 3.801126643394434*^9}, 3.8011273914884624`*^9},
 CellLabel->
  "Out[670]=",ExpressionUUID->"b76f57bd-26c7-4e0d-9db8-21177ba006e5"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"\[Nu]", "\[Rule]", "0.20799373040752353`"}], "}"}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.8011255690777283`*^9, 3.801125579621541*^9}, {
   3.801126625021549*^9, 3.801126643394434*^9}, 3.8011273915133953`*^9},
 CellLabel->
  "Out[671]=",ExpressionUUID->"011fc537-be78-4085-b40a-49d6f1866c26"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Doing", " ", "the", " ", "fit", " ", "with", " ", "800", " ", "shock", " ",
    "experiment"}], "*)"}]], "Input",
 CellChangeTimes->{{3.8008819520115833`*^9, 3.800881963401264*^9}, {
  3.8008878523823614`*^9, 3.8008878634220552`*^9}, {3.8008973961774416`*^9, 
  3.8008974005368*^9}, {3.848411000013522*^9, 3.8484110038753767`*^9}},
 FontSize->72,ExpressionUUID->"386f8b56-6529-4178-ac38-e6ca100a4dc4"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{
     RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", 
     "\"\<New Data\>\""}], "]"}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "parameter", " ", "for", " ", "the", " ", "low", " ", "pass", " ", 
     "filter"}], ",", " ", 
    RowBox[{"level", " ", "of", " ", "smoothing"}]}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"filterSize", " ", "=", " ", "1"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"error", "[", 
     RowBox[{"shockMagnitude_", ",", " ", "endTime_"}], "]"}], "[", 
    RowBox[{"g1_", ",", " ", "g2_", ",", " ", "\[CapitalSigma]_"}], "]"}], ":=",
    " ", 
   RowBox[{
   "(", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"time", " ", "=", " ", 
      RowBox[{
       RowBox[{"Import", "[", 
        RowBox[{"\"\<time_LBto\>\"", " ", "<>", " ", 
         RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
         "\"\<.csv\>\""}], "]"}], "//", "Flatten"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"avgLength", " ", "=", 
      RowBox[{"(", " ", 
       RowBox[{
        RowBox[{"Import", "[", 
         RowBox[{"\"\<avgLength_LBto\>\"", " ", "<>", " ", 
          RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
          "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"avgWidth", "=", 
      RowBox[{"(", " ", 
       RowBox[{
        RowBox[{"Import", "[", 
         RowBox[{"\"\<avgWidth_LBto\>\"", " ", "<>", " ", 
          RowBox[{"ToString", "[", "shockMagnitude", "]"}], "<>", 
          "\"\<.csv\>\""}], "]"}], "//", "Flatten"}], ")"}]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"indexOfShock", " ", "=", " ", "32"}], ";", " ", 
     RowBox[{"(*", 
      RowBox[{
      "The", " ", "index", " ", "where", " ", "the", " ", "shock", " ", "is", 
       " ", "applied"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
      "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
      "Solving", " ", "for", " ", "the", " ", "initial", " ", "growth", " ", 
       "rate"}], "*)"}], "\[IndentingNewLine]", 
     RowBox[{"lengthvsTime", " ", "=", " ", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"time", ",", " ", "avgLength"}], "}"}], "//", "Transpose"}]}],
      ";", "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"form", " ", "=", "  ", 
      RowBox[{"LL0", " ", 
       RowBox[{"Exp", "[", 
        RowBox[{"RR0", " ", 
         FractionBox[
          RowBox[{"t", " ", "-", " ", 
           RowBox[{"time", "[", 
            RowBox[{"[", "indexOfShock", "]"}], "]"}]}], 
          RowBox[{
           RowBox[{"time", "[", 
            RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
           RowBox[{"time", "[", 
            RowBox[{"[", "1", "]"}], "]"}]}]]}], "]"}]}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"fit", " ", "=", " ", 
      RowBox[{"FindFit", "[", 
       RowBox[{
        RowBox[{"lengthvsTime", "[", 
         RowBox[{"[", 
          RowBox[{";;", "indexOfShock"}], "]"}], "]"}], ",", "form", ",", " ", 
        RowBox[{"{", 
         RowBox[{"LL0", ",", " ", "RR0"}], "}"}], ",", " ", "t", ",", " ", 
        RowBox[{"PrecisionGoal", "\[Rule]", "Infinity"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"R0", " ", "=", " ", 
      FractionBox[
       RowBox[{"fit", "[", 
        RowBox[{"[", 
         RowBox[{"2", ",", "2"}], "]"}], "]"}], 
       RowBox[{
        RowBox[{"time", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], " ", "-", " ", 
        RowBox[{"time", "[", 
         RowBox[{"[", "1", "]"}], "]"}]}]]}], " ", ";", "\[IndentingNewLine]",
      "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"Nondimensionalzing", " ", "the", " ", "width"}], ",", " ", 
       RowBox[{"length", " ", "and", " ", 
        RowBox[{"time", ".", " ", "The"}], " ", "normalized", " ", 
        "quantities", " ", "correspond", " ", "to", " ", "\[Delta]L", 
        RowBox[{"(", "t", ")"}], " ", "and", " ", "\[Delta]A", 
        RowBox[{"(", "t", ")"}]}]}], "*)"}], "\[IndentingNewLine]", 
     RowBox[{"normalizedTime", " ", "=", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"time", " ", "-", " ", 
         RowBox[{"time", "[", 
          RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}], " ", "R0"}]}], 
     ";", "\[IndentingNewLine]", 
     RowBox[{"normalizedLength", " ", "=", " ", 
      FractionBox[
       RowBox[{"avgLength", " ", "-", " ", 
        RowBox[{"Exp", "[", "normalizedTime", "]"}]}], 
       RowBox[{"Exp", "[", "normalizedTime", "]"}]]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"normalizedWidth", " ", "=", " ", 
      RowBox[{"avgWidth", " ", "-", " ", "1"}]}], ";", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"normalizedLenData", " ", "=", " ", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"normalizedTime", ",", " ", "normalizedLength"}], "}"}], "//",
          "Transpose"}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
     RowBox[{"filteredLenData", " ", "=", " ", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"normalizedTime", ",", " ", 
         RowBox[{"LowpassFilter", "[", 
          RowBox[{"normalizedLength", ",", "filterSize"}], "]"}]}], "}"}], "//",
        "Transpose"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"normalizedWidData", " ", "=", " ", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"normalizedTime", ",", " ", "normalizedWidth"}], "}"}], "//",
          "Transpose"}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
     RowBox[{"filteredWidData", " ", "=", " ", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"normalizedTime", ",", " ", 
         RowBox[{"LowpassFilter", "[", 
          RowBox[{"normalizedWidth", ",", "filterSize"}], "]"}]}], "}"}], "//",
        "Transpose"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", " ", 
     RowBox[{"endIndex", " ", "=", " ", 
      RowBox[{
       RowBox[{"Ordering", "[", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"normalizedTime", " ", "-", "endTime"}], ")"}], "2"], "]"}],
        " ", "[", 
       RowBox[{"[", "1", "]"}], "]"}]}], ";", "  ", 
     RowBox[{"pf1", "=", 
      FractionBox[
       RowBox[{"\[Delta]L01", "+", "\[Epsilon]z"}], "\[Epsilon]z"]}], ";", 
     " ", "\[IndentingNewLine]", 
     RowBox[{"indexOfShock", " ", "=", " ", "34"}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"\[Delta]A0", "=", 
      RowBox[{"filteredWidData", "[", 
       RowBox[{"[", 
        RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";", "  ", 
     RowBox[{"\[Delta]L0", " ", "=", 
      RowBox[{"filteredLenData", "[", 
       RowBox[{"[", 
        RowBox[{"indexOfShock", ",", "2"}], "]"}], "]"}]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"widthFunction", "[", "t_", "]"}], " ", "=", 
      FractionBox[
       RowBox[{
        SuperscriptBox["\[ExponentialE]", 
         RowBox[{
          RowBox[{"-", "g1"}], " ", "t"}]], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"g1", " ", "\[Delta]A0"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             SuperscriptBox["\[ExponentialE]", 
              RowBox[{"g1", " ", "t"}]]}], ")"}], " ", "\[Delta]L0", " ", 
           "\[CapitalSigma]"}]}], ")"}]}], "g1"]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"lengthFunction", "[", "t_", "]"}], " ", "=", " ", 
      RowBox[{"\[Delta]L0", "+", 
       FractionBox[
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[ExponentialE]", 
            RowBox[{
             RowBox[{"-", "g1"}], " ", "t"}]]}], ")"}], " ", "g2", " ", 
         "\[Delta]L0", " ", "\[CapitalSigma]"}], 
        SuperscriptBox["g1", "2"]], "+", 
       RowBox[{"t", " ", "\[Delta]L0", " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}]}], "+", 
       FractionBox[
        RowBox[{"g2", " ", 
         RowBox[{"(", 
          RowBox[{"\[Delta]A0", "-", 
           RowBox[{
            SuperscriptBox["\[ExponentialE]", 
             RowBox[{
              RowBox[{"-", "g1"}], " ", "t"}]], " ", "\[Delta]A0"}], "+", 
           RowBox[{"t", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], 
          ")"}]}], "g1"]}]}], ";", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"widthError", "=", " ", 
      RowBox[{"Total", "[", 
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox[
           RowBox[{"Range", "[", "endIndex", "]"}], "endIndex"], ")"}], "1"], 
        SuperscriptBox[
         RowBox[{"(", " ", 
          RowBox[{
           RowBox[{"filteredWidData", "[", 
            RowBox[{"[", 
             RowBox[{
              RowBox[{";;", "endIndex"}], ",", "2"}], "]"}], "]"}], " ", "-", 
           RowBox[{"(", " ", 
            RowBox[{"widthFunction", " ", "/@", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"normalizedTime", "[", 
                RowBox[{"[", 
                 RowBox[{";;", "endIndex"}], "]"}], "]"}], " ", "-", " ", 
               RowBox[{"normalizedTime", "[", 
                RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}]}], ")"}]}],
           "  ", ")"}], "2"]}], "]"}]}], ";", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"lengthError", "=", " ", 
      RowBox[{"Total", "[", 
       RowBox[{
        SuperscriptBox[
         RowBox[{"(", 
          FractionBox[
           RowBox[{"Range", "[", "endIndex", "]"}], "endIndex"], ")"}], "1"], 
        SuperscriptBox[
         RowBox[{"(", "  ", 
          RowBox[{
           RowBox[{"filteredLenData", "[", 
            RowBox[{"[", 
             RowBox[{
              RowBox[{";;", "endIndex"}], ",", "2"}], "]"}], "]"}], " ", "-", 
           RowBox[{"(", " ", 
            RowBox[{"lengthFunction", "/@", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"normalizedTime", "[", 
                RowBox[{"[", 
                 RowBox[{";;", "endIndex"}], "]"}], "]"}], " ", "-", " ", 
               RowBox[{"normalizedTime", "[", 
                RowBox[{"[", "indexOfShock", "]"}], "]"}]}], ")"}]}], ")"}]}],
           "  ", ")"}], "2"]}], "]"}]}], ";", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", " ", 
     RowBox[{"Return", "[", " ", 
      RowBox[{"(*", 
       RowBox[{
        RowBox[{"total", " ", "error"}], " ", "="}], " ", "*)"}], 
      RowBox[{
       RowBox[{"5.0", " ", "lengthError"}], " ", "+", " ", 
       RowBox[{"1", "widthError"}]}], "]"}]}], " ", "\[IndentingNewLine]", 
    "\[IndentingNewLine]", ")"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"totalError", "[", 
     RowBox[{"g1_", ",", " ", "g2_", ",", " ", "\[CapitalSigma]_"}], "]"}], ":=",
     " ", 
    RowBox[{"(*", 
     RowBox[{
      RowBox[{
       RowBox[{"error", "[", 
        RowBox[{"400", ",", " ", "0.475"}], "]"}], "[", 
       RowBox[{"g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]"}], "]"}], 
      " ", "+"}], " ", "*)"}], 
    RowBox[{
     RowBox[{"error", "[", 
      RowBox[{"800", ",", " ", "0.95"}], "]"}], "[", 
     RowBox[{"g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]"}], "]"}]}], 
   "  ", ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"nmin", " ", "=", " ", 
  RowBox[{"NMinimize", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"totalError", "[", 
      RowBox[{"g1", ",", " ", "g2", ",", "0"}], "]"}], "}"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"g1", ",", " ", "g2"}], "}"}], ",", " ", 
    RowBox[{"Method", "->", "\"\<SimulatedAnnealing\>\""}]}], 
   "]"}]}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.800801514797951*^9, 3.8008015520210733`*^9}, {
   3.8008023889325933`*^9, 3.8008024129714265`*^9}, {3.8008024649324017`*^9, 
   3.800802510997134*^9}, 3.800802592901041*^9, {3.800802650460576*^9, 
   3.8008026597636595`*^9}, {3.8008026938768077`*^9, 3.800802697602808*^9}, {
   3.800802743100297*^9, 3.800802779293481*^9}, {3.8008042219531345`*^9, 
   3.8008042273835807`*^9}, {3.8008042618655777`*^9, 3.800804269504449*^9}, {
   3.800808164466332*^9, 3.800808177720869*^9}, {3.8008580592101793`*^9, 
   3.800858180087551*^9}, {3.8008590019840713`*^9, 3.8008590067672796`*^9}, {
   3.8008590612564807`*^9, 3.800859065638748*^9}, {3.8008606220527287`*^9, 
   3.8008606590756645`*^9}, {3.800862043331088*^9, 3.800862047793149*^9}, {
   3.800863139759828*^9, 3.800863144127164*^9}, {3.800866917754052*^9, 
   3.80086698783954*^9}, {3.800868893363325*^9, 3.8008689271319456`*^9}, {
   3.8008695287316594`*^9, 3.800869529852652*^9}, 3.8008737077017117`*^9, 
   3.8008743114123225`*^9, 3.8008744432927303`*^9, 3.8008795024182715`*^9, {
   3.8008810550488105`*^9, 3.800881136245576*^9}, {3.8008812020534625`*^9, 
   3.800881270667889*^9}, {3.800881306284412*^9, 3.8008813498677983`*^9}, {
   3.800881574998382*^9, 3.8008816064931307`*^9}, 3.8008831131949835`*^9, 
   3.8008831576270733`*^9, {3.800887392161109*^9, 3.8008874903998013`*^9}, {
   3.80088752583998*^9, 3.8008876972632885`*^9}, {3.8008877346801744`*^9, 
   3.800887738583726*^9}, {3.800887772712403*^9, 3.8008878016481123`*^9}, {
   3.8008879526883297`*^9, 3.800887969984047*^9}, {3.8008880028662167`*^9, 
   3.800888194127719*^9}, {3.8008882821534324`*^9, 3.8008882836225204`*^9}, {
   3.800888831920204*^9, 3.800888834069476*^9}, {3.8008974096833043`*^9, 
   3.8008974980409575`*^9}, {3.8008980514425764`*^9, 3.80089806196041*^9}, {
   3.8008981106411834`*^9, 3.8008981118250637`*^9}, 3.800949095614221*^9, {
   3.800950127516501*^9, 3.8009501581874557`*^9}, 3.800950208540721*^9, {
   3.8009522042169905`*^9, 3.800952253223897*^9}, {3.800953302597411*^9, 
   3.80095338597334*^9}, {3.800953487797882*^9, 3.800953494246623*^9}, {
   3.8009538046033063`*^9, 3.8009538296054273`*^9}, {3.800957675397869*^9, 
   3.8009576772518797`*^9}, {3.800957758965254*^9, 3.800957779891265*^9}, {
   3.8009579464047155`*^9, 3.8009579606844826`*^9}, 3.8063890756328993`*^9, 
   3.806566099655746*^9, 3.8065664368645144`*^9, {3.8065664698113966`*^9, 
   3.8065664698921804`*^9}, 3.806566693685644*^9, 3.819798297484213*^9, {
   3.8197983863755465`*^9, 3.81979838819967*^9}, 3.8197986767681336`*^9, {
   3.819798813145506*^9, 3.8197989523622866`*^9}, {3.819799028706168*^9, 
   3.8197990565517187`*^9}, {3.81979912438336*^9, 3.8197993089958405`*^9}, 
   3.8197993683820615`*^9, {3.819799404439334*^9, 3.819799652489131*^9}, {
   3.8197996918798137`*^9, 3.8197997058714046`*^9}, {3.8197999123125095`*^9, 
   3.819799913847406*^9}, {3.83232015133982*^9, 3.8323201622207127`*^9}},
 CellLabel->
  "In[1490]:=",ExpressionUUID->"448c6b36-7b71-4c70-a560-0c980b975071"],

Cell[BoxData[
 TemplateBox[{
  "SetDirectory","cdir",
   "\"Cannot set current directory to \\!\\(\\*RowBox[{\\\"\\\\\\\"D:\\\\\\\\\
\\\\\\\\Dropbox (Harvard University)\\\\\\\\\\\\\\\\Arxiv \
Projects\\\\\\\\\\\\\\\\Hidden Growth  - \
eLife\\\\\\\\\\\\\\\\Code\\\\\\\\\\\\\\\\New Data\\\\\\\"\\\"}]\\).\"",2,1491,
   1,30543225395235851794,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{3.8233272972046432`*^9, 3.832320163710826*^9},
 CellLabel->
  "During evaluation of \
In[1490]:=",ExpressionUUID->"14069da1-0654-4cd9-8c8c-e21ed7905f06"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0.14184724208102298`", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"g1", "\[Rule]", "3.2244841497907073`"}], ",", 
     RowBox[{"g2", "\[Rule]", "6.65593039165689`"}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.8197988970571775`*^9, 3.819798953573072*^9}, {
   3.8197990364494658`*^9, 3.8197990586092176`*^9}, {3.819799119394698*^9, 
   3.819799309841607*^9}, {3.819799371437891*^9, 3.819799498232562*^9}, {
   3.8197995289065495`*^9, 3.8197996533927155`*^9}, {3.8197996961563797`*^9, 
   3.819799710932872*^9}, 3.8197998908070087`*^9, 3.8197999249728827`*^9, 
   3.8233272978924994`*^9, 3.832320164025997*^9},
 CellLabel->
  "Out[1495]=",ExpressionUUID->"dc3b9787-2a3a-4949-bcc7-34158f86cc72"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8009576986725636`*^9, 3.8009577319395714`*^9}, {
   3.8009597301773367`*^9, 3.80095991325487*^9}, {3.8197986126984344`*^9, 
   3.8197986383518457`*^9}, 3.819798670688389*^9, {3.819798736104488*^9, 
   3.8197987759040775`*^9}, 
   3.819798888230753*^9},ExpressionUUID->"379e88ca-db6a-447c-8adc-\
9c77bd3519cf"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"nmin", "[", 
  RowBox[{"[", "2", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.81979991705882*^9, 3.819799927548994*^9}},
 CellLabel->
  "In[240]:=",ExpressionUUID->"1c23c6e5-43e4-4d79-ac69-2f6891da439f"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
   RowBox[{"g2", "\[Rule]", "6.9646572643958535`"}], ",", 
   RowBox[{"\[CapitalSigma]", "\[Rule]", "0.22596007807663557`"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.8197986728565917`*^9, 3.8197986802049446`*^9}, {
  3.8197987416735983`*^9, 3.8197987783535547`*^9}, {3.819798817760168*^9, 
  3.8197988823644376`*^9}, {3.819799922165389*^9, 3.8197999257268667`*^9}},
 CellLabel->
  "Out[240]=",ExpressionUUID->"fce6c88c-3993-4a1e-80e6-40a8d6d17264"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"gRule", " ", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
     RowBox[{"g2", "\[Rule]", "6.9646572643958535`"}], ",", 
     RowBox[{"\[CapitalSigma]", "\[Rule]", "0.22596007807663557`"}]}], 
    "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"g1", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
   RowBox[{"g2", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
   RowBox[{"\[CapitalSigma]", " ", "=", " ", 
    RowBox[{"gRule", "[", 
     RowBox[{"[", 
      RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"scale", " ", "=", " ", 
    RowBox[{"DiagonalMatrix", "[", 
     RowBox[{"{", 
      RowBox[{"g1", ",", " ", "g2", ",", " ", "\[CapitalSigma]"}], "}"}], 
     "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"function", " ", "=", " ", 
   RowBox[{"totalError", "[", 
    RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"gradient", " ", "=", " ", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{
     SuperscriptBox["totalError", 
      TagBox[
       RowBox[{"(", 
        RowBox[{"1", ",", "0", ",", "0"}], ")"}],
       Derivative],
      MultilineFunction->None], "[", 
     RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
    RowBox[{
     SuperscriptBox["totalError", 
      TagBox[
       RowBox[{"(", 
        RowBox[{"0", ",", "1", ",", "0"}], ")"}],
       Derivative],
      MultilineFunction->None], "[", 
     RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
    RowBox[{
     SuperscriptBox["totalError", 
      TagBox[
       RowBox[{"(", 
        RowBox[{"0", ",", "0", ",", "1"}], ")"}],
       Derivative],
      MultilineFunction->None], "[", 
     RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}]}], 
   "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"hessian", " ", "=", " ", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"2", ",", "0", ",", "0"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"1", ",", "1", ",", "0"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"1", ",", "0", ",", "1"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"1", ",", "1", ",", "0"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"0", ",", "2", ",", "0"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"0", ",", "1", ",", "1"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}]}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"1", ",", "0", ",", "1"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"0", ",", "1", ",", "1"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], ",", 
      RowBox[{
       SuperscriptBox["totalError", 
        TagBox[
         RowBox[{"(", 
          RowBox[{"0", ",", "0", ",", "2"}], ")"}],
         Derivative],
        MultilineFunction->None], "[", 
       RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}]}], "}"}]}], 
   "}"}]}]}], "Input",
 CellChangeTimes->{{3.8009536784189577`*^9, 3.8009537031707516`*^9}, {
   3.800953764810793*^9, 3.800953783442954*^9}, {3.8009538806119256`*^9, 
   3.800953883322693*^9}, {3.800954419659706*^9, 3.8009544470813537`*^9}, {
   3.8009544819380646`*^9, 3.800954506473435*^9}, {3.800955041417242*^9, 
   3.800955047433118*^9}, {3.8009552366648006`*^9, 3.800955279400449*^9}, {
   3.800955954008753*^9, 3.800955955606485*^9}, {3.800957981829923*^9, 
   3.800957991404284*^9}, 3.819798698762328*^9, {3.819799902635383*^9, 
   3.8197999298338857`*^9}},
 CellLabel->
  "In[227]:=",ExpressionUUID->"40102793-fbaa-4bee-9e85-cbed43b23ae9"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"2.5673907444456745`*^-16", ",", 
   RowBox[{"-", "1.9949319973733282`*^-16"}], ",", 
   RowBox[{"-", "1.0894063429134349`*^-15"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.8009545258156586`*^9, 3.80095504993642*^9, 3.8009553048253984`*^9, 
   3.8009559737619514`*^9, 3.800957686111174*^9, {3.8009579828082848`*^9, 
   3.8009579928314652`*^9}, 3.801237998954715*^9, 3.8012380875439053`*^9, 
   3.819798699971097*^9, {3.819799895207244*^9, 3.81979990325373*^9}},
 CellLabel->
  "Out[231]=",ExpressionUUID->"62e3b4c1-6fe2-443a-a7ed-f4cb8f923979"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"1.0172256499219552`", ",", 
     RowBox[{"-", "0.7812788971324887`"}], ",", 
     RowBox[{"-", "4.535785779285541`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.7812788971324887`"}], ",", "0.6235257949880648`", ",", 
     "3.453135865688086`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "4.535785779285541`"}], ",", "3.453135865688086`", ",", 
     "20.596321486286495`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.8009545258156586`*^9, 3.80095504993642*^9, 3.8009553048253984`*^9, 
   3.8009559737619514`*^9, 3.800957686111174*^9, {3.8009579828082848`*^9, 
   3.8009579928314652`*^9}, 3.801237998954715*^9, 3.8012380875439053`*^9, 
   3.819798699971097*^9, {3.819799895207244*^9, 3.8197999040585785`*^9}},
 CellLabel->
  "Out[232]=",ExpressionUUID->"1bff0ddb-eed9-4311-8fc6-4dbabc1e12e4"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Eigensystem", "[", 
  FractionBox["hessian", "function"], "]"}]], "Input",
 CellLabel->
  "In[269]:=",ExpressionUUID->"8cabc0ec-8ffc-4f1d-8864-d2dbb27ec95d"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "164.85551883546952`", ",", "0.3919475628086371`", ",", 
     "0.05030521338077914`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "0.212538495322068`"}], ",", "0.1620832095359829`", ",", 
       "0.9636163246815331`"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.44115815349224274`", ",", 
       RowBox[{"-", "0.8640076185962061`"}], ",", "0.24263206427639966`"}], 
      "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
      "0.8718984296427801`", ",", "0.4766758523296799`", ",", 
       "0.11213054977225047`"}], "}"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.8198001593167763`*^9},
 CellLabel->
  "Out[269]=",ExpressionUUID->"6193a2a1-7467-407e-9224-943102c6f3c7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"gRule", " ", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"g1", "\[Rule]", "3.1222703395011506`"}], ",", 
     RowBox[{"g2", "\[Rule]", "6.188414869493781`"}], ",", 
     RowBox[{"\[CapitalSigma]", "\[Rule]", "0.00854796983106368`"}]}], 
    "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"g1", " ", "=", " ", 
   RowBox[{"gRule", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
  RowBox[{"g2", " ", "=", " ", 
   RowBox[{"gRule", "[", 
    RowBox[{"[", 
     RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
  RowBox[{"\[CapitalSigma]", " ", "=", " ", 
   RowBox[{"gRule", "[", 
    RowBox[{"[", 
     RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq1", " ", "=", " ", 
   RowBox[{"G1", " ", "\[Equal]", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"0.5692637671140823`", ",", 
       RowBox[{"-", "0.8221355588804871`"}], ",", 
       RowBox[{"-", "0.005646793369148017`"}]}], "}"}], ".", 
     RowBox[{"{", " ", 
      RowBox[{"gg1", ",", " ", "gg2", ",", "\[CapitalSigma]1"}], " ", 
      "}"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq2", " ", "=", " ", 
   RowBox[{"G2", " ", "\[Equal]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"0.822107849167697`", ",", "0.5692912460845991`", ",", 
       RowBox[{"-", "0.006794223157030537`"}]}], "}"}], ".", 
     RowBox[{"{", " ", 
      RowBox[{"gg1", ",", " ", "gg2", ",", "\[CapitalSigma]1"}], " ", 
      "}"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"G3", " ", "\[Equal]", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"0.008800442485868573`", ",", 
       RowBox[{"-", "0.0007745680824197519`"}], ",", "0.9999609753667084`"}], 
      "}"}], ".", 
     RowBox[{"{", 
      RowBox[{"gg1", ",", " ", "gg2", ",", "\[CapitalSigma]1"}], " ", 
      "}"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"eq1", ",", " ", "eq2", ",", "eq3"}], "}"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"gg1", ",", " ", "gg2", ",", "\[CapitalSigma]1"}], "}"}]}], 
   "]"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{
  3.8198000049380817`*^9, {3.819800138574235*^9, 
   3.819800157191458*^9}},ExpressionUUID->"2b1d4ba0-a500-4b58-9d74-\
c600174e4048"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"gg1", "\[Rule]", 
     RowBox[{
      RowBox[{"0.569263767114082`", " ", "G1"}], "+", 
      RowBox[{"0.8221078491676972`", " ", "G2"}], "+", 
      RowBox[{"0.00880044248586857`", " ", "G3"}]}]}], ",", 
    RowBox[{"gg2", "\[Rule]", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "0.8221355588804862`"}], " ", "G1"}], "+", 
      RowBox[{"0.5692912460845989`", " ", "G2"}], "-", 
      RowBox[{"0.0007745680824197514`", " ", "G3"}]}]}], ",", 
    RowBox[{"\[CapitalSigma]1", "\[Rule]", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "0.005646793369166403`"}], " ", "G1"}], "-", 
      RowBox[{"0.006794223157015722`", " ", "G2"}], "+", 
      RowBox[{"0.9999609753667081`", " ", "G3"}]}]}]}], "}"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.819800139398032*^9},
 CellLabel->
  "Out[267]=",ExpressionUUID->"35580346-3591-4cfe-989c-c1e5aeb51157"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "164.85551883546952`", ",", "0.3919475628086371`", ",", 
     "0.05030521338077914`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "0.212538495322068`"}], ",", "0.1620832095359829`", ",", 
       "0.9636163246815331`"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.44115815349224274`", ",", 
       RowBox[{"-", "0.8640076185962061`"}], ",", "0.24263206427639966`"}], 
      "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
      "0.8718984296427801`", ",", "0.4766758523296799`", ",", 
       "0.11213054977225047`"}], "}"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.8198001394199743`*^9},
 CellLabel->
  "Out[268]=",ExpressionUUID->"67f0b931-b10d-4264-b3dc-d3db3798b6dd"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.801238096813117*^9, 3.801238098709097*^9}, 
   3.819800137461211*^9},ExpressionUUID->"2bff463d-0aaa-42ab-b492-\
ee76a8b06141"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "25.487168521249355`", ",", "0.10569641936533002`", ",", 
     "0.0300851631634238`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "0.26027801318637583`"}], ",", "0.1754282237390736`", ",",
        "0.9494631610375973`"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.027770850018876157`", ",", "0.9843091140316617`", ",", 
       RowBox[{"-", "0.17425368840697353`"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
      "0.9651342578838356`", ",", "0.018987004765341323`", ",", 
       "0.2610658114519383`"}], "}"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.801238105240614*^9},
 CellLabel->"Out[95]=",ExpressionUUID->"8d8b0be7-e58b-42cd-a4ba-4abd22f62e5c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"gRule", " ", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"g1", "\[Rule]", "3.1222703395011506`"}], ",", 
     RowBox[{"g2", "\[Rule]", "6.188414869493781`"}], ",", 
     RowBox[{"\[CapitalSigma]", "\[Rule]", "0.00854796983106368`"}]}], 
    "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"g1", " ", "=", " ", 
   RowBox[{"gRule", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
  RowBox[{"g2", " ", "=", " ", 
   RowBox[{"gRule", "[", 
    RowBox[{"[", 
     RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
  RowBox[{"\[CapitalSigma]", " ", "=", " ", 
   RowBox[{"gRule", "[", 
    RowBox[{"[", 
     RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq1", " ", "=", " ", 
   RowBox[{"G1", " ", "\[Equal]", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "0.26027801318637583`"}], ",", "0.1754282237390736`", ",",
        "0.9494631610375973`"}], "}"}], ".", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", " ", "gg1"}], ",", 
       RowBox[{"g2", " ", "gg2"}], ",", 
       RowBox[{"\[CapitalSigma]", " ", "\[CapitalSigma]1"}]}], " ", 
      "}"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq2", " ", "=", " ", 
   RowBox[{"G2", " ", "\[Equal]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"0.027770850018876157`", ",", "0.9843091140316617`", ",", 
       RowBox[{"-", "0.17425368840697353`"}]}], "}"}], ".", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", " ", "gg1"}], ",", 
       RowBox[{"g2", " ", "gg2"}], ",", 
       RowBox[{"\[CapitalSigma]", " ", "\[CapitalSigma]1"}]}], " ", 
      "}"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"eq3", "=", 
   RowBox[{"G3", " ", "\[Equal]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "0.9651342578838356`", ",", "0.018987004765341323`", ",", 
       "0.2610658114519383`"}], "}"}], ".", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", " ", "gg1"}], ",", 
       RowBox[{"g2", " ", "gg2"}], ",", 
       RowBox[{"\[CapitalSigma]", " ", "\[CapitalSigma]1"}]}], " ", 
      "}"}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"eq1", ",", " ", "eq2", ",", "eq3"}], "}"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"gg1", ",", " ", "gg2", ",", "\[CapitalSigma]1"}], "}"}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8012381447579756`*^9, 3.8012382035897045`*^9}},
 CellLabel->"In[96]:=",ExpressionUUID->"33cee6fb-6b6c-4cc0-89a7-df3aa0e22476"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"gg1", "\[Rule]", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "0.08336178001420615`"}], " ", "G1"}], "+", 
      RowBox[{"0.008894441223598058`", " ", "G2"}], "+", 
      RowBox[{"0.3091129700312998`", " ", "G3"}]}]}], ",", 
    RowBox[{"gg2", "\[Rule]", 
     RowBox[{
      RowBox[{"0.028347844712845453`", " ", "G1"}], "+", 
      RowBox[{"0.15905674309004092`", " ", "G2"}], "+", 
      RowBox[{"0.0030681531807021305`", " ", "G3"}]}]}], ",", 
    RowBox[{"\[CapitalSigma]1", "\[Rule]", 
     RowBox[{
      RowBox[{"111.07469724415829`", " ", "G1"}], "-", 
      RowBox[{"20.385388794158857`", " ", "G2"}], "+", 
      RowBox[{"30.541264956646692`", " ", "G3"}]}]}]}], "}"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.801238204871307*^9},
 CellLabel->
  "Out[101]=",ExpressionUUID->"3b199f61-add6-4563-941c-19de97b12659"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8009571195836096`*^9, 3.8009571671873565`*^9}, {
   3.800957209668708*^9, 3.8009572820053053`*^9}, {3.800958055381255*^9, 
   3.800958065250843*^9}, {3.801237089847638*^9, 3.801237128182189*^9}, {
   3.801237902661149*^9, 3.8012379120929165`*^9}, 
   3.801238128680953*^9},ExpressionUUID->"037e6795-a871-480c-868a-\
2ece2db99b26"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"gg1", "\[Rule]", 
     RowBox[{
      RowBox[{"0.569263767114082`", " ", "G1"}], "+", 
      RowBox[{"0.8221078491676972`", " ", "G2"}], "+", 
      RowBox[{"0.00880044248586857`", " ", "G3"}]}]}], ",", 
    RowBox[{"gg2", "\[Rule]", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "0.8221355588804863`"}], " ", "G1"}], "+", 
      RowBox[{"0.569291246084599`", " ", "G2"}], "-", 
      RowBox[{"0.0007745680824197517`", " ", "G3"}]}]}], ",", 
    RowBox[{"\[CapitalSigma]1", "\[Rule]", 
     RowBox[{
      RowBox[{
       RowBox[{"-", "0.005646793369148015`"}], " ", "G1"}], "-", 
      RowBox[{"0.006794223157030541`", " ", "G2"}], "+", 
      RowBox[{"0.9999609753667082`", " ", "G3"}]}]}]}], "}"}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.800957283082429*^9, 3.8009580665194464`*^9, {3.8012371171735888`*^9, 
   3.801237128460416*^9}, 3.801237912792046*^9},
 CellLabel->"Out[76]=",ExpressionUUID->"fb96efca-ebf0-494b-8616-e47bc5c7eca6"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Eigensystem", "[", "hessian", "]"}]], "Input",
 CellChangeTimes->{{3.8009545536791234`*^9, 3.8009545613386087`*^9}},
 CellLabel->
  "In[4082]:=",ExpressionUUID->"4f5ce71f-a5fb-4a13-bd68-043012cd05cc"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "2.8428143974864435`", ",", "0.006651026104621027`", ",", 
     "0.0009819581256068086`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "0.1630703969227546`"}], ",", "0.17156874760953775`", ",",
        "0.9715823230643659`"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.09735319617742606`", ",", 
       RowBox[{"-", "0.977159976386875`"}], ",", "0.18889345076428998`"}], 
      "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
      "0.9817995726427542`", ",", "0.12538957449204594`", ",", 
       "0.14264309926249064`"}], "}"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.800954561673739*^9},
 CellLabel->
  "Out[4082]=",ExpressionUUID->"4cfbee6f-8e11-401a-aa2c-a88d227a1a46"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"D", "[", 
  RowBox[{
   RowBox[{"f", "[", 
    RowBox[{"x", ",", "y", ",", "z"}], "]"}], ",", " ", 
   RowBox[{"{", 
    RowBox[{"{", 
     RowBox[{"x", ",", "y", ",", "z"}], "}"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.800954464269342*^9, 3.8009544766242976`*^9}},
 CellLabel->
  "In[4072]:=",ExpressionUUID->"2644d7f3-0d50-4c88-8b33-bfa3c4076064"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8009544800580945`*^9, 
  3.8009544800590925`*^9}},ExpressionUUID->"0fece42f-5205-47b2-84f8-\
6b0dde07d55e"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.83370174750869*^9, 
  3.833701748589601*^9}},ExpressionUUID->"856e9fee-7614-4f1c-b8a5-\
86e86582c724"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Doing", " ", "the", " ", "simulation", " ", "without", " ", "\[Delta]L", 
   " ", "linearizing"}], "*)"}]], "Input",
 CellChangeTimes->{{3.800947338577693*^9, 3.8009473640066247`*^9}, 
   3.8397557417357473`*^9},
 FontSize->72,ExpressionUUID->"9b47bbcb-541c-4dc1-9821-beae19941391"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Equation1", " ", "=", " ", 
     RowBox[{
      FractionBox[
       RowBox[{"2", " ", 
        RowBox[{"a", "[", "t", "]"}], " ", 
        RowBox[{
         RowBox[{"a", "'"}], "[", "t", "]"}]}], 
       SuperscriptBox[
        RowBox[{"A", "[", "t", "]"}], "2"]], " ", "\[Equal]", " ", 
      RowBox[{"(", 
       RowBox[{"\[Alpha]1", " ", "-", " ", 
        RowBox[{"\[Alpha]2", " ", 
         FractionBox["A0", 
          RowBox[{"A", "[", "t", "]"}]]}], " ", "+", " ", 
        RowBox[{
         FractionBox["\[Beta]1", "2"], 
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", 
           FractionBox["A0", 
            RowBox[{"A", "[", "t", "]"}]]}], ")"}]}], " ", "-", " ", 
        RowBox[{
         FractionBox["\[Beta]2", "2"], 
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", 
           FractionBox["A0", 
            RowBox[{"A", "[", "t", "]"}]]}], ")"}], " ", 
         FractionBox["A0", 
          RowBox[{"A", "[", "t", "]"}]]}], " ", "+", " ", 
        RowBox[{
         FractionBox["\[Delta]1", "4"], 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"1", " ", "-", " ", 
            FractionBox["A0", 
             RowBox[{"A", "[", "t", "]"}]]}], ")"}], "2"]}], " ", "+", " ", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"\[Sigma]1", " ", "+", " ", "\[Sigma]2"}], ")"}], 
         FractionBox[
          RowBox[{" ", 
           RowBox[{
            SuperscriptBox[
             RowBox[{"A", "[", "t", "]"}], "2"], " ", "-", " ", 
            SuperscriptBox[
             RowBox[{"a", "[", "t", "]"}], "2"]}]}], 
          RowBox[{"2", " ", 
           SuperscriptBox[
            RowBox[{"A", "[", "t", "]"}], "2"]}]]}], "+", " ", 
        RowBox[{
         RowBox[{"(", " ", "\[Sigma]2", ")"}], 
         FractionBox[
          RowBox[{" ", 
           RowBox[{
            SuperscriptBox[
             RowBox[{"L", "[", "t", "]"}], "2"], " ", "-", " ", 
            SuperscriptBox[
             RowBox[{"l", "[", "t", "]"}], "2"]}]}], 
          RowBox[{"2", " ", 
           SuperscriptBox[
            RowBox[{"L", "[", "t", "]"}], "2"]}]]}]}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Equation2", " ", "=", " ", 
     RowBox[{
      FractionBox[
       RowBox[{"2", " ", 
        RowBox[{"l", "[", "t", "]"}], " ", 
        RowBox[{
         RowBox[{"l", "'"}], "[", "t", "]"}]}], 
       SuperscriptBox[
        RowBox[{"L", "[", "t", "]"}], "2"]], " ", "\[Equal]", 
      RowBox[{"(", " ", 
       RowBox[{"\[Alpha]1", "  ", "+", " ", 
        RowBox[{
         FractionBox["\[Beta]1", "2"], 
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", 
           FractionBox["A0", 
            RowBox[{"A", "[", "t", "]"}]]}], ")"}]}], " ", "+", " ", 
        RowBox[{
         FractionBox["\[Delta]1", "4"], 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"1", " ", "-", " ", 
            FractionBox["A0", 
             RowBox[{"A", "[", "t", "]"}]]}], ")"}], "2"]}], " ", "+", " ", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"\[Sigma]1", " ", "+", " ", "\[Sigma]2"}], ")"}], 
         FractionBox[
          RowBox[{" ", 
           RowBox[{
            SuperscriptBox[
             RowBox[{"L", "[", "t", "]"}], "2"], " ", "-", 
            SuperscriptBox[
             RowBox[{"l", "[", "t", "]"}], "2"]}]}], 
          RowBox[{"2", " ", 
           SuperscriptBox[
            RowBox[{"L", "[", "t", "]"}], "2"]}]]}], "+", " ", 
        RowBox[{"\[Sigma]2", 
         FractionBox[
          RowBox[{" ", 
           RowBox[{
            SuperscriptBox[
             RowBox[{"A", "[", "t", "]"}], "2"], " ", "-", " ", 
            SuperscriptBox[
             RowBox[{"a", "[", "t", "]"}], "2"]}]}], 
          RowBox[{"2", " ", 
           SuperscriptBox[
            RowBox[{"A", "[", "t", "]"}], "2"]}]]}]}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "These", "  ", "relations", " ", "are", " ", "true", " ", "fro", " ", 
     "linearized", " ", "equations", " ", "in", " ", "\[Epsilon]z"}], "*)"}], 
   "\[IndentingNewLine]", " ", 
   RowBox[{
    RowBox[{
     RowBox[{"a", "[", "t_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"A", "[", "t", "]"}], "  ", 
      RowBox[{"(", 
       RowBox[{"1", " ", "-", 
        RowBox[{"\[Epsilon]", " ", "\[Epsilon]t", " ", 
         FractionBox["p", 
          RowBox[{"y", "[", "t", "]"}]]}]}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", " ", 
   RowBox[{
    RowBox[{
     RowBox[{"l", "[", "t_", "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"L", "[", "t", "]"}], "  ", 
      RowBox[{"(", 
       RowBox[{"1", " ", "-", 
        RowBox[{"\[Epsilon]", " ", "\[Epsilon]z", "  ", 
         FractionBox["p", 
          RowBox[{"y", "[", "t", "]"}]]}]}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"A", "[", "t_", "]"}], "  ", "=", " ", 
     RowBox[{"A0", "  ", 
      RowBox[{"(", 
       RowBox[{"1", " ", "+", " ", 
        RowBox[{"\[Epsilon]", " ", 
         RowBox[{"\[Delta]A", "[", "t", "]"}]}]}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"L", "[", "t_", "]"}], "  ", "=", " ", 
     RowBox[{
      RowBox[{"L0", "[", "t", "]"}], "  ", 
      RowBox[{"(", 
       RowBox[{"1", " ", "+", " ", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Stored", " ", "Growth", " ", "Condition"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"yStored", "[", "t_", "]"}], "=", 
     RowBox[{
      FractionBox[
       RowBox[{
        RowBox[{"L", "[", "t", "]"}], " ", "-", " ", 
        RowBox[{"pf", " ", 
         RowBox[{"L0", "[", "t", "]"}], " "}]}], 
       RowBox[{
        RowBox[{"L0", "[", "t", "]"}], " ", "-", " ", 
        RowBox[{"L", "[", "t", "]"}]}]], "  ", "\[Epsilon]", " ", 
      "\[Epsilon]z"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "the", " ", "modulus", " ", "in", " ", "normal", " ", "conditions"}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"yUnPert", "[", "t_", "]"}], "=", " ", "1"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
     "The", " ", "equations", " ", "of", " ", "motion", " ", "in", " ", "the",
       " ", "unperturbed", " ", "case", " ", "where", " ", "p"}], "  ", "=", 
     " ", 
     RowBox[{"y", " ", "=", " ", 
      RowBox[{
      "1.", " ", "We", " ", "focus", " ", "on", " ", "the", " ", "fixed", " ",
        "point", " ", "condition"}]}]}], "*)"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"y", "[", "t_", "]"}], "=", " ", 
     RowBox[{"yUnPert", "[", "t", "]"}]}], ";", "  ", 
    RowBox[{"p", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"UnPertEq1", " ", "=", " ", 
     RowBox[{"Normal", "[", 
      RowBox[{"Series", "[", 
       RowBox[{"Equation1", " ", ",", " ", 
        RowBox[{"{", 
         RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"UnPertEq2", " ", "=", " ", 
     RowBox[{"Normal", "[", 
      RowBox[{"Series", "[", 
       RowBox[{"Equation2", " ", ",", " ", 
        RowBox[{"{", 
         RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"y", ",", " ", "p"}], "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "Getting", " ", "the", " ", "fixed", " ", "point", " ", "conditions"}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"initL", " ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"L0", "[", "t_", "]"}], " ", ":=", " ", 
     RowBox[{"initL", " ", 
      RowBox[{"Exp", "[", 
       RowBox[{"(*", "R0", "*)"}], " ", "t", "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fixedPointConds", " ", "=", " ", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{
            RowBox[{"{", 
             RowBox[{"UnPertEq1", ",", " ", "UnPertEq2"}], "}"}], "/.", 
            RowBox[{
             RowBox[{"\[Delta]A", "[", "t", "]"}], "\[Rule]", "0"}]}], "/.", 
           RowBox[{
            RowBox[{"\[Delta]L", "[", "t", "]"}], "\[Rule]", "0"}]}], "/.", 
          RowBox[{
           RowBox[{
            RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], "\[Rule]", "0"}]}], "/.", 
         RowBox[{
          RowBox[{
           RowBox[{"\[Delta]L", "'"}], "[", "t", "]"}], "\[Rule]", "0"}]}], 
        ",", " ", 
        RowBox[{"{", 
         RowBox[{"\[Alpha]1", ",", " ", "\[Alpha]2"}], "}"}]}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
     "The", " ", "equations", " ", "of", " ", "motion", " ", "in", " ", "the",
       " ", "absence", " ", "of", " ", "stored", " ", "growth", " ", "and", 
      " ", "when", " ", "the", " ", "pressure", " ", "has", " ", "been", " ", 
      "reduced", " ", "to", "  ", "pf"}], " ", "<", " ", "1"}], "  ", "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]1", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]2", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"y", "[", "t_", "]"}], "=", " ", 
     RowBox[{"yUnPert", "[", "t", "]"}]}], ";", "  ", 
    RowBox[{"p", "=", " ", "pf"}], ";", " ", 
    RowBox[{"\[Epsilon]t", " ", "=", " ", "\[Epsilon]z"}], ";", " ", 
    RowBox[{"pf", "=", " ", "0.1307965015979623`"}], 
    RowBox[{"(*", 
     FractionBox[
      RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], "\[Epsilon]z"], "*)"}], ";",
     "  ", 
    RowBox[{"\[Sigma]1", " ", "=", " ", 
     RowBox[{
      RowBox[{"2", " ", "\[CapitalSigma]"}], " ", "-", " ", 
      RowBox[{"2", " ", "\[Sigma]2"}]}]}], ";", " ", 
    RowBox[{"\[Beta]2", " ", "=", " ", 
     RowBox[{
      RowBox[{"4", " ", "g1"}], " ", "+", " ", "4", " ", "+", " ", 
      RowBox[{"4", " ", "g2"}]}]}], ";", " ", 
    RowBox[{"\[Beta]1", " ", "=", " ", 
     RowBox[{"4", " ", "g2"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"noStoredEq1", " ", "=", " ", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]A", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"Normal", "[", 
          RowBox[{"Series", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"Solve", "[", 
              RowBox[{
               RowBox[{"Normal", "[", 
                RowBox[{"Series", "[", 
                 RowBox[{"Equation1", " ", ",", " ", 
                  RowBox[{"{", 
                   RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}],
                 "]"}], ",", " ", 
               RowBox[{
                RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}]}], "]"}], "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", " ", 
            RowBox[{"{", 
             RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
          "]"}], "/.", 
         RowBox[{"\[Epsilon]", "\[Rule]", "1"}]}], "//", "FullSimplify"}], 
       ")"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"noStoredEq2", " ", "=", " ", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]L", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"Normal", "[", 
          RowBox[{"Series", "[", 
           RowBox[{
            RowBox[{
             RowBox[{"Solve", "[", 
              RowBox[{
               RowBox[{"Normal", "[", 
                RowBox[{"Series", "[", 
                 RowBox[{"Equation2", " ", ",", " ", 
                  RowBox[{"{", 
                   RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}],
                 "]"}], ",", " ", 
               RowBox[{
                RowBox[{"\[Delta]L", "'"}], "[", "t", "]"}]}], "]"}], "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", " ", 
            RowBox[{"{", 
             RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
          "]"}], "/.", 
         RowBox[{"\[Epsilon]", "\[Rule]", "1"}]}], "//", "FullSimplify"}], 
       ")"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Clear", "[", 
     RowBox[{
     "y", ",", " ", "p", ",", " ", "pf", ",", " ", "\[Sigma]1", ",", " ", 
      "\[Beta]1", ",", " ", "\[Beta]2", ",", " ", "R0"}], "]"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
     "The", " ", "equations", " ", "of", " ", "motion", " ", "when", " ", 
      "there", " ", "is", " ", "stored", " ", "growth", " ", "and", " ", 
      "p"}], " ", "=", " ", 
     RowBox[{"pf", " ", "<", " ", "1."}]}], "  ", "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]1", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Alpha]2", "=", " ", 
     RowBox[{
      RowBox[{"fixedPointConds", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], "//", 
      "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "4.356076133639439`"}], ",", 
       RowBox[{"g2", "\[Rule]", "3.6559"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "0.0"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g1", " ", "=", "  ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";", " ", 
    RowBox[{"\[Sigma]2", " ", "=", "0"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\[Delta]A0", "=", 
      RowBox[{"-", " ", "0.11811044031330893`"}]}], ";", " ", 
     RowBox[{"\[Delta]L0", " ", "=", 
      RowBox[{"-", " ", "0.10675660308544596`"}]}], ";"}], " ", "*)"}], 
   RowBox[{
    RowBox[{"\[Epsilon]z", " ", "=", " ", "0.10"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"y", "[", "t_", "]"}], "=", " ", 
     RowBox[{"yStored", "[", "t", "]"}]}], ";", "  ", 
    RowBox[{"p", "=", " ", "pf"}], ";", "    ", 
    RowBox[{"pf", "=", "  ", 
     RowBox[{"-", "0.5"}]}], 
    RowBox[{"(*", 
     FractionBox[
      RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], "\[Epsilon]z"], "*)"}], ";",
     "  ", 
    RowBox[{"\[Sigma]1", " ", "=", " ", 
     RowBox[{
      RowBox[{"2", " ", "\[CapitalSigma]"}], " ", "-", " ", 
      RowBox[{"2", " ", "\[Sigma]2"}]}]}], ";", "  ", 
    RowBox[{"\[Beta]2", " ", "=", " ", 
     RowBox[{
      RowBox[{"4", " ", "g1"}], " ", "+", " ", "4", " ", "+", " ", 
      "\[Beta]1"}]}], ";", " ", 
    RowBox[{"\[Beta]1", " ", "=", " ", 
     RowBox[{"4", " ", "g2"}]}], ";", " ", 
    RowBox[{"R0", "  ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]A0", "=", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"-", "0.055"}], ";"}], "*)"}], 
     RowBox[{"\[Delta]L0", " ", "=", 
      RowBox[{
       RowBox[{"-", " ", "\[Epsilon]z"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", " ", "-", " ", "pf"}], ")"}]}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"StoredEq1", " ", "=", " ", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]A", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Solve", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"Normal", "[", 
            RowBox[{"Series", "[", 
             RowBox[{
              RowBox[{"{", 
               RowBox[{"Equation1", " ", ",", " ", "Equation2"}], "}"}], ",", 
              " ", 
              RowBox[{"{", 
               RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
            "]"}], "/.", 
           RowBox[{"\[Epsilon]", "\[Rule]", "1"}]}], ",", 
          RowBox[{"{", " ", 
           RowBox[{
            RowBox[{
             RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], ",", " ", 
            RowBox[{
             SuperscriptBox["\[Delta]L", "\[Prime]",
              MultilineFunction->None], "[", "t", "]"}]}], "}"}]}], "]"}], 
        "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"StoredEq2", " ", "=", " ", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]L", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Solve", "[", 
         RowBox[{
          RowBox[{
           RowBox[{"Normal", "[", 
            RowBox[{"Series", "[", 
             RowBox[{
              RowBox[{"{", 
               RowBox[{"Equation1", " ", ",", " ", "Equation2"}], "}"}], ",", 
              " ", 
              RowBox[{"{", 
               RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], 
            "]"}], "/.", 
           RowBox[{"\[Epsilon]", "\[Rule]", "1"}]}], ",", 
          RowBox[{"{", " ", 
           RowBox[{
            RowBox[{
             RowBox[{"\[Delta]A", "'"}], "[", "t", "]"}], ",", " ", 
            RowBox[{
             SuperscriptBox["\[Delta]L", "\[Prime]",
              MultilineFunction->None], "[", "t", "]"}]}], "}"}]}], "]"}], 
        "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], " ", ")"}]}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"endTime", " ", "=", "6"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"storedEqSol", " ", "=", " ", 
     RowBox[{"NDSolve", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"StoredEq1", ",", " ", "StoredEq2", ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]L", "[", "0", "]"}], "\[Equal]", " ", 
          "\[Delta]L0"}], ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]A", "[", "0", "]"}], "\[Equal]", "\[Delta]A0"}]}], 
        "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"t", ",", "0", ",", "endTime"}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"\[Delta]AA", "[", "u_", "]"}], ":=", 
     RowBox[{
      RowBox[{"(", " ", 
       RowBox[{
        RowBox[{"\[Delta]A", "[", "u", "]"}], "/.", "storedEqSol"}], ")"}], 
      RowBox[{"HeavisideTheta", "[", "u", "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"\[Delta]LL", "[", "u_", "]"}], ":=", " ", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"\[Delta]L", "[", "u", "]"}], "/.", "storedEqSol"}], ")"}], 
      RowBox[{"HeavisideTheta", "[", "u", "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"noStoredEqSol", " ", "=", " ", 
      RowBox[{"NDSolve", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"noStoredEq1", ",", " ", "noStoredEq2", ",", " ", 
          RowBox[{
           RowBox[{"\[Delta]L", "[", "0", "]"}], "\[Equal]", " ", 
           "\[Delta]L0"}], ",", " ", 
          RowBox[{
           RowBox[{"\[Delta]A", "[", "0", "]"}], "\[Equal]", "\[Delta]A0"}]}],
          "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "endTime"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"\[Delta]AA", "[", "u_", "]"}], ":=", 
      RowBox[{
       RowBox[{"(", " ", 
        RowBox[{
         RowBox[{"\[Delta]A", "[", "u", "]"}], "/.", "noStoredEqSol"}], ")"}], 
       RowBox[{"HeavisideTheta", "[", "u", "]"}]}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"\[Delta]LL", "[", "u_", "]"}], ":=", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Delta]L", "[", "u", "]"}], "/.", "noStoredEqSol"}], ")"}], 
       RowBox[{"HeavisideTheta", "[", "u", "]"}]}]}], ";"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"beginTime", " ", "=", " ", 
     RowBox[{"-", "0.7"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pnL", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"\[Delta]LL", "[", "t", "]"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"t", ",", "beginTime", ",", "endTime"}], "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Darker", "[", "Black", "]"}], ",", "Dashed", ",", " ", 
           RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], "}"}]}], ",", 
       " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], 
       RowBox[{"(*", 
        RowBox[{",", " ", 
         RowBox[{"FrameLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
           "\"\<\!\(\*SubscriptBox[\(\[Lambda]\), \(0\)]\)t\>\"", ",", " ", 
            "\"\<\[Delta]L\>\""}], "}"}]}]}], "*)"}], ",", " ", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pnA", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"\[Delta]AA", "[", "t", "]"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"t", ",", "0", ",", "endTime"}], "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Darker", "[", "Black", "]"}], ",", "Dashed", ",", " ", 
           RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], "}"}]}], ",", 
       " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], 
       RowBox[{"(*", 
        RowBox[{",", " ", 
         RowBox[{"FrameLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
           "\"\<\!\(\*SubscriptBox[\(\[Lambda]\), \(0\)]\)t\>\"", ",", " ", 
            "\"\<\[Delta]L\>\""}], "}"}]}]}], "*)"}], ",", " ", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", " ", 
   RowBox[{
    RowBox[{"R0", " ", "=", "0.0005377482574550649`"}], ";", " ", 
    RowBox[{"initA", " ", "=", " ", "1.0973712210539464`"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pnLen", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", " ", "+", " ", 
          RowBox[{"\[Delta]LL", "[", 
           RowBox[{"R0", " ", "t"}], "]"}]}], ")"}], "initA", " ", 
        RowBox[{"Exp", "[", 
         RowBox[{"R0", " ", "t"}], "]"}]}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"t", ",", 
         FractionBox["beginTime", "R0"], ",", 
         FractionBox["endTime", "R0"]}], "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Darker", "[", "Black", "]"}], ",", "Dashed", ",", " ", 
           RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], "}"}]}], ",", 
       " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], 
       RowBox[{"(*", 
        RowBox[{",", " ", 
         RowBox[{"FrameLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
           "\"\<\!\(\*SubscriptBox[\(\[Lambda]\), \(0\)]\)t\>\"", ",", " ", 
            "\"\<\[Delta]L\>\""}], "}"}]}]}], "*)"}], ",", " ", 
       RowBox[{"AxesOrigin", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0"}], "}"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"p1", " ", "=", " ", 
     GraphicsBox[{{{}, {}, 
        TagBox[
         {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
          Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzX081AccwHEuS13zMF4eihRhbQupeb1uqb63k6WWp7C2meRxu06vkVJR
J04S8tD14lZkq+R6ziUZ8u10qDhxHlJ07s793DHDnet+SWrtj8/r/efHMfr3
nXEUAwMD/4/9ryM32PxqYCZ81rnA4tfQBjQtjohiAQfu1zp4XkhswHcFTIGb
RxbIywIs2vMbsD83I1Rgmg0x+MRjYUsD5mdW8xrEpyAzvOI3ilcjztXlmKsq
i0CYVx1qY/kA4/lq3uwqHvQYL6nsb2vCCz69oWZFl8BKUnExkirEkHVYnaiq
BgE3Ybo5SoQHQizdTY79Dc+eNdns2dSGC6YXNm5LeQgdftOHjvY8wYFW9so6
tggGOcZn8lgd+M4lBeiMx7DDteou/1on3rBSlyf/0AHlDPGZu4e6MLe8RCP+
qguiie63ZEY3xusOayYXSyDSr/+PKywJ5nBti+PMe2EvBn5nHN6D3XrShKnr
g6VPzEp07r2o19Hfj3Y+h71q8Qna616M8t5aUN/9Aq66ZrEpj/pQ53t6bplg
EC43+ZrvSutHMa9oUXf9K5Bo+end3s8xM3s+x7B+GHpP13hv1z5HD/uw5Mh2
GQTVeajjSgeQvpSqVYvl8MvInTWXfF9g3JvdwzRUgG74ZrKf8gXeTDtTdlc0
AvYnHAJi819iTEcql9WiBGZtwTor90F0+0CZHashIH8q6y//5kFc1s9059aN
Qp8fwzJjzxDaFSZKKNdV4AuVja7aIcy1WnPnNk8NAfNJos3pr9Ce3hpx8twY
7MtbLKm0lmLzDoNUl7xxiLRIelR0UYp587bxk4X/QNRQxnEVbRib00bzdIUT
IJHz23a1D+OnQyErhex/wWE0PIHzhQyPyCqy6jImIZefzaraL8O3rXm7UpKn
wKRP6s6tleHBTdYC2tppiK7S9Lx6I8P0sbA/2+9Mg3HmSwaHLkduNtEiXK2B
Lewu3gqOHOsOxoaIr2lA7SQ7Z9cuR1XYetuNzlpwdzt2a5WpAsVlQ0e2ndeC
pVVLcE2gAkVeB30S7GfAeekhuFGiwBaM2KI9OwMiocHY4wEFDpz3unnaRgcO
xx6kBq4cwYtSlaCtVAdDJZcE++JHMMVifCrW7DVsVqemCatGMJw3eNam+DXQ
KTIGZ3IEt5stT3Kj6iEo0VmWsVaJ0xO0cflxPRgFl0+4JimRb7+l/bohCTHv
Swo33lfi3k0VIwNHSLDTcjmlb5Q4ZzmdrkkjYSenj94wq8T8cbo9lU2Ckcme
eelbJd4uVYR6Z5KgvxZ8wHVeiTqNS2t5Lgk9LMFP9wwJZF+5wY8+TwLTWkTp
oRJYbFa/b6KRBN/2iS6T5QQ6jVKpnyAJNGfLw54OBNY0hl9ZLiThllmhQ9gK
AvuZ89KAFhKOOp1iljkSuExED6oWk/Dj0yLyS1cCLx9uW5ciJcHTiKHb6kGg
V6DtswIZCY6lk0WstQS2ujBZVQoS/O/p1xR6EjgmoV4eGCVhNdUupn89ge5u
AVbeUx9/25raYmkE4oKK6hANCd2s4MicbwgMejnlnzBDws+GPvrrGwhMPlmc
XU6S8FTPcJrZSKDRboVT7SwJDNOd9603E1jy9XrsnCPBZ5Hw+w1A4OdLssJV
8yRY0ouGI+gE1sl7yQ8fSBCZP9yf8S2B/wG5FaeU
           "]]},
         Annotation[#, "Charting`Private`Tag$141711#1"]& ]}, {}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{Automatic, Automatic},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->FrontEndValueCache[{{Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
          Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
         Automatic, {{-0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.68, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.66, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.64, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.62, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.58, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.56, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.54, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.52, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.48, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.46, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.44, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.42, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.38, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.36, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.34, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.32, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.28, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.26, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.24, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.22, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.18, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.16, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.14, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, 
            {
             AbsoluteThickness[0.1]}}, {-0.12, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.08, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.06, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.04, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.02, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {1.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.5, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {-0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {0.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.1, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.2, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.3, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.4, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.6, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.7, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.8, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {1.9, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}, {2., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
             AbsoluteThickness[0.1]}}}}}],
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImagePadding->All,
      ImageSize->{62.22689075630291, Automatic},
      LabelStyle->Directive[Bold, 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "DefaultBoundaryStyle" -> Automatic, 
        "DefaultGraphicsInteraction" -> {
         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
          "Effects" -> {
           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
            "Droplines" -> {
             "freeformCursorMode" -> True, 
              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{All, All},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";", 
    RowBox[{"pL800Data", "=", " ", 
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJzt2/dfzf//P/DQoIGUSiIyErJHGT2MikRJA6WUEmWkRSokKyFS2pOGEKWE
1qNFu86ejXPauyhCqo/v5fU89/cf8P319IvLuTzreZ7j8bjfPa6Xx23xKZcj
p6eKiIiYiYuI/L9/H1v1UdQLirGC6rIqhwAbpLhf4fWrlcX4jlsPPdVRG8dt
2nVLM6IIe/bT5vDjrNHyxc5WGWJFWEv+RXAuyRydmL/ijGNHIdY7JLbJU+Ug
Pj/io3i+uADHW1bckpCSRz619eWuMfnY79O106ky1uhByhKvK1fy8O8OxTfd
Oftw1I0rK64dycVLHkjutoo6h18dq2b5a37Guh5huWxxE/x5ver9gOmfcH3U
9YuayWqoUtJdO6g1B3/ztN3Y9tsQsVq/docUfsBJE4+mzzPfgLvylaMiI7Px
MYXwI62PzPGvZxcPxHtkYdb9t3/cFR2whEvJnyTj9/jj4UPaC5Xm4//uNxMP
tKndzfa9QNxfBtZa1XzZvsgD/Xc/6ThJyT3kicgp4vpf4y/rUiqL9toS15uG
ZQJH7Hn1ZsT1pWCXW7FSn99cQv9dTxJeeazAYlH0EfTf9z/HZnYB594M2xLf
l4AX3p/TtP2VBXH+aCyN3l15sf8Q/u98YfjbFo3ZhqEWxPU/xcGP9w8dmmGK
//v9B9jgaVf+k2Rz4vz+uNAvLMRew5D47IYNH4oxNRwckQjxw6zNUbazDibO
54bOL2Zc7f+eRXz2RymHW8IczfIE50eJJhUhoz35gu9H7vmcwOtSWHB9aIlj
HelwCSZ+PxqdPpDCS9hUhIn7Q4Yf7cW2pRcRf/8cDdtmXaSYlRDvKwlRR6jL
QoNLifOloA2Jb7NeOJcKni867bv3uIVoGXH+18hXb2Pnt9ZSYrylI/08pC7j
UUp8XwZKmWy/Oy2zVPB+0TTnYCUX3zLB+0c1ZD1z1eVlgvGBzr2tyh/w/SIY
P0jaxzDQVLkcE+MLJZJLjETby4nry0F2N0NmRVlWCMYnqnhroWkRUiEYv+jx
et4KWma5YHyj4bqOuXPflhPXn4fW6+4J3TFSgYn5gW73v0y0kqsUzB9UJmf5
Ml++EhPzC60+3btA36qSuL8ihKstdg8erhLMTySVd1Ymf0k1cb/FaH3Dq9Ox
ydWYmN9IjRSh941XRdx/CdJr91VSy6vEN/wj1NRaStCBO0NOra2VxPMoRdHm
qa01z6vwpTRdNxWJMnR4Z0SHY0c18XzK0HqS2J7K/BpsSxoqVlj9BeVa7L8t
nl9NPK8vaPmS++U0+WpsMhojK2vyFdGXxzjMba0mnt9XdPFZ2U1ZqVq8e6GB
ndTlcvSpaItG2Y9a4nlWoJ/29amfmmvxBr0fGWLRFShnk71je0At8Xwrkcex
L82l/rVY7XyiiEhRJYp80H9U8mUt8byr0Lf9q5Oc5tfhOSGHDv9pq0L3Op+d
KYytI55/NcocLznalliHp+X+jh+ZUYOs47oXkel1xPuoQZlmmxzLbtfjYV7y
4MCaWlQR4nUiajaJeD+1SGUyOOWmPgm3SRxB3aZ1yDtyuforSRLxvurQCrn7
DBcLEqatmQhq9apHsWrW23jyZOL9kdAYta7m40kybllpPjhgREI7X75QHzhB
Jt4nCb19Lb0gcJCErXRWKZ7nkxC7+/5Fmbck4v2SkadimE7Av+NUkymo252M
DsS/aDOSJRPvm4xMYu/OZMeRseFppqOjOAXNnTCI2cUlE++fgkLJpy/ETJJx
qVd6UGsEBXnPDHLcso9CjAcK2lYkj4IlKHj7w1s5tquoaB3FudKggkyMDyp6
StuSa59Dxtnxx5saC6iInBjvVFdEJsYLDa3/MnLw5FIKXp21VtzqMA1dSprR
fdaDQoyff8dfTGvQz6TgpK9ia1gtNMQOGvx2l00hxhMdaf1uCDsuScUqHK65
uScdKWSyDcv6KMT4+nd8J3lrOJeCn/VnXqNIMNBd/tLk0alUYrwx0FbGQ1sv
LSqWmRKQbBzFQKW259h8Wyox/hhoh5TmtJu3qfiOvE1tzWomcs5SmJ6fSiXG
IxMF7HGY8/YHFY+rb/phgJloaW29rOIUGjE+WehJQ3LFz0Eq9twuuaDchIU0
6Oj+kq9UYryy0C/SiTFGMxUPGPF0ddtY6Mj+y9t6tWjE+GWjN0N7Zxmk0LDj
qZzzxZfZSHJOytbpXjRiPLORV9i7nzbZVNzk+TBUZwYH2WUw4h9o0IjxzUE3
2i5GyG+gY4v7p/LzojloZiavmr6MTox3DvJ7KCWp3kbD9TFabVpruCjPMbqP
w6UR45+LdoeVPAzaQcf7MmZK5xRxUd/fgXtrV9GJ+dCAHvImf/i30zAubdu4
0bQBpWyRyaveTSfmRwM6tKqhZQaJjrcyc60y2huQjWbg4Y9bGMR8aUSTM3XM
7OQZ+F3Pk1uaXo0oc5bGwI8AOjF/GtGht6uWpe+n4xUTjq9fSTYh6TTPfbNc
6cR8akKKWqbqoil0nCC7k6oe24TcD81ZMG0lg5hfTejE2Nnf9k0MrLRMbixp
bTPyW+V7KsaBScy3ZjRzlKPyaICBn2h1q6mVNP8bX2hyzkkGMf946IPHxECi
BwOLppxMNl7JQ+kbtccP9zCI+chDG/4s3mtrycRF7w5oB7nz0I+37hnPjzOJ
+clDNvPiZP9+YuBrnzfX1uTzULySM2vnawYxX3noz4Gcynt7mFi7dJGdlDgf
5Rd4tM1YzyTmLx/lGtXsu5XAxD9qpH4YGPPR5dBJcS0DFjGf+ehby2xOhBwL
ZzJ+BgRE8FHE0TjmlmwmMb/56IhtM1k2gokv8Pgq5Xw+OpjlyJw9xiTmewti
qdif7hVhYY2emgyxVS3I6NnNO2OdTGL+t6BV189UDi9g4fbhj7q6Hi3IVtI0
JOMMi6gHLUhyW2/u4WMsnDj+nOVf0IJ2qX4PsnVjEfWhBS1ODRfVkWRja4mg
88XireiaXoddyHQ2US/+fZ5QUf+ozsLKsldFRA63ovOmC7Z2u7CI+tGKdinO
ryLTWZih7BCqE9mKTlh/7jcrYhH1pBVJyRk4P6Wx8NOlxiuutbSi6GC9G8GP
2ER9aUN2Jh9aw3awsdGabfl5q9pQVl165bURFlFv2hA/RytT0YSNJbWWHf7j
0YZsVWzUstxZRP1pQ3py2xXHdFj46+7ZbVqFbchH4tSJ1+9ZRD1qQ2ah4h+z
3NnY33DsyhWJdvQ01eRj3w82UZ/a0Z4DJTUTOWysY94hlXO4HdX5dcTtyGMT
9aodjewyml3iwMF/bMjxI5HtiHUr8vq1NRyifrWj6J0Vd85XsfHHs/kbN7a2
ow9tOla94WyinnWgMe2o37UiHOzullruuroD7bixgux1jkPUtw6kSVLDm7U4
eK3vU6sMzw40KuLx4p45h6h3HcjrqsMC46sc3Hvn2uBAYQeq3nc16MQ+DlH/
OtCjrpi7ql85OPXx2Vua0zvRRbOpD/7M4BL1sBON/BV3er2Yi+0jTRXPm/z7
/EDR8p0Ol6iPnUj2glLlCxYHq77Qef0qqhPtWbhH3CGdQ9TLTkS7lfvbpIWD
uW80UHdrJ/qqN3GGl8kh6mcXOkNL68vK4uDwHHmqumYXMlou51fnxyXqaRdq
4xkr1IdzsVnRpKPj5S4UMjYz6XU5h6ivXUjilZhf9HEunl3V8ycJd6H2YlH7
RR0NRL3tQnmXmp4k9XNxDZUe1Dq9G12amxmmqMUl6m834j7K0uY84+KAxiI1
tSPdqMVMI8qwk0vU42605zH53rcMLtbtfJ1jG92NRAy+Tx4b4RL1uRst3tBj
TnNswCLfwg7Et3Ujno/Z3JZ/3/dfve5B+a8W5oVtb8D5f242NWr2IO/qfPvw
4w1E/e5Bk19tx+9OcrGX6AU3lSs9aMbxva8eBzUQ9bwHiUYd9ehBDXjTzGPi
VkU9KDCfWjvUyyXqew862SHL8JZvwN8U90ZFzuhFG+LE1o5JNhL1vheZtFxS
HCxsxOmL16xhHelFQ5u8Z8daNRL1vxf1WRx9pmrQiJ1WzStRiOlFHme5hVIB
jUQ/6EUfDikdXLKzES/bLGph3t6LVu/P6/qAG4n+0Ic8h/qiN/1qxHydwe6Q
NX3oyucHGotfNxL9og/1PPjlG1HViGP3c65RrvShmBmrlTquNxL9ow+JTqkY
D6xpxMePfJGVLe5DvnI/m964NRH9pA+tk+2vN3rahOeeyEg2luxHO/NKdfJb
Gon+0o+kD79WibrShMmno7WDTPuRgmpBrtyCZqLf9KOtOyZtP+s24yCXu7U1
Mf3o/G6t0rP5zUT/6Uf9ca6F7P08fOCqq51URz8acIsp/zTWTPSjATTm25LS
Y92MxW+d+GGwdgCNJIybz1DjEf1pAJ0plrM+9ZSHSx7uux/gNYBWnjB1OO7D
I/rVAMp+I+s15wYPXw/bsKC8eACVTvavSjDkEf1rAP325tj+/Xd8W8KCTDGp
QfSF0xb78Cif6GeDaFx+AVMjm49/pk3X0zUbRCVGKtIqGXyivw2i4Nw+c1lj
Pn6fNczyjx1Eh1zYw2pBfKLfDaKup0plWoYt+GJB0/nijkG0NSRi7oJ1LUT/
G0I8f13S2yV8/KzVQUREaQgFz5x979I4j+iHQ2iya+ruKfP52P2s5YH4HUNo
R8SS+/fW8Yn+OIRMNN77DeXysEm/caiO3RBCKxZMtGfwiH45hBZ37IlMk+fj
tW56TY13/h036C+4vp1P9M8hZBzx2+n6Az6WGd224tqrIZR0UTpIxZRP9NMh
FLc45ZRcMA/3+axzU6kfQu8rtwyf/cEj+usQalgd02zL5+MqkeX5ecP/rtel
YYnZlhai335DBXKf73j/4gvWPzjL+Oqund8TwDemV0gPx9vEI4FvKE1f3RWc
mwC+0Z3M+33GJQ58w9W3x3bIPhwJfIOhXPDUYyISfEN85u29LndiwTfaz8wz
KagKQwLfSGyd5yM7+hQJfKM5MNxp4EwYEvgGitg8uNUiHHwj8DsnwcUyAnzj
qrTT/NYp4UjgG5xfOzz8s8KQwDdkRd/f4cmGI4FvUNVd3sgaRyCBb2hLr6tz
j44B3ygYiS+2XpsAvsENnKv0pycKfKPaau3ev99CkMA3/DUXndeVTwDfOCxa
e3/zriTwDUOX9OgJn0jwjaAS+yDnq+HgG84lS1Q7gsPBN64negQ7VgcjgW/c
k3mlsH7lIyTwjdmu72pWaDxCAt+o8CgZD9//DHxjHuVYpLXqs//5hje/p239
Q/CNz2EHnY6o+4BvtDaYUpPjX4JvhJ5XsikTyQbfKDhZzJUbzgbfiG19bf+A
nAm+8VL8/mYL6XfgG28u8K0PRqWBb0heTczOWfkWfOPg84JBucb34BtT7utP
XD+aAb6hpnZwY01zOvhG19QnUy3ZmeAbZYqFS0PO5IBv+FH3uPntygbfcFD0
SNXjp4Nv+C6oy18o8wZ8I0RZnpIlmQC+oeiydvVt/6z/+QbZ47TZwTzwDU5x
Qv3n6s/gG9V/D5Rwxz+Db6i+2bKw0yoffGP9t/ETKpaF4Bvfq7WWdhcVgm90
vbSvmiVVBL7RefqVhXtuEfiGX+9gwMerReAbvwy3RPR0YfCNPb9L7E8YY/CN
gU3qW1bLF4FvmA2rfrxZXwS+8S3caHFScjH4RsDqxjkTRcXgGzLSoihStQR8
I+4gpTfjfQn4RvuhWSRDixLwje36vp7u10rAN6qiuwe0VpSCb1w3sPkxh1oC
viHil3bu1ZdS8I1ZvmLux26XgW/Y7nlk2fi+DHxDZmlS+vY3ZeAbQ7YiZ0J4
X8A33L6/uzgz6iv4xmh81td5Xl/BNy4OmprNfPMVfOO27pL7t/K/gm/M+IHF
ttV9Bd84OeW2ecmfr+AbiTLmZVrd5eAb2smbz+TRy8E3Qs5n2YSUfwXfMB8V
X1e8oQJ8ozDw18rQFZXgGwxyxTL9sgrwja7qODe90grwDd1DdkHlcpXgG35+
Tk+5ulXgG06laXpPmqvAN3rvGvwkZVWDb1TaRzlEt9WAb1xYtmLW0+Eq8I0t
d+cHNqlUgW8Yy+/xqhytAt/oTFF3fWVVDb5x7rb9nmu+NeAbSfO+qelPqQXf
GPeNWuzpWQO+oS8iucs2oxp8o1ahZKPKplrwjc3Z4gtRUS34xrwv1XFqF2vA
N0QOiHtm5FaDb4zRGeX7w2rAN1y/KGb7HqkD3wiff8HCnVoHvlHfkJqx71Md
+Eb8uRgb5vc68I07EWZpmm714BuLUpYkxTyvB9844lZ4jt9XD75x1+3axh8x
9eAbYzb+czMY9eAbV+6y5s5IrgffmGchs/+eIgl8I+Si7EcNfxL4RoXBI43t
kSTwjZ/eygGWT+rBN+LCSQsGo+vBN3IGr/c87iCBbxQEzQnN0iaBb4iHbhOT
MKkH39hR6u5DkSaBb9TcDPTad5UEvlE+e1hWdowEvrF4OOS66S4y+MbaLXIZ
Rk5k8I2jZfwoXwYJfKN9qGdaYwQJfGNglPWDIUEG30gp8WySW04G32hovJvv
s5YMvnEodIl76jUy+MbPQ2vOGc0ng2/Qzy7b4SBJBt84uupsTX8gGXzjy8Ir
OTv1KeAb3lSRzz4RZPCNnD7RnEglMviG2PEpXql1ZPCNXztPr2xXpoBvlJzt
CO9eQwHfUItpjHlnQgHfkP55ybTmIgV846pl2Q2PCAr4xp21y9slNlLBN8wl
/bz9SqngG60jhnsoa6jgG/wngzM5lyngG8+MRqNW2lLANyzMRIxl/32fwDec
P/7++MWJAr4x7aDJytVeFPANRxw4Z/IrBXxj1txsQ4vtVPCN7SNmR/ICqOAb
35fL5zrdpoJvJFhpOmzOooJvUKV3uJY6UME3AtMcf30xooJvXD63fp+hBxV8
I9uix3jXMAV8g/7JT7FunAK+sUFepDZsnAq+EXs5l6feSQXfaJ4e4R+dQgXf
yNrm49FdRgXfMOg5r5pMp4Jv6Cm464c9oIJviImU6rzVoIFvyKhtbrKKpYFv
hDek3j92hAa+Mf29iovoHxr4xhTdQGvbChr4xnGddq6OAw184xaOOXXoEQ18
I3rLoSFyAw18Q9eRo+urTAffUKEM7qxIooFv7L5wwdlLgQa+8WRdzbk9d2jg
G0rMvKUjRTTwjWf9nTbGJBr4hjX1TYRLNQ18w2D79WO8GBr4hvop7TD/f8cF
vhGxoOhP6w46+Mb+8sOWN87RwTdWXf/x8ekoDXxjSf4BfennNPCNtxZ5ew/r
08E3MmaJdU21oYNvFN+yk3+0jQ6+QVoWGLvmKR1841t6yQO/MTr4RtpQGF/l
Ox18Q6RyXEStiQ6+saL5unNdMR18Q2/W4pUMWQb4xlBy0c9qQwb4xoLZl+WP
bmKAbxTudaZYZ9HBN2bknNh4fTsdfMO/71aJRDIdfMPBx+aY2AwG+MZouYSO
eyQDfOPMQJz9n3EG+MY4f423yisG+EarGou97yYDfCO6N5dRfJUBvlGT3fjw
5QMG+MaOvKMJI7UM8I216y31MwYZ4BvX1meI+fgzwDecy1x9jS8wwDccaKkO
BsYM8A2nCRH5Ik06+Ma8X0s8lR/SwTf0Q9c48asZ4Bs4ZWBSVooJvrHpbO7U
OZgBvmHwLtC714cBvrFtxTvuxkMM8A1LzfcvdzxigG9cPjbQf+oBE3xjxWX7
0Y63TPCNoXBNA54ME3yjYDNNOXMDA3xjsU3ggeByOvjGt78nXPiFDPCN14/y
lj06xgTfWFmDNNMuM8E3BpIqjubqMsE33P1lflRpMcE3Iha7bqUHMcE32uXy
562kMsE3Thbf45tuYIFv/D1tqll0jAW+ETvpqpJ+iQm+cfHt+ZN2iAm+Iaeu
k3k6mQm+Ye+0c9hpBxN8w+3VwV89t5jgG30ZHlnHNVngG2ypaX/XybLANxw+
JgQ7/2KCbyxWTxpu/MQC3zAjs1mvv7LBN6bdmvE09zkHfENxY86ooQQHfKOG
JLYrcx0HfKP8lwn3swgXfGNs6h1/tW4O+MaJZhnP8vNs8I2HtRPblvSw/ucb
pwqCXarY4BsaYep1PiIc8I2B1euDVX6ywDdsXjQ37eGywDeW0HxyyXZs8I2R
9a97fpqywTfEfLKb6k6xwTfc5K/Uhf67X4FvmIqKLft4hg2+8SKDP+NdARt8
w97/S6F/Pgd849F0vfzNz7jgG0y7ewcH3nLBN26NpXdekIsTrI9wrUxTRI98
Auzf8HcbT99XHCtYX+FTe9+kHv4QLVh/YV3yyuyPyyJh/4Za4IdbNoxIwfoN
j1rQLHJbIwXrO3y0g9O7Sj8C9m843T1h+LIxEvZvnDnek1AZEAH7N2ixPtov
pMIF60u8qjfJmhwVJlh/4ou+6a0PQsNh/8YL7uMmndORsH/jbor17QLFGNi/
4VHC79p9JwL2b/w9kvpGf8czwfoYN5mSyu9PPBOsn/H7Mq1hunOYYH2Nxzoj
PPumRsD+jdLK4uqHQbGC9Tn2fNGuLzE3QbB+x7pl9CdRK8IF63u87dVN9xs7
QgTrf6znavciLj9U4APY5dlgxVB8COzfSNS07E88Ewz7N7yrbJcW/ngC+zdu
nFrW0R7yVOATeJazqm35+RCBX+Cl2TaT9ZN+WOAbk57K0f1D0eAbp82mSk4P
ywPfsFJmnBE1KwbfKE7sTL7gWgK+kVQlyv6k9hV84+rS83u3T5aDb5zUpqW9
nVoFvmE6O976a30l+Ebh0L125e3V4Bvqybdrzo7WgW80aAdamlnXg2+Yjepk
Ts6vB9+QvyGxQzm0BnyjRtpmLqe8BnzD/ffAiw/d9eAbpimju6r/kMA3rhpN
41YspYBvJFEKMw/FkMA3qvQHLunsI4FvrErkcOa6kcE31paIqC7hksE3iqZV
nj7hSwbf2PMhQfbQfBL4xsDWzMgPY/XgG/kus99lD5DAN57kmv5cnEMC3xBb
2NLKY5LANzQpjVek7MjgGxdlHFcoXaOAb4QsMv+ePI8KvnG3RTmwYScVfGPl
7W+bVGdSwDemGM+c9YJDAt/Yc+NilQKNBL5xYG3hBQ8DMviGddiTiV15FPAN
+fR992Zdp4Jv0AOo0j3qFPCN0xPsg4avyf/bv+FYvmaXCAV8w5G5e397BQV8
467qkI95DBV8Y8hknBR1nwq+sVO09X30v/WFwDd2nrzwMn8zBXwjLi/EY/wc
BXxju8lU71NfKOAbunqiL3wRFXxj9bRWs/JtVPCN9Fj1ny7HqOAb/NoZoiue
UME3RswsxI5uoYFvDOyritXWoINvGHw0yBkeo4JvDPGehT9TooFvGDfQ7WL/
9XeBb0zdY8SrsWaAbzDTFAJ+rWWAb6iGt11KyaeBb0x808k90kcF37hyTmLq
CjEa+MZb6T8KhzOo4Bt96lfndpfSwTdmad8dln3JAN8QiXy10OwWA3zjlkFA
aDiPAb6BCkcbWkl08I3HitY3h2bRwTdSnRNapTfQwTf89m7LOp9GB9/4fX26
X8ZbOvhGxcCsve+nM8A3GPaJZ31XMcE33v+ySvtAZ4JvuN6rqwyqZIJvuN9I
3XkggwG+kdx3rszj3//HBL6RRPvhWp3G+J9vXK6WvTPKAN/Y67m66c10JviG
89792VlbmeAb6ZpGlhLHmeAbldUzHvBVWOAbVc5NSgwFFvhGq+dJcScZFvjG
djO3KuzBBN84ufElur2TCb7RqH/SMJrFBN9ofOHNcbjNBt/Yz7LnKamxwTe2
7uRNXePPAN8Qp0S9tp/HAt/4c33X2+Q8DvhGc9whFbYOB3xjU/jDaHFjNvjG
u/y95Un5LPCNU9rfoiq12OAbaaVVJ2f3s8A3iv8uMLk/wgLfcPJd65bbwwbf
eG3TXL8jggO+MTcirsRyHxd8Y8muH736vzngG4oP1jjphrLBN1JmajRLXWaD
b+zp/nIkl8kG3+Do6vgrF7PBN1R9029VyHDAN3YuIWsfXNoAvnHAeXhmfEYj
+IbCs+xit5kN4BufmufRdr3ggG+89FPQt8zlgG9oVYdaf/fngm8cn6BsGNFr
AN+4NG0Jn6TcAL6xdZqCztC/5y3wja7lZlvGnrLBN+QSF5nstOCCb4T1/P6s
3csF3+AZJY5weQ3gG2G0iUKbpU3gG14zV/w9V9AIvqFp33t791AD+IbOlE3B
S50awDcCTebZV+c2gG9c1nP1mn+1AXwjfdrg4UeGDeAbOQmJa94HNIBvDEo4
f4h1bgTfeFDlco1r1wi+IUl9z/C81Ai+8WRU9/P2xc3gG8sohm+OyTWDb1R2
ad9kmjSAb2xb5/fo1a8G8I2EZXGy08WawDfE/UYdi/IawTfqti/7cIPaCL4x
LK306eHjZvCNguepATeMm8A3jvss/xBv2Ai+sTq4ksX4d1zgG5/uxtPt+rng
Gw9aeknPPnDBN2JITQ2KUxrBN5Y7XZJStmwC37irZHFdYlYz+MauNa/Mbpo2
gW/cXNs4mUFuAt8wC1Tk3jnOA99YzHQM/sRsBt+Yn0TraKM2gW/Quc+O3jvZ
BL4RmXDPcvWWZvCNcLvupOkLeOAbWjrSXV1JzeAbpm3qB1ddbAbfSFvlxVt4
rxl844LsuMPy8GbwDe/AK/bzPHngG4ppS50ojjzwDRVP0R9pbjzwDbmqjvqz
iTzwDXVLU++Hs3jgG4+Div32nWwG35hUaJK9R2kG33hSMlEXd6cZfCOtknYx
MrkZfONN3NRzrVd44Bv9jwaVu1154BvTO1M3ilg1g2+sDCCF9d3ggW/wHS0M
7Pa3gG94e8e8WzSfD75RyLzZE7qRB77BT3sXtciAB77xrvH4WaOzPPCNvQtz
D7Ra8cA3Hm8Vl/uQxQPfMM1/6DyswQff8E5sr5N5yQPfWFj73TmGxgPfaHn/
eBfm88A30NsAb4NCHvgG7bJkX+dRPvgG+d20Ej0lPviGxU5q6WxzPvjGkZ4b
0ReM+OAbs8wueksm88E3hoOuKjpqt4BvMEUWzJL/ywff2Dcpy9KQagHfOE6b
Rna1awHfmL4Vj97+yQffGJpf5ir6hw++cWrz9kXFi1rAN/z6R0TXL20B35Bx
DRpEmS3gGw85HW4LolvANx75z9NXvtACvpF6UOmg49cW8A3lVYe0/zBawDcq
zjbPObmrBXyDHLT0+SZuC/jGwSBR1TTzVvAN3Q2LzZZatYJv5Nt6UHRetIJv
NARqO5qebgPfUHW31z61tw18o3TZ6lHtwlbwjZNrTlBPuraBb6jWBRQ9vtsO
vjHP3u9gwaZ28I1hEScFr8428I2Yqxx2alAb+MbeqDav0mnt4Bt/E0d3vzrS
Ab5hsru2ePx2x/98o2FjPWdmB/hGuNXEO9+odvCNLT/f7euf1gG+cV4jIEpe
oRN8YzBpoPtlbwf4xlyFqR2/n7SDb1jnJFyqv9MOvnFjkfrnqsPt4Bv2pzeu
Itu2g29o5Fd/ovxpA9+ov171cOVIG/jGhpZ95s5e7eAbd3/fFp9a2w6+oTIc
4fDsdAf4xkzTxuyBknbwjTnFlRsML7aBb8zJ87X7I9UOvnEvgn7Sz6EDfOOT
VZiTzPMO8I3Hl9e0X5vXgYX5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWY
TxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhP
EeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R
5lOE+RRhPkWYTxHmU4T5FGE+5f8nn/J/UX8DHA==
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
            "]]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      ImageSize->{89.57983193276962, Automatic},
      LabelStyle->Directive[
        GrayLevel[0], Bold, Medium],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.13858506964671988`, 
       1.0639756959973978`}, {-0.7214453714562246, 0.039552376815216506`}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";", " ", 
    RowBox[{"pA800Data", " ", "=", " ", 
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJzt22k8lF/YB3ClKKXSooRky65Vm+qilELJkrKmRCqSnSzJkgghRIrsZsYy
Y9+PvZQWtIhk37JX6q9FT8/HnPO8f15Pb/rMJ5n7Pve5rmO+fpfweRtt8/ls
bGy6HGxs//v3XcPRZonyKqQl0+JROHAPrT3KS6NKV6HKpzHuJ7niUdwOJR+5
6Er0N1M86NKXOLRJ+LIhfWElkvUME4u2j0ZG/JIXLQYq0P5N52d0LsQgq29u
a62qypHQ9Xza34X3kduLV09sH5Yh+6Ha7NsZYehOqqiLs3Mp+k+h69K2tij0
4IazpId2CTqiG79XPykaUc88b/WWK0a/OL5WuQVFouKtQgG3FxWhkkyVu04p
UaiBy35PSG8BGpXw1728+x5q7a0fvleRj7KWyKyS4wtHQ2XrH8TE5KF7G18o
11reQ/9FXlWLd8hFmo6pRhbtYYjTpvpnsmYOeuU7u192OpR5vwwk4rohee3z
IOb90dHn4OFTB/YFMe8nE9WM1KzaPH6Xef009HjWYYu/qR/zeiko8L/FadLT
zszrS0UvzRTPcH52ZV5PMip+KZ/XqeTGfP9ENLW27lkatxXz/R4jKs+PF4c5
XJjfPxY1+P9w9hZ3Z36/KFTt0J7/c7M18/+Ho7v7bWwLHMyYX38HgbKQ/qZO
PZj7d28kOF/V2mCROvPr7dBUmddSqYfmwMb8c5Zd8cUxLrwedvBspfHnFK98
5mtvmN7jZOK+rwJ/f0hdrrIvxakcvz/oFK179VqzHF8ffFsh/WRSrgxfP1RZ
LjoaoFaG7w9MRje3KqqX4fuHi7nne/hnSvD6wHtuPs7ULaV4/WD7hicrPwpX
4PWF1QFlPcnT5Xj9wanB5dPmxFL8fGCiQKv80o4S/PzAdzbyY3hCKX6+sFF3
6qPFAH7/HNjx4D95od+leH/AllB9MZ0vxXj/AJXHqCqkoBjvL5BJF1fbASV4
/4Hj1trnXvdK8f6EFlUnftlfJXj/wqK37vpCPUV4f8PHKAmf1UlFeP/D1wbF
qwtFinF9QI3ZyGrz1kJcP5CpVH8jYlkRri84N9LuKfSmCNcf3Lq0dbQnoBDX
J2gLuli61Obj+gXb5U9BVLkQMesbjqZkbtfsLmTefzVsX5vg9tglH93wjhYR
6amGIzfbIzMO5jHXowa21D7j3S2Qj65RVOwEOGuBy9PMxCAnn7k+tTD5eucs
f0s+Mn09WcUrWwfsAQfXR1zOY65XHVytMB+JystDWj8e8vBo1cPrIQWu+w15
zPWrhy0GQDV0zkXKG46dW+L0BLYrekh6d+Yx1/MpnCsX2NfEn4e2HZ6mL4x9
CtUrenO7L+Uw17cBUi8VvHPUz0MiVglsbJUNcN10Q+6hgjzmej+DrRp7Za78
yEEr7x0/+bPvGTSxd29M9M5lrv9z0N/Z0RtxKBexl8zEf1vcCN8rcjt6RHKY
z6MRdqfOs/P1Y6CvXSkT4/IvQExxg1vPHwbz+byAZ7tMWx+V56A+Tm0Y1nkJ
xS+DK85vzGE+r5ewJCyNM7Wejt7Iz4b0urwC1zsPtNqTGczn9xqKRftzvX4w
UI/0qYnxE68h6pal71MDBvN5vga3oGv8eu8YyPCAzFqr7tdgrLneePtsNvP5
NoHVrjr2fRpZqEVrHgzbN0GkwDO97ON05vNugoF3XEJKFDpSN39vYcHRDK8u
VBlN2WQxn38zHAxfdn90XTaqcckM6Y1uBp3HRXvCkunM/dAM7imcy0UsspFi
kE+BqUwLrAiWnY21yWDujxawYVvwn7cQFeXF63/qKG+BnMrZxfqCFOZ+eQOV
6yW+JwZSkWzuZg7Dk28gkBL8nmpDY+6fN6Bb0bzMMpaGkusXyrf2vIH5Cm9f
t8dQmPvpLVzg5G40TKMigbb2U6cc30LXxL15HpspzP31FiQOcZvZ7UpHkWMM
j2bOdzCs7STWpk5h7rd3YPVU3b1gPA1xz7udovngHZwwah03k6Ew9987KAi5
9Eaqk4L8Vpu8aJR9D9ofWmakNVOZ+/E9VES3pMZUJKM/Ejumj6H34DC68Vf4
niTm/mwFu7iNx2O3JSJHRS7BJ1qtYM718tDKxkTmfm2F2Zc7ssMKE9H4iS4V
lb5/rwd9ja+8TGLu3w/QO6zyVvXbY2RxvsCqyukDfNR3/9EV/ZC5nz9AXWfB
quBFj9Anx6CIA4vbQPQPZYRzTQxzf7fB9adcG0PkHiG9gPNlpbFtoLhuXazE
mjjmfm8Dxs7vwju57qNXD3f37ZZvB32Blfq96ZHM/d8OBxpOVB3e+QCp0pct
Lahsh0PfHS/v5Yln1sNHaLGaDuxJiEWopm/7dp2PMH+xw5VVVdHM+vgIwsL/
bShlRKFd70sM6f0fQeep5N2Oc+HMeukAaWGDLnYjf5T9OdRHzqUDWp7RqSn8
vsz66YCoUy6xGw/6I8lZCxqV6xPQHi2gp6gEMuvpE6S/Xun8VdgHPebZ3yLx
6BOc9ckaXfLcm1lfn6AtqdhqdsoHrRNf9St5cydQvvlwxMYEMuutE/wolI9v
X/ih0N3DIiLVnXC9OHnsp5U9s/66oF7qRZXofT20IPVsiqZ0F+TNk/PU+eDC
rMcu2CA45BtqHYoqs9X2hNh3gcS6NUk3nEOY9dkF4QM/ZqaTfZBHscKLxrIu
uNDN+ePsaBCzXruAYnrBqqIkDO2p2XhuCUc3TEiINixnt2PWbzd4W55SG3uk
gaYbl0wf0+wGnSNahplqZ5j13A0Vq2t5SycuAuPd99u3o7vBpaJLqnqvJczV
dzfcX2d58Ku7GbLu6hZ40t0NB8VPmOsqX2fWew/wLf4aUPjLFUl9bqQvlOmB
ipilmqJW7sz674EELfGFafY+qP9roYqKQw8kMWjr9y3xYPaDHtgbeWjp91O2
KOFPYqt3eQ98FgxLXF9oy+wPPSAvJ37bOtQDGXOGWFVx9ELZ2qnIjVu1mf2i
F/oaHRQ5v9+E9TyubGwneyEyY/k78a0mMNc/eqFSc8n1ieOa8G79hYgDMb1g
udIlsvGlJcz1k174eoirar/GOQgX05T06OkF9iObJR6vNmL2lz5ADrF7v0Z5
oBPye8tKZfqAM+b7UC3fTWa/6YOot/xXk/o9ENdu8ZM/HfpA1t9W1dXYm9l/
+uDl8LiY+zVtqFde0be7og++j394/PCaO8z1oz7Y6PjjNXXreeSt/svZmbMf
ln5RTBi2t2f2p34w+nnSv8fSHh04NbCk4GQ/bG2vf2h22Z7Zr/qhwzlkKNnO
DP00aYr/FtMPtRzqT4K9dWCuf/VDY1Cw3XJ2Zyi0LNu+vbcfdvJ+07P4YQ9z
/WwAfJ55+MX2XAF7u7QntrIDkLpm/4ijmzXM9bcBoMdxTbMZnoPN7uGGdMcB
8GrUCTwgcwbm+t0ALL5SK1O6RAmN+HlMjFf8ey37wZrzkhGz/w3AdADjJVeX
B0q7a+kjt2gQiudZdB8O92H2w0G4XvkO9ly5i8xidNZaaQ0CP3/p8aAJV2Z/
HAT5ekbEdmFHEEo6QKM+GIQej+b4FReOwFy/HATeqKddEhb6qD1DCoZ7ByGq
+e+v/K8XYa5/DsEuPW3bNxuuwf2C1S0SckNw2lBgVvnEWWY/HYJli1dFrjc+
C7qVfy0snIYgfcQubLTWCub66xAUX9iqvS5dBVY8+/wzGQ2BZnHAWu1AK2a/
HQL+PbB36hlAY8vbkN5Fw+B4pfrXRZdjMNd/h8FW8NjXvLUGcLujUkREexiW
CMsWiUbbwlw/HoblEptiedzVkMogrcA0dhhOuNZedLixH+b68zB8f7QzLm7S
HtimotTi+4bhS3jChKa1Fcz1689QwW1i+cHXBZX9vPmpQ+4zfMrXHOQvU2b2
789gZLH/8ttvQeCywNpOwPkzbPj1TU5y2hfm+vlnEBTY0KMq5AM7lp3hMKz8
DHqt3rvapG/CXH//DALBwc+jDW7C1NpDD2IWj8BjR/VrwZymMNfvR2BeDKWt
yO8ayhSWl2/VHoHRZYcEjrvYw1z/H4GE8So5xeeBcEmGr5r34QiM917dY6Ny
HubOgxFQFYq61TXjDOIKC/RO9Y/A1wcjhR46ETB3PoxCXrdv43HLe9B9YGL4
nvwoqHPr9rgohsDceTEKIWAap/HAAR4dbfNodh6FZHRorLHSgHl+jIIVr+9+
pb12oK9dx8NTNQp/0i+vSPBQgLnzZBQOCwzLb3GyRmuM6CmaXGPAWBXo2SFz
FebOlzGwlksbP340BJrMY/eE6IxBYbV3ytboIJg7b8b+/bz1QeyC9UUUYnPr
RePDMdghqLnIY6E28/wZAy1j7zBncztQc7U9t2RgDDzaasviJs/B3Hk0Dt/L
Y7i2RPgDh4/R9LHN4/Bg7PONSxV+MHc+jYOpPI/OxQtGUB2kGnDbZRwqlNar
bX8VCnPn1Tj8tt2WqdEQCp5R2wSfVI2DSegC44+1QTB3fo2DB0NB1OZ6BOx9
LMhYuGQCchuUKS6O/jB3nk2AvLRw22o/U/hOWXRYRXcCOByfXJ38e5t5vk2A
6DOLicySOygn92ur96MJKOn0vJkS/JB53k1A5KVtqwL04tDV8k9WVQMTYDd7
7Gjn5B3m+TcJHruV1nG634bI3gtsbOsmYedA/7FEozswdx5OwoTZkuLZPB+w
tzRQi983CT/56zXfPomGufNxEr6Mlo2UvEkCrTHNiAPnJsHY84PUo29pMHde
TsKjvW8v6c8Phc12hz91+E2C864WTd3jGszzcxIWGyu8MVAOAe4feyU9qJPA
OGczPNB3D+bO00kAj1tHzqtHwajbFjuBV5MwhjTDAwVvw9z5Ogkmf7642T68
Ac/YNpWVfp0EiZvyP1ey34a583YKPvP1JG00jgDsG9bj/ULcZTGAfWOLkuG1
5qhAwL7xZfb7uwqjQMC+Uehx1GzKKQywb7T01Azb/fscjH2DI0e6TEYuCLBv
vF7d8PYHNQqwb3x9ak5dp3MPsG8os0X11Ty/A9g3OPncV4aFBgP2jdbG6/WT
FuGAfeNP621/walYwL7R6ljT+zz/MWDfYAjtLFpdHQPYNxo0DP4+jokA7Bue
+8v/+xoTCdg3Qhwr1gTrRQH2jQ0xef+FdscC9g2e7vZtjvb3AfuGYpPGaUnp
+4B9Y8/idXrSbfGAfSPnjjB7d2E8YN8Iq7P0a7eOA+wbha2ng+6JJQL2jfcO
r3aPLIgF7BvcH9idO9dEA/YNfcdDElo7HgP2jWPlboO7eeMB+4bfPIZha2Qi
8Q3d6VVuPZ0JgH2jxTFTDw7EEt9wjas3XqhnQXzDKsbeuZWRRnxjoWZ/Dw+V
QXyD6qX6bP7LHOIbZ3bVBebdZBDf2M4nkr2EO534xuSV6PAu5XTiG57fJaEp
PYv4xr0XN5Tq/q0r9o0T5k/2iUnRiG94C9pLaMnTiW9kiabJZ++hE9+45v3w
hhsHnfhGncDORez3Molv5B4rEZZXyyK+IfVzUZZVNJ34RvfRreI7r6QT3zAv
beysqE8kvsEb3KTAU5xKfOPL0IP90eEU4htvvBbJiP7KIr5hSV/qQfn3/tg3
Li/kDB9QTSe+URj3eqV9OJX4Rv3Z4/X2bTTiG24DLV/XLqEQ3yg5E75f4RqF
+Eb5+qVHUUc68Q2KXDlF/0QK8Y2o6QW7d84mEd/4NDCz4+JGKvENUI9ZJ3Aw
g/hGRont5VU5ScQ34u666W7Jf0R8I0PmQckz4yTiGwW1SmnGA2nEN87vk1xf
4ZJCfOPv1mXLxfQfEd+oCtPSkOKIJ77hKWRRtX38MfENefvmF8VH44hvVF9Z
yrfxYjLxDf3Lp+LzVyUS35C81H/jocgj4hu36CEmu08kEN8wXrPkpaVFPPGN
MtWZu9dk44hvvA44pXz9zmPiG9VBimMK2o+Jb8wkj46EN8YQ3yhJ/Ot/lSOK
+EbkH8FKk2v3iW9UHvmmeOxQDPGNFfss+N5xxxDf8Eg8L35jTwTxDe4+y0C7
rRHENwSCJaMNpCKIb3xryLD72htOfCP2vY3vFtsI4hvD+80rGJkexDfM96U1
z6x2Jr5xQ7WwvSUlnPjGb3rBK6WwQOIbgv6N/72psyS+EW+08mVe6k3iG2qa
744fHYgivvHL2fXVaEg48Q3ZnqZJedkbxDfuSr6IVui2Ib5Rf+RH1fEzdsQ3
DsiPSZyRDyS+IXXe5sr0c3/iG8YrRrsT5FyJb6h3Zr0P8ztJfOPMi4nNq7Lc
iW8kHfSqfjZ8nfjGkGjIrOJ5C+IbAkcFfwQsNSK+IabwJkR2/SnAvhEI1X+b
ZE8T31BVWqZU1nQBsG/o0+bVKnvYAfaNtLKi1W9oxoB94wubSMXlJlfAvsEV
17J343k/wL6h8V7wudJCX8C+wZatdvfPfm/AvtG7ord1PrcB8Y1pwa5TtAVB
gH3jvd7DZfmyKYB9g1akbs7eHwXYN9YF7TsoIhgK2Df2RkTMNobfB+wbdy65
X/EPjADsGwMvrH/X2McC9o2cbJ7qEtVowL5xyOTC4i8uIYB9Y/E2jSw/w2DA
vsGXdL33/J37gH1jtvfPe+QZDdg3OnXbt522jQTsG7EqUyuMmmMA+wZ7z6cD
yb3JgH1DcN3UgZrkVMC+0RMdZjJTnAzYN9z5p0Ilm1MA+8YBu5dt8f7pgH3D
vmHtFk7fVMC+sdPrtGJvdTpg31iulXiUxzQTsG8cU02gXvBNB+wb250EDKwu
pgL2DaFWyyOrDGiAfeOQYp5++t90wL6xPn4n9wvhRMC+8fS6iEegRQJg39gv
tDTTtikVsG+s1D/IJ5lGAewbtReSeI1EkwH7xlozj/fXpaiAfaOcesN+oXo2
YN8QvZSzeNuFbMC+wVkboxjIySC+8dNoG8NHh0F8Y1tvk5THoQzAvlHtk1rb
2J4K2DeKL8Zw7+JNBuwb6bkrr5ZVpAD2DTFFdhM16zTAvqF2kW/C7TAFsG9w
fzIpO7yOCtg32B1Xeub4UAH7xrV9MhdW/80C7BtD5nUWsa05gH2jbo3ISkNa
DvENqiNfm3FgJvGNCGXDO6XHaMQ33DOv/RriyiK+Yd1jfIcen0V849W1mmgB
sQzAvnGfP3lhRwEVsG98MGQzu3kgA7BvbNp864v9GBWwb2yjyn262JIO2DeW
Jo5JyYRlEt9Q8irkmJiXSXzDfXH9y0+taYB9wzbqW3TG73TAvuEz2KfxYz0N
sG/s5AvlFU+mAvYNHzO9zss2mYB947HqhXQ3rSziG8Gu1GgZfgbxjYFF25Vt
PenEN0x/su08/yeL+MZzF8M3P+LoxDfC6aUF036ZxDf0DAQaco5nEN9gMxGL
EvudAdg3TKKCBxuNswD7xhUBQfVCgzTAvpGzPrFq8SQFsG+khwUMLaHkAPaN
jfHvP4QxGIB9Y0Hz+MUXYtnENyi7yyRjfLKIb1zecNxP5l4mYN946LUnLqw3
i/gGX/SkveRLOvGNZya+bzts6YB9Q2LMWiT3F4P4xlFHdf1GJzrxDZ6puubr
e2jEN4T+ozGEQymAfSP7pIWz5OJM4htseXsTBF1oxDeefFGxPhtHI77RU6MX
t24qm/iGudo3i60+mYB9o/mawe/o0WziG647pLVpQ3TiGzMzH87zeNGIb4iW
yja0a1IA+8a8r+EmN2zzAPvG3YyBIq35xcQ3wloqRUz+1Qv2DdoWDb7DfHTi
Gzox80ciVjKIb5x4dEshSiOH+Eat8YPLEtuyiG+YLslhO5FHAewbob/S0/O7
MohvNIU+dQFpOvENZ+eQWP/+TOIbWb5+bOdOMohv6C51OFf5LIf4hkLCQs4W
VzrxjQXnJjN4jzGIb1g95G8pc8klvqFWdFu7zS0XsG/8XrWjN302h/gGTenv
/sf7solvfHy33DNJkw7YN056NU672eYQ35hRT3g7rZBPfKO41r/TOKqA+MZ8
w/4hk3/1hn2DDh0+esU0wL6Rn+AztsEik/jGad2bTQKXMohvKJtJym7/lkN8
46ehTa3TTA7xjRDbUw6wm0F848VkfxKvVSHxDY4mT3a+tALiG3unYr95MgqJ
b6wVnVm4NLyY+IZVVFJEuU0R8Y2KQte7nv0M4hufOxjV6a3pgH1DPXjGhHN1
JmDfmDGpW3dzIQ2wbxiFuFJsZLIA+4aOhq1uZQkVsG+k8/dlpZzOJb5RcEwI
aesUEd/gtn+/sFEkj/jGrqlHqH0mj/iGcZXtPCe2EuIbq9puiWh7lhPfGJM5
3qR3JZf4RrHrqrjOXQzAvvH9tuWlz6sLiW94TVyjpYmU/J9vjIhWHDxdRHzj
ntcyT8b2POIbdzZcPJlonk98Q9Zyu9G5slziGzLxh009zQuJb6jw9HKcPU8n
+Q0LjTNB81tzSH7jU8HU48baHJLf8Pu0/srt+3SS37h+d1h/nTCd5DcSN1U+
UOPJIvmNNjvKgwXzM0l+Y29wwNlOZTrJb5x+U7tdLSqb5DcUucM5Hk9mkPzG
ptXeX8Zbs0l+Q+GZeJD7v8+r2DdqlJzd3C8ySH5j57pvJwbF6CS/kR+r83Gn
ZAbJb9wVNd67qZpG8htnnMeNmkMpJL/hu0ozbXBZBslvXB7QFG2m00h+Y3yw
q+b04VSS30DeL9+c/ZxC8huNcfGn7fRSSX7DmbcyW5wzleQ3CtzofkdTU0h+
461n/3JO3ySS33B9eUP/5Ookkt+Y7J31ONmWRPIbp+tHlHNnEkh+w5Zb6Hu/
RAL2CWQh53lCvCiR5DfuHwlepfA+EmHfmNhWPt58LJ74xsczbDFnJRHxDbtw
dmv7i3XEN7Q0N75PWl5LfIMiUBDwPaSW+AYl8Fx7pnQ98Y264+dFefbWE99A
Wea3ORNqiW8sqDwYTr1dQ3zDZ8fgDyOLWuIbDne5b+Ry1RPfgB+W6i9a64hv
wG3qhi9xNcQ3yjer/Ep/VU18Y62VhC7nv+vFvrH0/ajflge1xDf+qGakaHXX
Ed84dc7CKkmpjviGedagvdqiWuIbE2MVe0PaaohvKPPMn1f0pob4Rgn/9jLl
qBriG1mrfuWJv64mviFnY1/hPFtFfGO+Xbq7pUw18Q2xy9/XxkdWEd/wop7b
4p9TRXwjp681I/thNfGN9Ruqb2rsrCa+Mdrp1Pa5tpL4RlFkgN3i4kriG67a
/nJPX1cS3whIX5DAH1RJfEN7ucYdjn+vsW8c3iNmWadSSXyjOGbTsJ8tIr7x
rirDedShkvhGbbVptA2qJL6xO6i9qqmlkvjGlOlHPq6QSuIbEWu5um8bIeIb
/koOKg53EPGNiLqQ9CdyiPiG4pNGVYE75cQ3fMtXosF/fQj7xss/RjFODZXE
N+yOOG0rMasgvlF2cK2wP6ogvqGVKtC0zKSC+Ea2rhVbQnM58Q1kxn7QOqCc
+Ebv9x1HMoUqiG/0G9ecuySNiG9cW1b9XfNPOfENF9fvh0c9y4hvjHc8YDPY
X0F8Q06ssoraV0F8I6dNXDbidznxjeWidWtMQyuIb3j82q58RrSC+EZazQOL
0bYy4hvHLqYWDE+VEt/Ier9B7AxbBfGNKLZfedWUcuIb9CMaf9b0lRHfaMr4
dTb0binxDU9VqXaL6hLiG+NXhZZ/cC8hviF9f7+668Zi4htHNDrl3vwoJL7x
n4PU1HuVQuIbh8uFpGWdiohvnPiTOxm8qIT4hq+rU0Dd6WLiGyFcy2Kufywi
vlEwcuVUl1ch8Y1Fzet8TH0LiW887Yj5ndZeRHwD+PzlhQ4VkfyGps6HVPrL
IuIbJWyXCwr9Skh+g/PbKt6/ToUkv0F32/TjqEI+yW/4LGVPo7zLI/mNHSvd
dDs/5ZH8xom6rcYlGvkkv9EhtuGc1t88kt8oMRTW3mWRS3wjcYxNqcMhj+Q3
9M8sZX/eU0TyG9wm8mb++/NIfuO+8IVbjWF0kt9QD6BqXnfLI/kNr01X0hXk
8kh+oyWEd8XS8zkkv8F3ndvYdIBO8hsXJ1uElT/TSX7j/M0FI9w7ckl+Y/NZ
/dmG3FyS3/DyKKbt8coh+Y2G/m1G2/PpJL+RcDnh/hL1bJLfOD7jt7blKJ3k
N2oqxLjU9ekkv/G2e9M7Xzk6yW9I5bvm7b/OIPmNo2MyzzWWMkh+Q3iJzabg
4WyS3+CRats9Zcwg+Y0c8S/mNnr5JL+xcJlbY1o+g+Q3wpP91tAO0kh+o4Tq
5+1Xk0HyG3Q32PNHIZvkNwRMljdkqTJIfuOqj56EuBad5DcOLV5w6vu/19g3
esTMuDKW5ZH8RkGPjzL3RA7Jb6yUq284QM0i+Y15MsNXf66lk/xGbUWuzVUH
OslvOC80XC3Ik42wb4gnSgpmx2cj7BsqAxvC+XOzSH6Dl/tnh7BVJslvsEnz
TopFUkl+g7ftrXLdhwyS3/g1pTYZco9O8hsfpHqui6vQSX7DsMYGaqyzSH7D
s6xgk+tUFslvdBxa33t/ay7Jb6SMO1wRu5xL8hv8dQG3cgwzEPaN7utF7upp
NIR9Y81g4HINTSrCviFPq7JcPoXzYL0wFbOvRdIpA2Hf2Gy+M9aiP5PkN8zc
xT9rLGOQ/Ib8m/IRhnkOyW8cCee4eHU7g+Q3+nZ+VVo5j0HyG9a5cRdFL2cg
7Bs3F9z89KQ/BWHfEP6vT3K1EJXkN76FH5qX9iGT5Df4NxWPb57OJvkN9tdV
f8o9s0l+w2ubpTvqyCb5DYX7E8+1+TIR9o3Buwzde44ZCPuG8lLK6KK/NIR9
Y4WyVt2ymzSEfaPrhOaIV0gmwr5RZrQ+OtKAhrBvBAs6d80+oyLsG2duett4
u2eS/EZIhEK2/Eo6yW8MejbMFjdnkfzG02Bp/aiPDJLfeKJ8Y3ebTwnJb/jM
v2vmM5FH8huuptXeXh8pCPtGSXJ5ksvrTIR9ozFNnz1EKpvkN47eKv60vp+G
sG+kPAh6HhuRibBvpCg79mtaMUh+o1O37vgzNgbCviEYbLnxl24mwr4xar5j
xd4IKsK+obb50bcrwpkkv/FcxyPnd0AGwr6R/NjonEEGFWHfmDRdsaHvNwVh
34grVacvv0ND2Ddi3V585TmdRfIbEyal0rFO2Qj7hlNV/W/5txkI+8bDJ/0X
Ln5JQ9g3Ig6oiK60zSb5jQ9bt7y0Kcoj+Y0Z7dMmAnUMhH0jQspfXvIjFWHf
UNMJUB5ITEXYN9zqD5WU3aUg7BvLHY4s7BqhIewbPBOhZQpbMxD2jce2RrvK
3maS/MbbXdHnEufj3z+OgLY03aB7PBFh3/jvgWnezEMawr4RfNO881hiBsK+
kevxm4v9YALCvnGtaqkPnTcWYd+4UFowdM0hCWHfuB6hCfb9dIR9Q/Xdl+Iu
rTyS35AP82k3LaQj7BuLo8qLKQNZCPtGguWsF4dEDslv8Hb2ClaE0BH2jT3z
JnJrVWkI+wav5InRxK4shH1jz5HKAr94OslveG89r5v1IYPkN85yiS6uakxH
2Dc4i4dmFslQEfaNW4PsOic2UBH2DUnl4adFq2gI+wb/UNkegVN0hH3j42PG
n5lFWQj7xootz/X7fTMQ9g2RFwYdql748/I40CPKhtIpWQj7BpuYzuWz4TkI
+wZ/yntluQ46wr6h0MjlcTIjh+Q35F31ZLJd8kl+Q19I5Pi9hlKS35j5dcrk
t1IFyW/Ui6v/vq+fR/IbPPzpTaq2VIR9Q+p1iqy0OwNh3xDZIZW97koWwr7h
VO+4uUcmAWHfoGu16I1mRSPsG5+u5ve0bIpC2DcOCNbt1n2TirBv3K/XnlhN
YZD8hqVZgaXE4myEfSP9QPHOHVvweToJoF+lIGpGRdg35IWncx6dyUDYNzor
hjautmMg7Bu1dzUV9/z7XI59w0qMIvDRmvx+lzWfwppPYc2nsOZTWPMprPkU
1nwKaz6FNZ/Cmk9hzaew5lNY8yms+RTWfAprPoU1n8KaT2HNp7DmU1jzKaz5
FNZ8Cms+hTWfwppPYc2nsOZTWPMprPkU1nwKaz6FNZ/Cmk9hzaew5lNY8yms
+RTWfAprPoU1n8KaT2HNp7DmU1jzKaz5FNZ8Cms+hTWfwppP+X/Np/wP82+z
+Q==
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
           LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
            "]]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[
        GrayLevel[0], Bold, Medium],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.13858506964671988`, 
       1.0639756959973978`}, {-0.17364706256613097`, 0.11520875304163551`}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pL200Data", " ", "=", " ", 
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJzt2Pk/1NsfB/AJ8S3XGkV0i66km/ZV5dSVJVfJlsoaSbZIyVX27BVZEyr7
zBCZmEHkDDOMmWRpuVLiauV2o41yU33v99HnvO/f8H08xg88PD7zOZ/zeZ9z
nvN6vLXc/K09JGg0muY/v/73d791Qe6zLa3YubouY12fNfpr3Tftk8l8LHx3
1Ha+gg0O13AqUxjk4WXzY+g23T5YkdawsmQ5D1doyAa4+wTigmdq9QaRLbh3
Su5pVLAvXi08sbW7uxm3P5V4WqO8HbdW3BN4aDVjLdkFwQlmLsg+bZXl56Nc
7LV1IvOjxEHU83pBhVYsxnX+W37q43mgD5z+BotFTVh0PKNp++QRNCcyWxQs
aMRLXqnQVzkEok07bPsKDzdgJWl68qjAEzkrKw7fnnEDL4w/09s7q7Mp+tGt
iU9ldVi773nDcIgrLimOn/6TRS22GDKWyPvkhYV+RiqWr9k4dOZTxyOBx/D3
963B/jOO+7zQDqberxprXlkYG1zhTb0PC3uEZgXGCRyo+VfhfumTWfZ+x6n5
VuKDnwz++GWlPzW/cuyuvkz3Sewu9H0+DIzTt4xusd2Ovj+/BNdaCCSfzfVC
359XhHOwTRmbf5QaPx/7dowLR4NdqPFysdafy4z8zJyo+WfimAUqKbT4w/j7
589jXptK24zn5HosDotsjhjx2EP9H4TnW+QEndM/imnUj/PnMNebzxLJdZRo
49Hhb5tD7kdOpvM8+EFFZHy0fXyRhq0pnTwflczT1vH7ysDU/NBE9M4Co9dM
6vP5qN/hVr2OWTlVzyK0JSDlYpBuBXV/CTrmPHdljkslpuqDjLvS3iWWVFLj
lSPR28asev41TNUXmS5kZHXMY1HjV6Hpdl/a1r9jkfVBM+P7DC5zWWT9kHFa
RovVahZZX/TtyeL8LiUWWX9kZv9gBOWzyP5ACtx16arC69R86pDvhtC+hYJq
TO0vxCkdLrtUX03NrwFNT1LghepXY2p/opdxj39fblpNzbcJve1Ay7c0VGNq
f6M9ZS1LPzZWU/PnImMV7PsmopqcD1S7R7mAVV1Nzg9qd5SsfZRUQ84XkmpA
t/llbHL+kNEh613zUznkfCL/rcKBvb0c6n35aNTuZ/cwfw6mzjeaNaz6LuAN
m3r/ViR1o/VmwCQbr098frY+rw01TPlZq/wz3vd6CFBA7JHMsc21WIWrF578
WYDo+7Y9uBtRS9WnHR3Y4Funq1+L30z4+bvvF6LoU523K+I4VL1EKOqBqbzl
PA6+rX/ddUO9CLF2LBcFWHCo+t1Cekmd2D2Fg5kHJ6zk1DqQ7M49VwM3c6h6
dqAHiZdW1oeycVyugdGTE7dRr/64nE53DVXfTrQ2X1cnuqgGu90JX1N7vxMd
krvTxVZhU/XuQjlnFx1w+YONr8QMKZvM7UbB0wLwWDyHqn83kjrUs+kqi4Pl
80+fqRJ2o9MyL+5d8OJQ69GDokVzbdfrc3Bog46URkgP2tSplbNrL4danx70
ZdBz5tIuDv7zd0Fo7OI7iPdzY0XzJIdarzuIG1H6RL2Bg/e98xof672DLqZb
ei0s51DrdxfNVdp13fo9BwvkfjiyP/4uoglkO+Yo1lLreRepdCtHXh6C9cMx
s1bUjTOKwOcnp2z8JmMLEPF50ClQbbZ/ASI+y/WsqclkFSPi80sp84xBCQYi
Pp9RvtUSPE5HxOcZ4dnT5/BKwGdfEV/Dn14MPqMfj1aIwkvB5/iUYlWdXib4
vFx7rN4+qBx8rvsSIFzqygSfG/M4A3bZpYj4vCv7rcd7ZToiPtePXaJlHGAi
4vO+1NEV6UlMRHz2ST573G0rExGfFQ+6bz31oRwRnw2NZns8XFsFPqdvsnBL
28YCn3sSotyl+q+Bzw6rWfo0URn4/Ivhl1eM+wzweXTEF08YXgWfTWOVIptO
VoHPvYlHV7Vps8Dnc62at56uuYaIz9599t2cPWWI+DyYRosJzC5BxOeAinp+
0qN8RHz+4bHnBdXuLER83tkbSdcsTiDX0UN/xwamlSe5H2XZNNhXqhwHn2Ml
pr1k/hoHPq+LHmY2fkkCnx9FFDTNzo4Fnz8++Om5cfUp8Lk9S0pqb0cg+JyT
qBIer+gKPp8/25YSLgPfb0glzkVewiSM1BcpKkqpBVm4kvqjYcdJvcTcaPC5
37BKnolTweeWc/zVHcpZ4LNAg2YVsS4bfD55vvl6o2bGvz47+jpvrI0Cn+/3
bL7lst+e7C9k/HqOy8fnbmT/oXXn7LSvFEaAzyLGqZ5OySzwuaMvrDD3Zh74
zMmflCzQzwWfTTbH60s6ZYPPZts2dcqUZ4LPYwaMaWtrUsFnD/lVM5/kpYDP
ew+OG781zASfq04f8sf4Cvg8I+rAq33SxeDzkLviJTVaKfis7jlQnFdQCj53
1Ct059qVgM91vyhvOdxXCD73ray5pNabDz6bNvnGPNa/Aj4rhDNdPOflgc8X
bzH0pXIugM+bq+x0DBlp4DNyDNJ6t/Yc+OyTsuOP5Oex4DNbdsLL6nAE+Gxm
sjvRO/ME+Dw2umbIdmMA+Gx6O8RM6UMA+HyfoT//9VAI+LzE9ui+WFYo+Dwa
drZu7PR+8PnZZe+0xXHhiPh8xiSlrjA0CRGf/7yeNStOPQERn+nbGx9aZ0Uh
4nPqXt/K3L+iEfG563GKSHpVMiI+T6FlrzcVZSDi84H07VOlBlmI+HxEysJ8
T+EFRHx2kJ2o9Hmfh4jPlgnPdrmdKiTrixVyc9xecQohP/OH3M4tGCmG/Pzp
wvrzRyyYkJ+j+OXdXanlkJ/L9J56yWUxID/vCVsUntxJ8hgXu0hI6ynqFpL9
i3cEjCRYthWR/Y1HaXfCpj6WkP2PD73UUzwzUEryC57QzPu4zLOU5Busvi8o
zORiKTlf+JjNkbAV2kzIz0/LX0TS869Cfp600W1f5lkJ+Vlw3ktBc8Y1yM/v
e2VWLjG/BvmZ86Ok++ZrlSS/Yb/xyYFOzwqS73Cb3kmZ/vFykv9wSkuwZs99
JvEHF1udmZJezSA+4b20D4Y5GkziF2bMTc60jLlKfMPHHmk1SutWEf+w2kO6
JTumCvLzKSeDJ1n/PJ/4bD54YAHvBB3y82+tbMeRbYWQnzUl11r3H7oC+Tl6
9fyHHhpFkJ/j52ocThKWQ37WTiuICFlzHXz+cM9kYCCsBnx2lnuewr7MBp8n
rUOEWw1qwedf5UMc3p6tB597FlmqV/3dAD7r3tAbVx28CT4zJZVetl7CkJ9V
gnoene3gQn6OW/0fn6/OzZCf12GnNRHtXPDZ6av0KmslDD6rTdvw25uhRvBZ
Fiv5flNtBJ+PmdPouzc2gc+7/rb8UlDRDD4rXVe++GCcB/nZR9ojYe10PuTn
3MdTQs8VLeBzp1LlFDuOCz7XKb25kbiQCz5vO2H0g5E9F3y+uVReZvdxLvic
PGpO3/2VCz5723XOtrNtAZ/n5eRdnajigc+19ek620Z44POkf/8b18EW8Pnq
uPXwC79m8Fmjq0fkHcAFn9GC5IwZVlzw2VTe27liUzP43PJBLy4zrgV8Xrnz
XpWcOQ98zs4fkPE15YHP+Ne+IZokD3yWx2kJ8kt44HNZesx0r4888NljTe0l
qUY++KxaY9WkPsAHn0/27Sw9EcUHn4vLy+pDNPjg881P88Jrtfjg85RhsrHq
OT74bDtf/5OlUiv4fP9EcYZ7YSv4LLPT1bE4tA18PukYoi50EkB+Hmkqiph2
XwD52Xujw+cXfQLIz2bFszakDgsgP1u8LTx8ZnE75Oe8MEtLg8vt/+Znh/EX
SUgI+Tmu6PdU+g0h5OdkU7tMNykR5OfI1LfjspEiLO5viPsb4v6GuL8h7m+I
+xvi/oa4vyHub4j7G+L+hri/Ie5viPsb4v6GuL/x/97f+C/CzX6B
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0Oc6FQAAANB7L6GUd+iV/K0oKim5Dalo0CBaaO9JRWnRLhqKJEWlISoN
bdohOd/nx3mBMzYpHJ8eCgQCQaqo5gxnOcd5LnCRS1zmCjXUcpVrXOcGddzk
FvU0cJtG7tDEXZq5x31aaOUBD3lEG495wlOe0c5zOujkBS95RRevecNb3tHN
ez7wkU985gtf6aGXb3znBz/5xW/+8Jc++hngH4P8DwynBQkRQSQjiCKaGEYy
ilhGM4a44PD1aU5xkhMcp5JjHKWCco5wmEOUUcpBDrCffexlD7vZxU52sJ1t
bGULm9nERjZQQjFFrGcda1nDagopYBX55LGSFSxnGbnksJQlLGYR2WSxkAXM
J5N5ZDCXOcxmFmHSmUkaM5hOKtNIYSpTmEwySUxiIokkMIHxjGMIxflyYw==

             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
           LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
             18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 
            34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
            50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 
            66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 
            82, 83, 84, 85, 86, 87, 88, 89, 90}]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[{91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 
            104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 
            117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 
            130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 
            143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 
            156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 
            169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180}]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwN0GciggEAANAvu8QdXMnPfjoAp7MSaVnJVplF9qwUMuL9eBd4YxNT45Oh
IAhiTDPDLHPME2eBBIsskWSZFGkyZMmxwiprrLNBnk0KbLHNDrvssc8BhxQp
UeaIY0445YxzKlS54JIaV1xzwy133PPAI08888IrdRo0eaNFm3c++KTDF9/8
8EuXPwJpIXropY9+BhhkiDARhokywij/w5VCZA==
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.16595132445458455`, 
       0.3104895747859969}, {-0.20703267582861073`, 0.06740679645393603}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";", " ", 
    RowBox[{"pA200Data", " ", "=", 
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJztmPk31PsbwNEuRVSSVNrUzdVmKaWndJNclCRLXOVyr+43UopymWunRlKk
sc8wk30MM2ObrjfdJKVsdSWVlEq7NluWb99z5nn/D99zxg/jzPmc+byf97O8
zus82m5H9ngoyMnJzfv+8b//Tns4Kd0mtYQ93Uu/OyaNvDUcWxQQe4047VS9
u0knmTA0XfKUO/8hgepqsfsELKIiJ1nDW/UPGazsPmfQdolwuudUGAdfJUt0
c4/dU7xI1tX7bWlqqiEOOsarFzTFkdrCu3Ue2jXkun+jkaE9k9hfWLvr29Fq
EssMO5HGjybN7xYWakcQ0jG3uG7S+kjypfShxHJZFfHYpVlbZhJG1INZN/3r
rpCdnfwxlXFhZOPOve2ZnhISfvP5nZTyCPKLqkrP7SmVJOeIhuWIaRQJ7bjV
N5BXTjp7Y/hXpkQSHjdqwhLLMtLBUH14RxJK6r22zdz1TkzclH5b8a93kPS+
IlJlO9I2zzpAej8hiVr0QC/2faD0PsVklkv5zyEBQdL4BeT+8MP6lpwgabx8
8uWZuKj8RYg0vnwiNFTsiK4Ll8aTQ2YLXrV6a4VJz+eRLzbzB6pKGNLzsohz
V1vJ8V2B0vezSUJR0qepdQzp+1KIgUuy2ZhasPT3F4mccdGiI7YYTxwx7dI/
sFHeX/o8ghj25r3Uq/SVfj9BnE4eSy3QCiFy0j8tP+3GgoB4fA7Cp8xmfRYb
fw+rDNaN9oRw8f1QvVIversDF8+H2yMWt+beycT44K7hALdcJxPjhw125WqL
gzPxfnDXfaveZqNMvD8seuu43e4wG/MDO/LbrX7wS8P8wbX95WEVW9Iwv1Bd
X2su0EjH/IP/fVEWVzUd6wN2gb/4LRalY/1gHM9zfKUPG+sLew/kF+9K5WD9
YXhM87Hl9/ik/QG2Pe2vPg5nYv+Aiu/9u1YNmdhfMGzAZzOn4n0lkDpRoO1T
zMH+hK8jk7uf9XOwf2HjvnrfXz9zsL9hRGV0ar8BB/sf+gY869SK2Dgf8MC5
eEPhSzbODxg3TExvc+XgfIHpssANKqs5OH/guvSFQ64xG+cT0rPatzp5ZuD8
woPwV+Fdi9hEOt/gwNz2ebkH1rcW3HVKywbXsonR6ecxFanX4Zb+cCpvE1ua
jzro8P1rddFYBplZvYIR+60O/uactM0uTJPm5wZYLa/KfrA2hfT2eR351ake
QhwXdz3WSpbm6yaM5OpuPbwjmdz+seTA+oqbsLU/O3TfcIo0f7fgmNXvz3/T
yyC57n020+Y0gMfm9nc1/WxpPhvgcFyKa7IHh0SmGG976ncbdjvytab2sKX5
vQM2og4rllcGcWth6JfduwNrNqUKxKdSpfluhIq87swAZhLJCO9SNZvbBAHz
ti29aXdJmv8mSHKuFsYwEsl0dhhTUN8EGhtftzV6XZLWoxkUlPPy5zawSKBk
6XjNU81gs+r3NsEilrQ+zaD8nvPt3fsE8vrfusCI5S2Q4txBHrSfl9arBUaP
kjAdgzji+OnQ1w9tLZB99kTPIe5Zaf1aYXVdoMq9l2dI3TQlb6eoViA243p3
NTCl9WyFllGvi2HecVg/UrrfOuOyPguQz2+15DS+OKYB8tksnDd+KJINyGc5
v4+kVYEDyOd1e/wKtoyyAfk8q1VB56kPB5DPeybaFltNygTkc4GFr9u8lZmA
fC71/Wt+lUcmIJ+dB13GJqllAfJZr1r9k3pNFiCfzX1NjtZP5wLyuVluur/S
Xi4gn2349d+cT3IB+XzEe7t7UCkXkM+hqd5u3FU8QD4XPSYPSzbzAPlc43Re
ST+RC8jninbmFM0LXEA+e5WdNNyuwgPksyvjRHrNOy4gn6tONjawvDGeHKK9
uP8ntxw8n0cYf5pdgl/wvCziLdfe/ymBB8jnSg9zRsBkHiCfDygmrpzTkQXI
573mlocndmA+48gOlUedg8OZgHw25S44qLQRv58g9zsl45SfJAHyOXCahcjn
cxg+h7FLZd4vR7bh7+GPfeavLO1d8P3waOaac141QXg+hGj7nDHRjcb4IJHf
K0kpjcH4YdC/wFUx9yzeD6ynpCVc1ziP94fg/JZR0XAi5geigydMGDNIwfyB
d3ev20FGMuYXOhM+npfrTcL8w6dtnh+PrEnB+kBhc96ffd9YWD8o2zccYcm8
gPUF+ZIpzrpzmFh/iBOEMjPORGJ/wEHxjlnlmuHYP3C0+PTm6zHh2F+wnaEL
PhK8rwRA235Icu0M9icUWogXCrdEY/+CZiN7r5VpJPY3TGbv4bF9orD/Yb5r
+pPNZhE4HzCD5WZW3R6I8wOVZl4fXLJ9cb7gqJHjDRfnAJw/qA65oGFkH4Xz
CWbsy879T87h/ILR3+6X24RxgHx+cfXxjoz0OEA+T9uqtGGC0XlAPnNfmHmw
rpwH5HOMINtnw+t4QD43FdjO0DzNAuTz8uFG01zXVEA+/2eqdsdZdhogn5vn
//xjAj8VkM8+k5Nb1DovAfI5Z+zXR95XzgHyudki52yTTwQgnxvcLl58+vY0
IJ/l/rRj2/2cAMhn/fP2f6SuSgPkc5VN8H7HDg4gn20CqoYiBzIB+dzOX3jD
5R0HkM+VJdbKkxezAfnsGl/0PtUpDZDP7UrHYe3DVEA+LzZJCp0Wj3xrhj0d
AtP18pcB+aydN7u5aXcBIJ8nLjke66QqAOTzQUaowsvTAkA+9zhO2eq5RwDI
58Qb7tesgosA+WzBFS3Te1GI9SOb5yteTWkVUX9eobvTR/MPEfXnp1bOO3NS
RNSfGXPeZI/3ElF/1iXnlJnjhdSfjYLS84MXFlN/1r9qfLunpIj68zEVA63/
hPKpPy+Vd1C4GlJI/Xka503Xs+IC6s/Nqz4cZZsWUn8+7SBwUH/Dp/7MK5+r
xfxaRP25ZpmK7cagIurPDwutW9xn8qk/pyy48daRWUD9OWMdUTVuyaf+7PZs
B6utOZ/680jvKWdJbz71Z27fh55TAQXUnx19dvdpdRVSf1ZP2Gvs0sKn/rzy
2xu+hhGf+vOwsrXdB8VC6s+1A7FLmnIKqD+nN78PMKksoP48vP7ZHfXn+dSf
W2cP6D9dlUf9mWX+usz87xzqzzYHFDVZK7KpP2voqjc9YvCoPwcOrhuO9s+h
/vzM5hB7dbWA+vPpfffXmPWLqD8rm2gfdNYvpf48Kp8UmNkqpv582dJvXkyV
mPrz+u5C158MSqk/62R7thYFlVJ/Vrg0PSJ0ZSn151oDvZ6EaDH155HfWHO/
gpj68xyLTvP70WLqz+uD9K3598TUnxM/aTgpJ4mpPxdXvlx6Vk1M/Tk+UdfE
bkxE/Vl5X0wj20ZM/Xnscehbz2Ax9WfIzU194SKm/lxbG58zuEhM/fna6yH2
JEUx9WeL7AXmQ9/fj3xe4OMyv1Aiov486p6zcOoSEfXnB9cCszrshdSf90eq
b94pLqH+fJk9EmiVXEL9uaJCfva/90qoP7NOzNkUt1RI/bmNF6JkKRBSf14u
CvVu2yWi/jxj08baphgR9edco8EJkmAR9efj761Kb+WLqD/PuHzoi8eQiPqz
2qYZ3nMHRdSf16jFc+2LRdSfkz84vlT1F1F/Fs57tXL/9/ORz1eChgx6vwqp
P/OXHbCuiRVSf67aETvWwRNSf67dZF1imCWi/qxS/k/EkyEx9ecTVWFbhQpl
1J8HzKZHRv1QRv058kLzHTnTUurPuc+L++I5IurPeVFRB2/uFlJ/dlfg6Jyb
JqT+XKpY8lwjTUj92dhQ7sdOJxH1Z4H7igVqJ8XUnw+MO3XDblYZ9ecJj2x3
v9ctp/7c0JURKP+5jPqzmLk8wkWpjPqzZP26x8bCUurPsTYzHjt8v49svyHb
b8j2G7L9hmy/IdtvyPYbsv2GbL8h22/I9huy/YZsvyHbb8j2G7L9xv/7fuO/
cl980Q==
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0Oc6FQAAANB7L6GUd+iV/K0oKim5Dalo0CBaaO9JRWnRLhqKJEWlISoN
bdohOd/nx3mBMzYpHJ8eCgQCQaqo5gxnOcd5LnCRS1zmCjXUcpVrXOcGddzk
FvU0cJtG7tDEXZq5x31aaOUBD3lEG495wlOe0c5zOujkBS95RRevecNb3tHN
ez7wkU985gtf6aGXb3znBz/5xW/+8Jc++hngH4P8DwynBQkRQSQjiCKaGEYy
ilhGM4a44PD1aU5xkhMcp5JjHKWCco5wmEOUUcpBDrCffexlD7vZxU52sJ1t
bGULm9nERjZQQjFFrGcda1nDagopYBX55LGSFSxnGbnksJQlLGYR2WSxkAXM
J5N5ZDCXOcxmFmHSmUkaM5hOKtNIYSpTmEwySUxiIokkMIHxjGMIxflyYw==

             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
           LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
             18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 
            34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
            50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 
            66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 
            82, 83, 84, 85, 86, 87, 88, 89, 90}]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[{91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 
            104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 
            117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 
            130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 
            143, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 
            156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 
            169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180}]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwN0GciggEAANAvu8QdXMnPfjoAp7MSaVnJVplF9qwUMuL9eBd4YxNT45Oh
IAhiTDPDLHPME2eBBIsskWSZFGkyZMmxwiprrLNBnk0KbLHNDrvssc8BhxQp
UeaIY0445YxzKlS54JIaV1xzwy133PPAI08888IrdRo0eaNFm3c++KTDF9/8
8EuXPwJpIXropY9+BhhkiDARhokywij/w5VCZA==
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[
        GrayLevel[0], Bold, Medium],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.16595132445458455`, 
       0.3104895747859969}, {-0.09443559132693131, 0.0646042233588502}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pL400Data", " ", "=", "  ", 
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJzt2fk/VF8fAHClzVJStkqhpKRSiJIciXZZokW+pbSQiiR79iTKHtmypcY+
dkM5zIyyDDPW7CWiCFEqUd+n5/Xc+/knnvGL17zuzL3nnM/nnPO+5yNzwcbo
0lweHh5ZXh6e//5vTeYtuEujY/fr37bktTgiiWyK28AaOo69UxMwcckJmdH0
dPf5VuIb885pvChwQwnMycXJnyrwVn75NB1pD9TPjmrj0a/AFJuhFuW57uho
kbMmtsSY35xVZfnRBTWzGGw35XJMO7ApjOeRPTLtX3xe/c8LPMrJubrN5hrq
mz45+aO6DFu1G7Q/s7yBLJcm+xSGl2KVJrbxYJ0DGpf7LHLrLA2fyuWnOU24
IYc9qs+2yZfgvaKHetc+cEezxz3Vxr4W4V92DyKLd3ggn6u11RnlhbhzjvTr
d8s9EL+XiKnV/QJc9DD08fNwVxQadXZEzjgfa96p2m0gdJvobx7+zBdhnfni
OtE/KqYc2O2UomVJ9CcHy3yX0Qyzvkq0PxObTXhczTIm25uOefROnkowtCPa
R8FKZS9nDy10IdqTimuDFLLSFLyI56fg8w1TbenLfYjnJWI/N6+VZxt9iPvH
4YHD0/orOL7E/R7j3ynxmSte+RK/D8fVswo7JyO8ie8/wCbN5VnJte7EdR9s
wGyePqNjT3y+he8dDqBmx1phHuKPHhhv7fY1EhPXkZ/r/MDBrxTisw/aZfNW
5FdFLibujwJc5JybxQuI6+HI/1tPYd+CQky0D10LUdE931VIfD8OpWvrSSkF
FWGif2hzZfY7Y8li4vcpyLH85psKTjEmxgcJDAoGzrlYQtyPgm7KePXneZZg
YnzRPEm/r20BJcT9M1HPgh+twYI0TMQHhd42fL5gQSnxPCpSdDn1JGZlGSbi
i/qnylYkt5URz89HMhIRFkeFX2AiP5Afe8arYNULoj2FKHZXx6MXti8wkV+o
diokZv7MC6J9Jcid+u1NyZmXmMhPxPqlNqEd+pJobyn6Z+uSNvbickzkN7o1
nR4oJo2J9r9Awvsvpqw2qcDE/ECCz5c28PFWEv3BSH74cMGkWSUm5heKU5lE
otcrif5VoPs7PK/UW1ViYn6ipNeKz+T0Kon+0lF542WBAYFKTMxvtNlsibhH
UwXRfwbykz0z4/m2Ah97QFtbPcZAK/g2s+P4KonxYKIja9jfDFUr8evbNqH8
slXoEu17yFr/SmJ8qlD7nwmdkXl0rHVuPY/e6VfI33TMveAcnRivV0ig95Pg
RDAd0w523QgOeo2ChjX2ptTTifGrRpusWJguzcBKSqE9jYxq1HTBXNtdk0GM
Zw06p00/SxNk4IxVB46KTNegDtWjc1MYdGJ8a5HZkiWFgY/pWHb+79ITW+tQ
/tc6XoEAOjHedehRg9nS4Ug6jh/Lk4+2YCEJ7eEE6xI6Mf4stNCAssi+gY7F
2i0fdz2uR/GT62ndbDoRjwb08SQa0ein4+DKNQvXNDSgCK1H89VlGUR82IgV
YjmeF8TAvibD6tQ5HDRHy/t70ScGES8Oagx2zNLoYOC9h3XtDOM4aPcOutjD
2wwifhxk4XPGVlmbgX9rJqZNqjYi2jrJjS2XGEQ8GxGrwClNLZGBS5Vn3oU3
NiLVazGO8W8ZRHybkNQ6S5HFu5jYYeMJiR3XmlD2nuVWPr5MIt5NyHh0IkPA
nImVV+fqty1oRtKzukIeZQwi/s0okmnpzBJi4C/Cgvcck5qR3YmuW1mtdCIf
mtFYlKvT5FwGzlxwpVxCowU9Wx22Ya4Rg8iPFqSu3kA5VcTAVjOVU7S2FlSs
o/W1dAOTyJdWxDRZb049xcTrv0huOXOzFQlay0fX7GQS+dOKzoR/Ldk+h4nf
DzhenBVoQw3q7mUZrxlEPrUhm5bx8A4fBn7S0RQb/6wNza6o0uxyYBD51YZi
urNtDWMY+EzDlmbNvW+QnUm9V18Kg8i3N6jeVaTzrDsDizP8+d91vUHvp58d
+HiOQeRfO2pbF04vP8zALcX9e70c2pFRRR/PERUyH9uRu3hz1S1dBg7J1HRe
K9yB9i25q/HBjczPDuS9gOf94r+f9ZKiqYyMDiRiZxG0ehuZrx1IdpnaF305
BuaL/DZ0cX8nkqdENJ/4297/5W8nCrsV+ctqBxO/CtCXWtDXiQ5TfDo8njKJ
fO5C1bwn2MzWv+PlkX7iuWsXKpguUN+YxyTyuwvJqzpov3VhYmQ/P+igWDfK
Dc3Jl/h7/X/53o2chztvmhpX4VlL86pP1G40ZfMtTKa5isj/btRjbKI4FluF
S/4pmw040oOkHz8wGmlgEvOhB73ZcqejSIWJbxuJqWwe7EG8XgPJ6XpMYn70
or45gUcXXGDi7QduWtd79qINLroDKapMYr70oqlR32vyVmQ+0rHNeunJBHka
+CJGZo2kxVMa+EKBOm7yKLIEfDGiJW4sL18MvlgtvXLGIakIfCGweEdMC6UQ
fHF87Y3JLNM88MW+vMX2x0czwRf6pusXuX7IAF+wc7/9rKymgi9GcxmXTUzz
wRcTbzJXfuctAF+kqDwfE+3NB1/0j8j0jsTkgy/28F7+aLwxH3whU3d7xjk6
D3zx1tFIZHZTHviifeye8Gh1LvhixMDwDH5PBV8YhL281Z6aDb6gDEhpzEvI
Bl8ErVaqy7+bB774cWwx/0hKIfhi6TansgJUCL4I46FUF2zJB18IXL8gn6CT
B76YFOI8YezIA198HuCzs6rKBV+kbBs9L2JHBV98pHjSWVszwBdJigOFuYcT
EemLdUX3tgvxXiavoyAxzWUdzyPBF267S38nXUsEX4xkuSl0KyaCL0LY/jr+
Kongi9O65otHixLBFzQtrC9iEQ++2Krm/bG+LBp8weSlTlh7xoIvJkNMbkwl
R4IvChdu/sDKvQi+CIwJ6JGIDyfHH91RvWgalxtLxgdZ9D4eilR/RMYPCRvq
7umoukvGF2G5oRYvbUcy/sgxPnAoOuwSmR/I4qW5rvYdV/BF4p3kQWH+KPBF
RdiJZQstn4Avzu4wVKKYPwJf6FtfX/CH5QO+uF4Q9NJ9QwD4QnK5XDTNJQF8
wclzLFAdzABfrPqYaOWkkAe+6N2sn6kkkwe+WGAZVi22IRN8MZwpbNK7IhV8
URs8InmpMwV8wXpX2aOf9BR84f8p/3Coayr44tVBdec3oxTwxSVlTfyynwK+
ENxgqYizk8EXt39IVb7bHQu+GGyaQfWf48EXi1hzUns+J4EvVjdcar4mkgq+
ML8SmbRwNgN88VWj8rebaR74QifzYPrz/fngC+N3frLjMlTwhURSwTyVPRng
i0mFc51K67PAF2cPCkrOzGaDL0KmQ48cO5cOvpBKE5S81ZwCvlCuXF3OikoC
X7TpruHBs0ngi7j1P4M+SyaDL6RD3E+dE30KvrDZmKYgxcoAX7SeGro99SwP
fPHNSG7M4WI++EJpuFqAdTobfLEqfsNH7ddPwRdCiqzAKLlE8AVje0ThKu8E
8IVMkuTeCr0U8IXPq3kmn9sywBc+dxN9byrngS/EaIqyDvvywBd+V8Twbs9M
8EXYZXtdTepT8IWp2rw9er2J4Iv8YVnb3Y1PwBe544eebzZIAl8Edxs6uf6k
gC9qE3sG+Buo4Au3kMUzIby54At+M/Ui6b/xIH1RWh9wi/47GXwx/UGmwSb8
CfjCbOPPhVNJ0eCL1D0Gct/9HoEvFtkOX0cSEeCLTo6FbuncCPCF4MHB38o9
IeCLrvpKzfYXPuCL8zWjk0kuTuCLmJUXt7P9vMEXT4YuO7o+9gdfiI2Uyfof
9AZfaDXzixYvcQZfdPY/O2FneB98IdoT9DHrVwz4YuiIDc1+aTL4YtnOh3/W
uyWDLzwM7gzqK6eALxJFoxlXzJPBF384Zy9qxEaBL4wE76jONfcBX7BPZnRF
t7iCL7TcZKps7/uBL06uG8+iXX8AvghoeLfVqMobfLGh88K5A0bWiPTFogt7
vtwbDECkL37vX5q1eVMAIn1hudxsYF9UACJ9sWOZu6m2fDgifRH26KfRovsR
iPQFjjqfyadYRK5PeHCCOfw0qohcv3A826Lh978F5PqGn0pNlkvr5pPrH96o
dMdzWx+sj5jPy9Xr9ZE8cv3ExXmGFatCcsj1FcuVFF++fi6NXH+xFlq15bIE
hVyf8VKbQrOA3gxy/cb+xToJR51yyPUdHy7sL7+pRCXXfxxwNOPHy7Eccn/A
hm9cA97a5pDvp1go5fkwts4h31/xV9VfQ1LjOeT7LdZSi9bbrk8l33+xmfq8
zvc6VPL9GAtb9N4QdMom35+xbMT1V9pd6eT+hy2F+S/H8aeT+yM2ZKmIP7qf
Te6feL81/QnP6Vxyf8WOL0rn17qQz0vE77SFfEvtMsn9GaeqVKdvlyHv9xgP
6RlecVmUTu7v2L7u9+vTWunk/o/tMq9KeG5PI33wd94IMAtXPyPPJ/CE01Tg
BvcUOL+QXVh0Nus4Bc4v3k/d3v/lUD74Ir+ib1PKkTLwhZD+gRvdAhXgi9SK
sqd4ugJ8IebRPedZViX4ItzU5BG7jw6+2O/yZF3XAAN88e/L3afzzZngi1Fl
7Z7k4CrwhdHNzzkjW6rBFyY2akIuf2rh/CLr4b7zDG8WnF+cDdXxPZ3FgvOL
vezNSj8dWHB+sULRYmNRCAvOL6L2K9VFXmHB+UVsDcemFtWBLwY/zTvtElwD
vrBbt79k3tYa8EXz/fTGlJxa8IW4bOPSW8Ys8IXovh3DJ61Z4Iulan6n8LY6
8IVtQnp0FrUGfMHfaXDl5Jdq8EX/nhvLjqbVgC/U2Lj+IqcOfNH2b9mudQ/r
wRf6GbLzC1LqwRdHFP6Rsh9ngS9+vLTpWrGfBb7oLLoi8cCnDnxx6q7/1sOd
deCLFiXm6m8V9eCLzls1fDUUNvgiY++k7Ro5DvhiocyxWom1HPBFyMFfA686
2eALnd0iMTpxDeCLLuUSngMi9eALb5u4HEoHC3wRIbJXwXVRA/jiqq4173Rx
A/jipaFvfu1QPfjCoDVC641xPfiiak3rQ57IBvDFt0xLjd97OOCLd1EDti6x
HPBFv/zaDp0QDvhC5bj56YQEDvgi9MbdlUFJHPBFufVXPkVRDvjicfNSpa8e
DeCLjd+7+vfwNIAvhhXDNj03ZoMvKoJPLD+SxgFftMUnq8453wi+oN6UGhOl
NIIvlrc72Hy43Qi+0A94fV+xnAO+iN3ZJnRsnA2+kPxTp2v2hA2+UFS0iHJU
4IAvmGqlVKYzB3zhx1Zn9dM44It9h5wre0UbwRc5bylhsxsawRdpfxi7DkVx
wBf8NGF7249s8EXqxHkZljgHfPFA6oL3h88c8EXKLu+rzkmN4Asbybhy+95G
8MUnQ9t9pZ8awRcyYubd1muawBfROzjO9aeawBcWEo49hRZN4Iuj4qoxgbZN
4Au7EerdOfQm8EXutdfqLR+bwBfuCSfuiSQ2gS/2vhMfzvFsAl+MbD03kzjc
BL5Q6cqY3yzeDL6YUs+eCb3UBL44LpstnOrQCL7ILL+scfBUI/gilMVU//Ch
EXyh/ie/W1SzCXwh0ve+rfh+E/jiqaCNvf3OZvDFKz36trdvm8EXRgNaR19p
t4AvonpzR5YktoAvur77VuWPt4AvLI/1xjPmt4IvWv450hf89zPpiyGJfyVG
BFrh/EKDV2/R7JpWOL+48z7LukK1Fc4vjpwZ5dtp1QrnF8ccCyZoua2YWx/h
1ke49RFufYRbH+HWR7j1EW59hFsf4dZHuPURbn2EWx/h1ke49RFufYRbH+HW
R7j1EW59hFsf4dZHuPURbn3k/60+8h/wFZrj
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0mV7FgQAheG9dHeHNEhINyggncLohtE1UGlFWrYBGxvdUtLdiNLd3aGg
IKA0WID3dfHhPucPPDlC+gaHxgoKCgqQxCQlGclJQUpSkZo0pCUd6clARjKR
mSxk5QOykZ0c5CQXuclDXvLxIfkpQEEK8RGFKUJRilGcEpSkFKUpQ1nKUZ4K
VORjPqESlanCp1SlGtWpQU1qUZs61KUe9WnAZzSkEcE0pglNaUZzWtCSVrSm
DW1pR3s60JEQOtGZLnSlG93pQU960Zs+hNKXfnzOF3xJfwYwkEEMZghD+Yqv
GcY3DGcEIxnFaMYwlm8ZRxjhRDCeCUwkkigmEU1M4H0biUlEQhIQn3jEJQ6x
iUUg8D6od+4tb/iPf/mHv/mL17ziJS94zjOe8oTH/MkfPOIhD/id+9zjN37l
Lnf4hZ+5zS1ucoPrXOMqV7jMJS5ygfOc4yxnOM0pTnKC4xzjKEc4zCEOcoD9
7GMve9jNLn7iR3byAzvYzja2soXNbGIjG1jPOtayhtWsYiUrWM4ylvI9S1jM
IhaygO+YzzzmMofZzGImM5jONKYyhcnEEM0koohkIhMYTwThhDGO/wGIRIhs

             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
           LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
             18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 
            34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
            50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 
            66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 
            82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 
            98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 
            111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 
            124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134}]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwN0WcikAEAANDPyKpLuJIjOIBuIZQ9s6koe6+iKFI2GRnJnpHIiPB+vBO8
2PjHcQkhQRAk8oQkkknhKc9IJY10Msgki2xyyCWPfAp4TiFFFFNCKWWUU0El
L3jJK6qo5jVvqKGWOuppoJEmmmmhlTba6aCTLrrp4S3v6KWP93ygnwE+8olB
hvjMMF/4ygijjDHOBJNMMc0M35hljnkW+M4iSyyzwg9W+cka62ywyRbb7LDL
HvsccMgvjjjmNyf84ZQz/nLOBZdc8Y9rbvjPLXcEskMIJYxwHhBBJFFEE8ND
HnEPWepewA==
            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0Vc7FgAAQOHPD7CSLXuvRGSPrJT5JZuQKHvPbAlR+MVeF+/znPuTNr0S
XA4JBAKXhIowwokgkhdE8ZJoYogljngSSCSJVySTQipppJNBJllkk0MueeRT
QCFFFPOaEt5QShlvKaeCd1RSRTU11FJHPQ000sR7mmmhlTba+UAHH/lEJ110
00MvfQT5TD9fGGCQIYYZYZQxxpngK5NMMc03ZvjOLHP84CfzLLDIEs8zVlhl
jXU22GSLbXbYZY99DvjFIUccc8IpZ5xzwW8u+cMV19zwl1vu+Md/7nngkSfz
cyxd
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[
        GrayLevel[0], Bold, Medium],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.14628669061428093`, 
       0.48133040137602107`}, {-0.3389725551986559, 0.100164598812745}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";", " ", 
    RowBox[{"pA400Data", " ", "=", " ", 
     GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJztmfk/1Ov7x7Vq0WkhcerQRpLqlKKkrsKJSuWoFNowyFqWopJiImQp+5qx
z4xhNjFUbktJUpIoe5ZE9ZEPDkeKT99H7/v+J77jl3nM4z1m7vu6X9d7nvO8
VlieN7aeKiEhsXqahMT/PdanTsvzKyxD/k9nZlk+9kVyuUyvboUyJONwWu4g
JwidLDz4l+7NUtTB1z59jhuGkh8PzkvtK0HJuW2Z21XCUFdNTIPE4RKUMKRr
vNgiCBnmX96FziFUGGcn2LnAH9VVl9d4qRejud1qCllD/sisa56F1sRDZHE/
JfaKXhDqGDs+OFr5AP1Z13w8XjMAnVuQSr8fUYQMWbwveXLe6KvyFxm304XI
yza6UXaNLbq0UyPzz7Ui1ByrYm4ldQJ9P3JDs38oH9k0uv3ts8wK0e2rKrOL
76Ov38LURQes0RwfGTO7wDzkYsyfctv+DLobc/qz8lEhktQ0Z7UdOUPtV4Ds
94Fk1kp7an885GAcspoTeoHaDxdlVMczm12dqPVz0DdXP49xsKHWy0aLpFQO
63ygUetjIhuTuaOTJ22o9WSg433Gm5i21tTnpyEz//9Od6Mdpj6PgSz3NNUF
KFrBr/dPRJ9/O5/pIfCAX+8Xix6OmjktYFyDX/8fgXJbTuuZTHpQrw9G+7qO
BI442FPX6Uile8dDlVAt6rkbemyy/FTBdA8kQf0FKh0yv9kVSa3HDaTUGh3N
y9Op53TIoPn571DnUPsNhppNjV2efrnU9QiwLjTfuHp/LrXfWDByN9l45VgO
9fpECL+r8MZ+JBvvD9j6f369fouN9w9dadtF/RksXB+YO3+Kp8leFq4fvJud
x7hxiIXrCw+WB7UvHGTh+kP8CvX9gbfZ+HyAI/+WVrSAjc8PDsy4hapimfh8
4Wvrsmzhj0x8/rCtxSsj/XIGzgdoW1dNhn1Kw/mBZyO9tHfJqThfoNk/IjnQ
lYLzB3MFZXPlTVJwPiEhL43ztI6B8wuf1fZzjb4wcL7Bd5Wdbq9rCs4/REUx
3PP0UnB/gHPm7vrlbgzcPxA74pivCQzcX6ClX9U98vP9qP6DdaI/tsSsScH9
CZM9v73S10rG/QurIkYmdGXjENXfADuUd12oj6D2Xw4GU+8X2N4LR4eCC1dW
9pfDmUrRox7DSKoej2H62mPADI5GTy+evztn9ROwfNnfumgihqrPEzi4Si1r
zc4YtPuMksRB0wowvFF6Z/r7CKpeFaDY/q62VeEOKjRodg4LfQral+ROms4L
pupXCbKZx2T8doegzZvvttaWV8Ki7fpGiefuUvV8Bs6t601fSESi7KX6hjJj
zyDITGur9N4Iqr5VsHKWKPXN2xC0esaPIpMNz0EjYqhXhe5H1fs59He9eFLu
REdJ/YK1cVbVUPFpQFNthE7Vvxp01jF691j5INl352KbY1/ALb0lB4U6ntR5
vAT6eq3d7CgHFFaqIKnw8iXE660qGQ88Rp1PDbCtB773uf2Jbh77pMWb8gp2
cYXzVs06TJ3XKxCFz5zYvNoa7dn/l+vfia/A7LOqeazteer8XkFW/s0HuY/d
0Y9dDNagRi18CNpr803iKnWetTD1cOCggr4XKlIffx9RWwtbotm8xYru1Pm+
hiIXaRXrG0fRJRUTua2Or2Fymf9c9Pws/Drv16AdcGGazjsaqP/BP9wwsw6O
wYGPNoID1PnXwT1Vq8iSLR5oYKHULY+UOpjvsoK1MvM6lYc6CB80v9h66hLi
zLQtltN+A1ZJKxe5bD9K5eMN1LQoX3/dYAF246X/FDa8gQdfSk4bdTnDr7zU
Q3txH3e3tDMoDSxbb+5SD2pOysODJobwKz/1kM7nHmAInVBntwft+9wGKFbd
vPVKlAeVpwbY7CRfmilrj+41vk5IymwAfu9ylePr9OBXvhpgtvwjpbb6k2D+
cn3drj1v4ajjRJmS124qb2/BSWajbbOFK1pSHjDnffNb4HnCTj1NHyp/72Bw
28mRwjY6elPQtcfn0jvYOY3r/vi6D5XHd+CnXycZY+KD7nB2XV65sBEaT3hY
cTl+VD4boY45KjMgCkQHU+J45dk/r/8+/4VbQhCV10YI8+jqMdgbiGZHD3+k
7W0CCzN6hHMT/n5rAvmnB/Y0SQSjiqDDijM7mmCft8Y+4clQKs/NoHfR+3eX
jbcR/TrbJOtqM3S2GzTq/Eun8t0MvI6BW+Oa1xC4zwg1kG2BwH33bom+elF5
b4GJU7X5Hx7R0fdzZ5/08VpAU7D7Eb8/iMp/C6hXb+n5wryDRKcefA860AqW
Gn6eP0NL9UMr6DZUWKctj0QXjWW3qPW0gmmWMav9biTVH20AU6ViIrvD0SZ9
F4cXN9rAOfzShl02oVS/tMGzhUd2bZENwPcfpGeWNm/P0RTAfLGmlxFUTUsC
zBdpw/5m9+QTAPPFvbX969OLkgDzRf7vV8OWLUgBzBe9rXu1K6NTAPPF1nn/
8paXJQPmi5KerfvmiBIA84VggjmeMiMRMF/8GT7j/W9FKYD5glPt/9rJKQsw
X+hctop2ecECzBdfBi40swWZgPlCPeKEYMaHVMB8UdehVSYRkwaYL3p7vq3Z
MJsJmC8ORg19a/iYDZgv7g2d5908wwHMF0U5gl5mLgswX1T+kbhmtkYmYL7I
aJ0fc3pfOmC+GNqQpWVckA6YL873eF/NtMsEzBdTKxc7pjxnAuaLeJuu0uqB
bMIXBzL80ba5uYQvor256/QZHMIXM3YYPSnuYxK+8L2ryS5zyCR84d6mXnbL
I53whX+ivaP6SCJgvpDqaX61feAqvg5mDwwvflUOJHzhbR9n3R0VTvjin9cu
V2+UhhG+uLNut3n3wRDCF57HpUIWjYcSvtgmvBNcNDWQ8IWh/+FnKpL2hC86
3wTJlQ/fwPUB4SET8ykvQnH9oIPGimjRD8T1BdWJva4B9U64/sBf1WfRZEH4
D9zvypcgwTXCF0E0o9Su8CuEL14vCi72CrIifCHpk0/fuNAF5wOETmO/R94P
xPkBWrrqWeWNkThfIO+et/UvjyicP5Cfpu/6Qe0uzid4bg7ZtOg4Xm8R2AfJ
T2G8peN8w0nzkqD6SR+cfzCeebH5wCd/3B/AO99ttnZ6CO4fKA50yNR1u437
CwwnDWg9z+m4/2BR1n7rF4LruD+hRynEQzUsAPcv3JoxEhGnGguYL2b1v/E6
35ACmC98s+cYnbBJBcwX3NREWrxnEmC+YH40LNQxiQHMFz1hvMlEpWggfNGq
5No1HAOYLyoMuA5nx+IB88W1eouhDDkGYL6YZVp65cM/uD8qYV1T49x4XRZg
vhiLsejUb2UC5otQ2TmprbvSAfPFtecHHr08wgDMF+Otln/nxzEA8wU7wGdh
SlcaYL74mvVAMNqbAZgvNCsclA29MgDzxfc1K3w21KYD5ovBlOIlGgsyAfPF
Ns+mxuxPLMB8MWesROLGKBcwX6j9dmj/0DAfMF9whn2br2fzAPOFQUFbQzCT
DZgvpBTXW30zywTMF698Jr6H5GUA5ovnSnqOGi8yAPMFzfwpuvuzLzBfxJ34
OlSWkQWYL2xU8oWWaRzAfLHP6HGH6BqP8IWSxVCpwJhH+GIc1h8ae4XvH3WQ
XdNYkRnLAswXKwZmqU1XYQHmi46/dq54E8AGzBdf7luOGomyAfOFYYin0r6P
HMIXYbOKgwWduYQvBCZTb0va8Qhf2LbtHs7exiN8cSR/6Ei5Rw5gvtjO2aRm
nZwNmC9qvS5McW/IBcwXWqfbSt09BYQvNi62DxjLERK+EPGK1w/y+YD5wsSi
sDH1SQ5gvlDqXdirnZENmC/cwgc8LwflAOaLKQbJVSUePMB8IacBE0mKfMB8
0VJw9d7xGTzAfBG8TPGkdzgHMF+UjT+iJVSxAfNFX7lCox1iA+YLwWTI+yFH
NmC+kMnO/6hZxQTMF5o1y65E38wCzBdJVvHLdCKZgPkiojfa03seBzBfGKQg
2PuZC5gvpI0/L1bs5QHmCw/fKM2cQh5gvthreTI2MJwHmC+874om2w7zAPOF
aYXpPyXNuYD5QtnM6bpROwcwX0z940RNwHkOYL6gyfc8K+nIAcwXZaapoxDI
A8wXZxJoS25LC/D9B0kWK1u45rOJv0hiXa8NnsUh/kKnzuIknZZD/IWCo80n
Z5dc4i98ZZK2Ze3OJf7iCfvq4o/3OMRfMDzDP3aZZRN/sfDl5ws6E2ziL/57
rmztPQU28Re+Dzct1d7NIv4iMa4wx8iYTfxFzVTZas1D2cRfyDsmz9ghyyL+
4k54lcgrlPw+Rd9GjrmyQjKIvzCLv7PIcYJF/MUV7+bmdWpc4i+WpT9ridnD
I/7isGTFqemncoi/UK4Ojp41wST+Ym378PuZPZnEX5TEBWwf9M0i/uLnvdQn
4ef6MF9sPbpz+pMKFvEXzgrnspqD8e/zRHSn41N9vAITf3+jzJITC3S34fVH
oCb6ti19fan4+x/JLZ7XqKuQhvkAdffrKB6eh32EGxq2uhair51O/MX+VLuo
2xZM4i9SIjd6X7vHJ3whOUfRqSykgPDFhVH7NwYhRYQvhoVDabaMIsIXVn15
rUsuFRK+UL0a7CvdICJ84fn8A3NvQSHhC5+J/UtvPX5A/EXnO4e0EcVHxF+4
aaxV9/J4SPxFzollq4rfFxF/cSZMJt3Br5DwRdSN+nOhW0WEL6ZNWvglfs0n
fGF6TeXJGYt8whf6eqKkgqB84i+GwtfSdVYUEH/RmTz0PSW7gPiLnXNpx0r3
FBB/Ued69Jxxyn3iLz6Z1Q+yJoTEX2w/7cTVsxUSf/GfDaXDnQIh8RdnNeYP
/FiRR/yF1ZYkiUzpPOIvXtlqrWPkCIm/WGV7hO9mIyT+ItHSdc7jlULiL3bK
jWnM5gqIvxis8qRVRgmIv0iLvNb6tV5A/EV3Q/u0s74C4i+ag6f9G3eTT/yF
48sfL7qX8om/UL3dlXshgE/8xbcARV51Ap/4ixPhhlZmuTziLw6ZJXWWLuUR
fyFdZSOzz5tP/EWCydQD/f8VEn/hf+6o/ODK+8RfTIwlXKtXzCP+Yqq07thA
NZ/4C6nO4lSGH5f4i73G435bM3KJv/gQlxrVmMwl/iJ+B03H0oNL/EXyTpeL
Nb45xF/IuE3/3LmcQ/xF36OOFRY/+x3zBTvaom0+k0f8xb/9+grNiwXEX9iV
F9oy1vCJv0gOTNaQPphD/MUlr3Dn/+izib+4zG3PLvzAJv7iZmX9jIshHOIv
lLh2XqavOMRfKE3Inw3I4RB/QT+jOdPucw7xF0MtSzrHOnIR5gs9vqfuqTm5
CPPFSJytX3BuDvEXR+IHPzdYc4m/2Jyp4lARwCP+QmfFfqS0gEf8RWn7zVm9
4xziL/j8iHpnDhthvhj99OGGwcxshPki8KKkRNb8HIT5ghb43ogRykWYL3Qb
8nKXxvCIv3BfilosynjEX2jXP3NMl+ITfxHTtNP66RoBwnxho6Yds/+pAGG+
sGNXPe4c4hN/sT2irFFqI5/4i12vT9DPLxcQf3Hx+Hytzw+FxF/Uznr+kf82
j/iLMcktJboX7xN/IR1q6kG/cJ/4i6ueB9WvFuQRfxHzODVDVSqP+ItGMFDW
5wuJv3BpWBO12ElI/IWR/oabxtZC4i82SJ6c72kqJP5CsebL0R+LhcRf6HCS
BmumC4m/aPzSeic1UUj8hd7SdmVZ/zziL/5p3JehzLpP/EVdKEdS41AB8Rcx
o69dj6WLiL845f1VQ6JKRPzFFrn4wbHrIuIv1lse0867ISL+onbeZZ6qlYj4
i9MTQK9ZKSL+4vWZMWU5eRESz0fE8xHxfEQ8HxHPR8TzEfF8RDwfEc9HxPMR
8XxEPB8Rz0fE8xHxfEQ8HxHPR8TzEfF8RDwfEc9HxPMR8XxEPB/5/zYf+R+d
VTbp
        "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
          {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
           GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl0mV7FgQAheG9dHeHNEhINyggncLohtE1UGlFWrYBGxvdUtLdiNLd3aGg
IKA0WID3dfHhPucPPDlC+gaHxgoKCgqQxCQlGclJQUpSkZo0pCUd6clARjKR
mSxk5QOykZ0c5CQXuclDXvLxIfkpQEEK8RGFKUJRilGcEpSkFKUpQ1nKUZ4K
VORjPqESlanCp1SlGtWpQU1qUZs61KUe9WnAZzSkEcE0pglNaUZzWtCSVrSm
DW1pR3s60JEQOtGZLnSlG93pQU960Zs+hNKXfnzOF3xJfwYwkEEMZghD+Yqv
GcY3DGcEIxnFaMYwlm8ZRxjhRDCeCUwkkigmEU1M4H0biUlEQhIQn3jEJQ6x
iUUg8D6od+4tb/iPf/mHv/mL17ziJS94zjOe8oTH/MkfPOIhD/id+9zjN37l
Lnf4hZ+5zS1ucoPrXOMqV7jMJS5ygfOc4yxnOM0pTnKC4xzjKEc4zCEOcoD9
7GMve9jNLn7iR3byAzvYzja2soXNbGIjG1jPOtayhtWsYiUrWM4ylvI9S1jM
IhaygO+YzzzmMofZzGImM5jONKYyhcnEEM0koohkIhMYTwThhDGO/wGIRIhs

             "]]]}, {}, {}, {}}, {{}, {}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large], 
           LineBox[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
             18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 
            34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 
            50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 
            66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 
            82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 
            98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 
            111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 
            124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134}]}, 
          {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwN0WcikAEAANDPyKpLuJIjOIBuIZQ9s6koe6+iKFI2GRnJnpHIiPB+vBO8
2PjHcQkhQRAk8oQkkknhKc9IJY10Msgki2xyyCWPfAp4TiFFFFNCKWWUU0El
L3jJK6qo5jVvqKGWOuppoJEmmmmhlTba6aCTLrrp4S3v6KWP93ygnwE+8olB
hvjMMF/4ygijjDHOBJNMMc0M35hljnkW+M4iSyyzwg9W+cka62ywyRbb7LDL
HvsccMgvjjjmNyf84ZQz/nLOBZdc8Y9rbvjPLXcEskMIJYxwHhBBJFFEE8ND
HnEPWepewA==
            "]]}, 
          {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
           LineBox[CompressedData["
1:eJwV0Vc7FgAAQOHPD7CSLXuvRGSPrJT5JZuQKHvPbAlR+MVeF+/znPuTNr0S
XA4JBAKXhIowwokgkhdE8ZJoYogljngSSCSJVySTQipppJNBJllkk0MueeRT
QCFFFPOaEt5QShlvKaeCd1RSRTU11FJHPQ000sR7mmmhlTba+UAHH/lEJ110
00MvfQT5TD9fGGCQIYYZYZQxxpngK5NMMc03ZvjOLHP84CfzLLDIEs8zVlhl
jXU22GSLbXbYZY99DvjFIUccc8IpZ5xzwW8u+cMV19zwl1vu+Md/7nngkSfz
cyxd
            "]]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 90], 0.011111111111111112`]], Thickness[Large]}, 
          {Opacity[0]}, 
          {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{True, True},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{False, False}, {False, False}},
      FrameLabel->{{None, None}, {None, None}},
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{None, None},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[
        GrayLevel[0], Bold, Medium],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.14628669061428093`, 
       0.48133040137602107`}, {-0.11376897325303362`, 0.0768733938258108}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pL1000Data", " ", "=", " ", 
     GraphicsBox[{{}, {{{}, {}, 
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
          CapForm["Butt"], LineBox[CompressedData["
1:eJwBwQM+/CFib1JlAgAAADsAAAACAAAAHH0OD3q35r+MdFBx6aGQP8/7eYtd
r+W/PEzcUTPmlD9y8+2haabkv/G9XZdubJA/LyHgFHCd47+bZItfYgWFP+tO
0od2lOK/fwh/va4dfD/Z6MCzcYvhv8W2qCUEZGs/lhazJniC4L+PnzipkjpR
vz+wUcET896/nZUySc5hab+4CzanIOHcv/E9ruH86mG/zI4hG0TP2r/Oc2ve
Q9NPv+ARDY9nvdi/YMPZUd40HL9ZbfF0dKvWvzrOkxWDUlM/mXnHPlSZ1L/t
Ww2spINKPxLVqyRhh9K/t/8rtT4bYr/Cf54mm3XQv1wbgnt6mHG/Pmf3/CLH
zL8NkU/ePAJevy8ewMg8o8i/i3itGiVuQj9WJJewg3/Evy8rhIbtQUo/Xmen
CH9cwL9ugYHJj2pHP3EkUZBub7i/YRc0emPGZD+BqnFAZSmwv0jBTW05P6a/
2QDQ/VZ/n7/qXGjH5+rBv4pw3hrkjFk/OzFv8Yityb8JSNIihl+hP/ksIubT
VMy//Z1IYcz1sD//WILu4jbNv0hIRuJbP7k/cTGmH8XGzb8c4RKZssLAP7NQ
Rv0dCM+/QbaRWXrnxD+AoI3jVgLQvzlzgQF/Csk/Rc6HtrJS0L81MHGpgy3N
P7Ou9OKunNC/qwL4tCWp0D+Ac4OdvfLQvynh7wioutI/MMZWNwho0b+8Sy/p
C83UP3sdpsPj/dG/OConPY7e1j9qJZqLgYjSv8iUZh3y8Ng/vqnHdM7t0r9J
c15xdALbP1ceMI/5YNO/2d2dUdgU3T+TNyUVSevTv2pI3TE8J98/RHMEx6lW
1L91k+pCX5zgPy4mVMOesNS/s4LmbCCl4T9yrTIDMjnVv/s3Bl1SruI/Oq6Y
pfWu1b85JwKHE7fjP1IqWZPp9NW/hNwhd0XA5D86onetDlzWv8LLHaEGyeU/
D/z+1gm91r8AuxnLx9HmPzGUr39yJ9e/SnA5u/na5z8CAJLa2bPXv4hfNeW6
4+g/jopDni4r2L/QFFXV7OzpPw2X/gNGrti/DgRR/6316j8kF73wIyDZv1m5
cO/f/us/E8dLZGiE2b+XqGwZoQftP7rnAtOpAtq/312MCdMQ7j99YsEjpZTa
vx9NiDOUGe8/cM0ZWB3o2r80AdQRYxHwPwre8boSNdu/0/jRpsOV8D+PxTud
ArXbv3LwzzskGvE/rUPRkkgf3L8Xy98zvZ7xP9XlZ8FaTty/tsLdyB0j8j9f
R8jI/H3cv1qd7cC2p/I/+NAYZ5vb3L9FjPmT
           "]]}}, 
        {RGBColor[0, 0, 1], PointSize[
          NCache[
           Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
         CapForm["Butt"]}, {
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
          CapForm["Butt"]}, {}}, {
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
          CapForm["Butt"]}, {}}}, {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.7098970693658972, 
       1.1659457718140716`}, {-0.45090375011501704`, 0.02040939509522509}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";", "  ", 
    RowBox[{"pLen1000Data", " ", "=", 
     GraphicsBox[{{{}, {{{}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
           CapForm["Butt"], LineBox[CompressedData["
1:eJwtkA9MzGEYx8/5Ey00RoQmhjA01fRH3ifCrjV0bP4lY7rd+ntr7VaXpHbX
ckp3XV3dlS6KjQxxclbmJczfJa6FMHRJ7nfdVe7i0nG/Hs/27t3zvt/v9/O8
r//RdH4il8PhRLgXu7dmquZJ68rpwZgc2cjpLyTIXTevq+i2YGna6vVficwc
Z/CjZTQge6ztavNXwrhbWbuSim9VLJ0e2kP47tb8SUH/ksn8pic95IE9IL70
Qyltu9aTaYk3EQV7MFpCP28O1jTbTMSzq14U6VtMO9WqQmVFL2FbzzA5NS73
XZO+6xvm7S2ileHaO0dn95GXL9wlLqS9TMMG4/s+otW4q0JKLQZ+pb7xO+bp
C2iLTskdy+rHvDcnaaDTrvSM+EE4bJlyaax2lzN0mplsYg3+Ehqz4Yspx2Um
b1n9YTGdsS/5lnGUISzuRU0G1XecqpUPWohQ4K7mVLq+foe4gRnAvEABHd85
NlLHzrP/EG1RL89zFFmx18RSaVVLqw/PQjjB7I96gPD6onzJIoZQNr94JxwP
SBnO4zHk1TgwASBpwXMf+/+eEcCHzqht6XctyBOlgbr76bFJuwfIeNxoBtSm
bArp5lhx3lYxeD7Wa63tVpz3hASqFvaJwvbYSBU7TtQJCIFn85bcs+H/TciH
pNC4hM7Fg5jXUwDqQ/MfBWUNIu+hFLYzUN1qHET/hUJYebg/whQ1hPmFRZDj
6haGNw6hXiiHhKkL1+m9hlHPK4YVGUx0eO4w6ledAf5rS/j5kWHkT1aAV7DR
mpfwk7DXAocCsrd6FCx79RPf800JuQKfKN1BO+q7ykBxF64kvrMj74kKclK8
pyjiHeg3lIPEWiyc+tGB77lUAeeanBPSY0fQr1HDrCP3bXOejqBeXgljFwNE
ZfALeZIq2BhNeI62X6hP1oAxNdBVzv+NvHgtfDwwMVHf8Rv1sdVAuJ+HbkQ7
kRdZA5dv6wdm9jpRv/Ys5L/0breXjCLPrxYMnI76G7P+oH+GDlrkvMj3l/4g
768OaraGNIkyx9CfVQceusa5si0u9NvqwFcrNnNtLvIPSmTSRg==
            "]]}}, 
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
          CapForm["Butt"]}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
           CapForm["Butt"]}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[1, 60], 0.016666666666666666`]], Thickness[0.007], 
           CapForm["Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
           LineBox[CompressedData["
1:eJwVxX8403kcAPCR8uO7yTx3ujxHklGNHsodRT7vy48m5yoajek81YacLUIe
P2o6a9Fom4VH0Zf5mbq6uvwq9U1PhUJFXfpxtbFGfm7ciUZ398frea3ezw/h
GJJIpOD//L/r9MjSHFxOCNz95+h+SrRhlXmm93k5EZ5nSW8KUCKXoI26mWI5
8dup3lvbApVovSL9L84ZOdFjupsU+ZMSrQnFmrYfkxOf9y2aSPYqkdV151iM
LSeqPeJdyAlKpE/id8lWyAndlW2OwUVK1KGbKagoKCS6w7P0MyNKJOK1JN7g
yIg/0kaozVUqtFy9/mTqLinhs/kjZZY1iPpfVA7UgoRw99DOMi2H0PHcOsqF
TQVEq21g1UrVEBqO4DxiUMTEVM89d1mDGpU7nPV+15xLrKPmt2cVfEC9Q0/p
YXwR0c7ZMfxjqgbJSmOPOQULieM7C71HwoaRgpGUo9afIOwI285PoSMoYOz5
+EKfgHCdFwZlBn5ED8n5F8fjswhWb82gq+8oKnPb8765L4346NrpU8YeQ8U/
9L7xzEsmZrOso3kJ42hvTrTAoZNPvKMuf3wbn0C8n8MQq55LJFSjyxWvJlHJ
6tgVk8Fswsf96UCYcApl56cW2//uS+g0vpUKVy1yKBfJ1aKtYFuTOvbwhRZx
Q2PSbSkRsI8Xz1RLdeiGsLL3gisXDrd2ZC/fPY0On67vD2jjgdrK/kmI2Qz6
HK4T2hgkg8F3EqHp6xlk/eX1K9WeNBgcP8OQVP+NfFsaNmlkmXAt+WKx9Mg/
KPZul2VukQD6yrWOLZGzqOwqZ63frRPQWq9QPvX+hIS1+XmWFkLo+aI/yt4y
h3S1dTwSSwQMt/aTrK3zqPta3GRhei4MHn7C8PP8jCLuN93a0nUarM27CudD
9IipanAU6fLh283taVs4Cyg+JzB3zlgCS+08pA6Ziyjn3K+0Fhcp8AJkJEHj
F9TfZCF5hGQwbC5uLD1CgoXwIVwTWwgB25mbvVYZQNSCmSDsmBwyQg9Suu8b
gMCJbscsOAtxA6pGxDeEzOdSbtSNIrj3WmjotmEJXDkVlNHcUQx64xw9W7ME
bt4J+t5mugRSdoT+MtpkBHkZ/teo35TCJNnRZV68FCTeMv3edeeAjTx1vMhl
wM+mjdfvPg+JjotyEz9jED7CLgVzyyDqiVtiI80E9pWO0rNTyiGBZzoHmClY
jFNDbp+7AF6lfXVaihlkVfqvcQrHocY5tKrNBIO8Z852YhYO3LKM+o0UDIoM
v7LRRuJAu9R+qI6KwdX9Kqub0TgcaF5rX2SNgcr+uNnOQzg4eLXGpDtjEKBo
1qZm4dDp4RbH3YWBeRWdeKDAoZrg23WXYGDdb9lGr8HB1lijZpVh4GQ03yKp
w2EyOiZeU4EBHOy4HnEZh8RPBk1GDRgkOXBqJxpx6BBY7WG0YfBnVXmBVRcO
DxLFd6eVGAz1C09nPMbBqeFokfgDBlNGCafe9+AwsBjr4jiKgRnH68TFPhxe
TrytiJzBwJv2MsXnLQ6MMWld7zIyMJh3khTvcNjfs0HKw8jAFNbwTVQ4xGx/
5m1uQQaeOjnu2QccjCsuv925kgzpX7O5HiM4BL+n9WltyCDy9z1wfhSH50do
Yrk9GeQp66MNJnDYWvLYxNOJDHg1NYo7hUPcGa/AN3Qy/AsxAE80
            "]]},
          Annotation[#, "Charting`Private`Tag$279108#1"]& ]}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.02], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";"}], "\n", 
   RowBox[{
    RowBox[{"pL600Data", " ", "=", " ", 
     GraphicsBox[{{}, {{{}, {}, 
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
          CapForm["Butt"], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAGIQnf7ghK9o3eP9e5ttt1/0K7NPmtD60Gn2o/01IT9W
b5vbbB/n4FRasOPh/gPXxafZ3S+0j/zwj2Pe1Qf79UwfSLcVxNuvdCi3nP70
/n6PazbL2ad77p+/4EPCJ/l7+z+/fb/VPyNn/zSGrA7fqDv7Xxy68HJmR+T+
3oTH61dMubWf2eBkoJizwf7mAzHXmc/f2L/XWz1eUc5qf5XCtX9xnNf3H7m8
T9vqrPX+ggZ/tV3OV/fv9xExjjVMsYe49/L+6EjvvvPfSqDuu7j//k3z7D0s
xVD3nN9f6DN5OWeLANT+M/slut9mfsiOh9p3Yn/BzJMuXbn+9hDzj+6fv7H9
ol5D2n6IeQf3zzaa1n+XtwCqf89+lr5Wi3ROM6j6rftXHJ6z9YZGlD1Efs3+
9Hlbs9pjZkDVz9l/7m2s9vIXm/czQIGMvFDJSs89MHl7p67bhWv9Yfw19nkn
SlP/xe2C+nervdj3I7NbTHfC7LdfypETdej3Dpj77FcXxLUrXd0BVX/Ufgtj
2IdIvh0w/9kbaM5dHnxgB8z/9u0lL5RYq3fuh4aP/Y3VF4K+M8LMu2gfIzu3
yWjZtv3Q8LU3TVi7T/LMNlj4269ur7kSbL0dFj/2yz7mGDe5wey7Yd98QefV
rEU7YfFr/yUwrurnF5j779hfvm3a2Wi3C5Y+7Bm9J73hfARzz337GyrH3vfz
7toPTV/2lZ8/5pbc3QV130P7a+kN6/QW7toPTZ/273ctaf/Qvwvq3sf20awN
74pldu/PMeDZ9Tzhif3l6sSGVzN3Q93/1F7M4vDurmu79pdemDSpR+2Z/f+z
K473Tdu1HwCYqpBM
           "]]}}, 
        {RGBColor[0, 0, 1], PointSize[
          NCache[
           Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
         CapForm["Butt"]}, {
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
          CapForm["Butt"]}, {}}, {
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
          CapForm["Butt"]}, {}}}, {{}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->{{-0.6091410178405682, 
       0.6922057020915547}, {-0.1105907824490169, 0.009578158496007065}},
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.05], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";", 
    RowBox[{"pLen600Data", " ", "=", " ", 
     GraphicsBox[{{{}, {{{}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
           CapForm["Butt"], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAGIQDQYLphxIsDb8nvn7kT2Yv2HyAbndp2viZzyG8A9M
OmC0Zf+OiVxPIPwLEw/0dS/8e7QXyn8w4UC9ldLd10JPofz+AxsfWXRXzIby
GfoOZD9yXb/S8RmEr9Bz4AqzF3vASyjfoeuAaJmAlnDvcwg/oeOA7k7ubXpm
LyD8hrYDOuKVjXO/QfkLWg6Y3zr9Inv3S6j7mg70Tjv/ULPwFdT+hgP6ZwTP
zeZ7DbW/7sD8S7kJdw9D+Q5VByrTbuVWL3gDNb/swPLiBYZhQW+h5hUdWBzY
MJtB5h1Uf94BZtvHcs5i76Hq0w78BwMonyHugJGI8kUnjg9Qvt+Bj9cf7Y9S
gckzMEw+VZXp/RBmnp9DoEj/3dR9cP0OdYl9BfdKPsDMd3h6t09BgPEjzH4H
51LzacvqP8Lc56Cx/9LNHIZPMPc7FBqCIugTzH8OTVkPT3VwfIb530EqjHFJ
R+NnWPg4RHhYpbbrfYGFn8OziK0H1937Agtfh9eCVisMC7/Cwt9hcvsFtVMM
32Dx47DrFKPl95ZvsPhz+CceJMrF8h0Wvw67p7+Z9X/Bd1j8O8TwZoTxO/+A
pQ8HWSO2lsrfMP4Eh98KXWu0V/2EpS+HdyV8Jse8fsHSn4PS8lTGW3y/YenT
wbo/xTTrMpS/YIpD+p3kE486/0D4E6Y6qDlaH33l9hfq/mkOsybOWy5q/A/C
L5juECr95tVZkf/2ACDUCq8=
            "]]}}, 
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
          CapForm["Butt"]}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
           CapForm["Butt"]}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
           CapForm["Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwd1Gs01HkcBvD50wiLLkpYJrqIdqtditDu94tqtoTcEg6zTU2yO4WplHWJ
0NS4ZMzs/EOJU3ROOqF0T+fH1mkroraOyuxOhmJyGw2acV27L57zvPqc87x6
7LlxQTw9BoPhN5P/erpVpZ4+LyX2MeK0RR1K+O3hmK/orJS0KYpjmZ1KGL31
1aUFRVKy2oUl1HQpoa90VZRToZQITC6Ft/Yo4R0/4UlQlpRorYKictVKqDPU
lVfsk5LUDkmnKaMTfkHDYN/vpaRcbT7XbXEnvK52uCFrlJARjovp0uhO2FzB
bch7WUiu5FdIIlWdoK9+0cv/LCZz+do1HQe6wCH5Nl1rISYFj2Whq0a6oMum
NGeHYwHJHwr7oVH0AeQrDng+luST9T2sNSzrj7Dcp3SwvDaXbLYOrq258xE8
Ffcr2W9ExFsw6+HdiG5QLfcurmedIsyXE06jw93QVPTIdhiEpMZH7l5X1gPs
29V/j6Vnk4QsRRxnkwryw06WNT3NJOHNzX26TyowXsbRRA9mkNklntJDFz4B
q+Ts8QaXdMK0js5zDemF52k1Pk8qUojhebZk0rIPdH/OOlkxcpT4TAUJ8hR9
ELLPYdOS7MMkNNUksepcP1hxNy6xe5pATMU8XkzCANhyOeqUc3yy0us3g6gN
g9Bet1p+bx6PGN0wrrebowbZwvhLfkGRpHazWn9xhhoOfBuv2Tq9lUxHcKO3
D6hhvrYbO1sWYaPl1P6umCFQp8MkjPpjafMcQbJ8CEzG79eqnKOwjle//UHg
Z5jgHRKEGe9FY4ZnQeSrzzDvYpy1bpyPW6r8pScCNXDZwt1rm5cAE93Ms9rl
GrgWHjXI1BzGHP7Jq4mxwyBi1y1bzEtCbuWTehv1MGjfmXncsk9FesHVLLMT
I1Bi4v9rWEA6qi505bcsHIX+lZWuhszjeKNBeJ5TOQrGNgyBVpGJO4paI/js
L3Caq4m3LMnGrj8sYm91fAFFco/iSLIQVY2nq9PytEB/Spw/e8MpzDAVp6Gz
DjLfWHg/04gwvGbqjLZNBx5Ftzuet+aiw9oW15yCMQiv1mzUy89Hv7/eLjjo
NQ722yxzPdYX4AetejLCYAK+S4dDZsvFaIHKVvPmCdBEu/w4RhXiK0ODn2Jz
JsFmhSPJHirE4GucBzs5U6ArUi11eiHBNlvfloKV0xDX5GIQc0WKu5JCnw2N
ToNvT1rZxuLf8bmhkuW/n4HtV2U2HkdlOOjzNW/XOwbuGe92sUqRIURmtvjL
GdjHdvfVHpNhWny4YMM/DJx63550UyhDvb2xuyyVDLQzt29zpmVoxGn+8FI1
449Uib+5KcODzIC8IB0D+4EY2A7LUDZclZViSWFi7jzWxBcZprJ2GyVYUzj1
hruufVyGve47H/NsKJwrYO4p0qfx3mGLwQA7Cp0vbm1YaE7judTiAQfHGW/4
OtnMmUae47HrCrcZH+Ig6V9Ho9EFx5Y2dwqF5UcuN7nTWLMiaVmrJ4VnPKzf
irxoTK52SmkACu/yOa6zA2mMOpHxvpJNofedGr+PITSutbJ5WraFwmdMPd6j
nTSKRYX9xb4UyksvSjJ/pvFYxirl6QAKeb0jl7l7aPTZxLkuCqRwwI3d6LWP
xuHdwgfZwTP7ss68tePP+LQr+hmhFP7/X3E0yl1fH08Jo/Bf0OpafA==
            "]]},
          Annotation[#, "Charting`Private`Tag$9983#1"]& ]}, {}}},
      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
      Axes->{False, False},
      AxesLabel->{None, None},
      AxesOrigin->{0, 0},
      DisplayFunction->Identity,
      Frame->{{True, True}, {True, True}},
      FrameLabel->{{None, None}, {None, None}},
      FrameStyle->Automatic,
      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
      GridLines->{{0}, {0}},
      GridLinesStyle->Directive[
        GrayLevel[0.5, 0.4]],
      LabelStyle->Directive[FontFamily -> "Myriad Pro", 
        GrayLevel[0], FontSize -> 16],
      Method->{
       "OptimizePlotMarkers" -> True, 
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
            (Identity[#]& )[
             Part[#, 1]], 
            (Identity[#]& )[
             Part[#, 2]]}& )}},
      PlotRange->All,
      PlotRangeClipping->True,
      PlotRangePadding->{{
         Scaled[0.02], 
         Scaled[0.02]}, {
         Scaled[0.02], 
         Scaled[0.05]}},
      Ticks->{Automatic, Automatic}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", "\n", 
   "\n", 
   RowBox[{"ppp1", " ", "=", " ", 
    RowBox[{"GraphicsRow", "[", 
     RowBox[{"{", 
      RowBox[{"Show", "[", 
       RowBox[{"pnL", ",", " ", 
        RowBox[{"(*", 
         RowBox[{"pL600Data", ","}], "*)"}], 
        RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}], 
      RowBox[{"(*", 
       RowBox[{",", 
        RowBox[{"Show", "[", 
         RowBox[{"pnA", ",", " ", "pA800Data", ",", 
          RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}]}], "*)"}], 
      "}"}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{"Show", "[", 
    RowBox[{"p1", ",", "pL800Data", ",", "pnL"}], "]"}], 
   "\[IndentingNewLine]", "\n", 
   RowBox[{"ppp2", " ", "=", " ", 
    RowBox[{"GraphicsRow", "[", 
     RowBox[{"{", 
      RowBox[{"Show", "[", 
       RowBox[{"pnLen", ",", " ", "pLen600Data", ",", 
        RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}], 
      RowBox[{"(*", 
       RowBox[{",", 
        RowBox[{"Show", "[", 
         RowBox[{"pnA", ",", " ", "pA800Data", ",", 
          RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}]}], "*)"}], 
      "}"}], "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"storedEqSol", " ", "=", " ", 
      RowBox[{"NDSolve", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"StoredEq1", ",", " ", "StoredEq1", ",", " ", 
          RowBox[{
           RowBox[{"\[Delta]L", "[", "0", "]"}], "\[Equal]", " ", 
           "\[Delta]L0"}], ",", " ", 
          RowBox[{
           RowBox[{"\[Delta]A", "[", "0", "]"}], "\[Equal]", "\[Delta]A0"}]}],
          "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "endTime"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"\[Delta]AA", "[", "u_", "]"}], ":=", " ", 
      RowBox[{
       RowBox[{"\[Delta]A", "[", "u", "]"}], "/.", "storedEqSol"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"\[Delta]LL", "[", "u_", "]"}], ":=", " ", 
      RowBox[{
       RowBox[{"\[Delta]L", "[", "u", "]"}], "/.", "storedEqSol"}]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"pstL", " ", "=", " ", 
      RowBox[{"Plot", "[", 
       RowBox[{
        RowBox[{"\[Delta]LL", "[", "t", "]"}], ",", " ", 
        RowBox[{"{", 
         RowBox[{"t", ",", "0", ",", "endTime"}], "}"}], ",", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Darker", "[", "Black", "]"}], ",", "Dashed", ",", " ", 
            RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], "}"}]}], ",", 
        " ", 
        RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
        RowBox[{"LabelStyle", "\[Rule]", 
         RowBox[{"Directive", "[", 
          RowBox[{
           RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
           "Black", ",", " ", 
           RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], 
       RowBox[{"(*", 
        RowBox[{",", " ", 
         RowBox[{"FrameLabel", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
           "\"\<\!\(\*SubscriptBox[\(\[Lambda]\), \(0\)]\)t\>\"", ",", " ", 
            "\"\<\[Delta]L\>\""}], "}"}]}]}], "*)"}], "]"}]}], ";", 
     "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"p1", " ", "=", " ", 
      GraphicsBox[{{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzX081AccwHEuS13zMF4eihRhbQupeb1uqb63k6WWp7C2meRxu06vkVJR
J04S8tD14lZkq+R6ziUZ8u10qDhxHlJ07s793DHDnet+SWrtj8/r/efHMfr3
nXEUAwMD/4/9ryM32PxqYCZ81rnA4tfQBjQtjohiAQfu1zp4XkhswHcFTIGb
RxbIywIs2vMbsD83I1Rgmg0x+MRjYUsD5mdW8xrEpyAzvOI3ilcjztXlmKsq
i0CYVx1qY/kA4/lq3uwqHvQYL6nsb2vCCz69oWZFl8BKUnExkirEkHVYnaiq
BgE3Ybo5SoQHQizdTY79Dc+eNdns2dSGC6YXNm5LeQgdftOHjvY8wYFW9so6
tggGOcZn8lgd+M4lBeiMx7DDteou/1on3rBSlyf/0AHlDPGZu4e6MLe8RCP+
qguiie63ZEY3xusOayYXSyDSr/+PKywJ5nBti+PMe2EvBn5nHN6D3XrShKnr
g6VPzEp07r2o19Hfj3Y+h71q8Qna616M8t5aUN/9Aq66ZrEpj/pQ53t6bplg
EC43+ZrvSutHMa9oUXf9K5Bo+end3s8xM3s+x7B+GHpP13hv1z5HD/uw5Mh2
GQTVeajjSgeQvpSqVYvl8MvInTWXfF9g3JvdwzRUgG74ZrKf8gXeTDtTdlc0
AvYnHAJi819iTEcql9WiBGZtwTor90F0+0CZHashIH8q6y//5kFc1s9059aN
Qp8fwzJjzxDaFSZKKNdV4AuVja7aIcy1WnPnNk8NAfNJos3pr9Ce3hpx8twY
7MtbLKm0lmLzDoNUl7xxiLRIelR0UYp587bxk4X/QNRQxnEVbRib00bzdIUT
IJHz23a1D+OnQyErhex/wWE0PIHzhQyPyCqy6jImIZefzaraL8O3rXm7UpKn
wKRP6s6tleHBTdYC2tppiK7S9Lx6I8P0sbA/2+9Mg3HmSwaHLkduNtEiXK2B
Lewu3gqOHOsOxoaIr2lA7SQ7Z9cuR1XYetuNzlpwdzt2a5WpAsVlQ0e2ndeC
pVVLcE2gAkVeB30S7GfAeekhuFGiwBaM2KI9OwMiocHY4wEFDpz3unnaRgcO
xx6kBq4cwYtSlaCtVAdDJZcE++JHMMVifCrW7DVsVqemCatGMJw3eNam+DXQ
KTIGZ3IEt5stT3Kj6iEo0VmWsVaJ0xO0cflxPRgFl0+4JimRb7+l/bohCTHv
Swo33lfi3k0VIwNHSLDTcjmlb5Q4ZzmdrkkjYSenj94wq8T8cbo9lU2Ckcme
eelbJd4uVYR6Z5KgvxZ8wHVeiTqNS2t5Lgk9LMFP9wwJZF+5wY8+TwLTWkTp
oRJYbFa/b6KRBN/2iS6T5QQ6jVKpnyAJNGfLw54OBNY0hl9ZLiThllmhQ9gK
AvuZ89KAFhKOOp1iljkSuExED6oWk/Dj0yLyS1cCLx9uW5ciJcHTiKHb6kGg
V6DtswIZCY6lk0WstQS2ujBZVQoS/O/p1xR6EjgmoV4eGCVhNdUupn89ge5u
AVbeUx9/25raYmkE4oKK6hANCd2s4MicbwgMejnlnzBDws+GPvrrGwhMPlmc
XU6S8FTPcJrZSKDRboVT7SwJDNOd9603E1jy9XrsnCPBZ5Hw+w1A4OdLssJV
8yRY0ouGI+gE1sl7yQ8fSBCZP9yf8S2B/wG5FaeU
            "]]},
          Annotation[#, "Charting`Private`Tag$141711#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{False, False},
       AxesLabel->{None, None},
       AxesOrigin->{Automatic, Automatic},
       DisplayFunction->Identity,
       Frame->{{True, True}, {True, True}},
       FrameLabel->{{None, None}, {None, None}},
       FrameStyle->Automatic,
       FrameTicks->FrontEndValueCache[{{Automatic, 
           Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
           Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
          Automatic, {{-0.6, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {-0.5, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {-0.4, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {-0.3, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {-0.2, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {-0.1, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {-0.7, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.68, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.66, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.64, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.62, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.58, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.56, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.54, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.52, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.48, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.46, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.44, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.42, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.38, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.36, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.34, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.32, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.28, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.26, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.24, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.22, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.18, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.16, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.14, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.12, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.08, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.06, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.04, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.02, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0., 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {0.5, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {1., 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {1.5, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
              AbsoluteThickness[0.1]}}, {-0.5, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.4, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.3, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.2, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {-0.1, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.1, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.2, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.3, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.4, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.6, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.7, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.8, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {0.9, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.1, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.2, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.3, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.4, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.6, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.7, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.8, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {1.9, 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}, {2., 
             FormBox[
              TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
             0.}, {
              AbsoluteThickness[0.1]}}}}}],
       GridLines->{{0}, {0}},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
       ImageMargins->0.,
       ImagePadding->All,
       ImageSize->{57.184873949579014`, Automatic},
       LabelStyle->Directive[Bold, 
         GrayLevel[0], FontSize -> 16],
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
          "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
           "Effects" -> {
            "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
              "Droplines" -> {
              "freeformCursorMode" -> True, 
               "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
         "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
         None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
             (Identity[#]& )[
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& ), "CopiedValueFunction" -> ({
             (Identity[#]& )[
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
       PlotRange->{All, All},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
       Ticks->{Automatic, Automatic}]}], ";", 
     RowBox[{"p2", " ", "=", " ", 
      GraphicsBox[{{}, GraphicsComplexBox[CompressedData["
1:eJzt2/dfzf//P/DQoIGUSiIyErJHGT2MikRJA6WUEmWkRSokKyFS2pOGEKWE
1qNFu86ejXPauyhCqo/v5fU89/cf8P319IvLuTzreZ7j8bjfPa6Xx23xKZcj
p6eKiIiYiYuI/L9/H1v1UdQLirGC6rIqhwAbpLhf4fWrlcX4jlsPPdVRG8dt
2nVLM6IIe/bT5vDjrNHyxc5WGWJFWEv+RXAuyRydmL/ijGNHIdY7JLbJU+Ug
Pj/io3i+uADHW1bckpCSRz619eWuMfnY79O106ky1uhByhKvK1fy8O8OxTfd
Oftw1I0rK64dycVLHkjutoo6h18dq2b5a37Guh5huWxxE/x5ver9gOmfcH3U
9YuayWqoUtJdO6g1B3/ztN3Y9tsQsVq/docUfsBJE4+mzzPfgLvylaMiI7Px
MYXwI62PzPGvZxcPxHtkYdb9t3/cFR2whEvJnyTj9/jj4UPaC5Xm4//uNxMP
tKndzfa9QNxfBtZa1XzZvsgD/Xc/6ThJyT3kicgp4vpf4y/rUiqL9toS15uG
ZQJH7Hn1ZsT1pWCXW7FSn99cQv9dTxJeeazAYlH0EfTf9z/HZnYB594M2xLf
l4AX3p/TtP2VBXH+aCyN3l15sf8Q/u98YfjbFo3ZhqEWxPU/xcGP9w8dmmGK
//v9B9jgaVf+k2Rz4vz+uNAvLMRew5D47IYNH4oxNRwckQjxw6zNUbazDibO
54bOL2Zc7f+eRXz2RymHW8IczfIE50eJJhUhoz35gu9H7vmcwOtSWHB9aIlj
HelwCSZ+PxqdPpDCS9hUhIn7Q4Yf7cW2pRcRf/8cDdtmXaSYlRDvKwlRR6jL
QoNLifOloA2Jb7NeOJcKni867bv3uIVoGXH+18hXb2Pnt9ZSYrylI/08pC7j
UUp8XwZKmWy/Oy2zVPB+0TTnYCUX3zLB+0c1ZD1z1eVlgvGBzr2tyh/w/SIY
P0jaxzDQVLkcE+MLJZJLjETby4nry0F2N0NmRVlWCMYnqnhroWkRUiEYv+jx
et4KWma5YHyj4bqOuXPflhPXn4fW6+4J3TFSgYn5gW73v0y0kqsUzB9UJmf5
Ml++EhPzC60+3btA36qSuL8ihKstdg8erhLMTySVd1Ymf0k1cb/FaH3Dq9Ox
ydWYmN9IjRSh941XRdx/CdJr91VSy6vEN/wj1NRaStCBO0NOra2VxPMoRdHm
qa01z6vwpTRdNxWJMnR4Z0SHY0c18XzK0HqS2J7K/BpsSxoqVlj9BeVa7L8t
nl9NPK8vaPmS++U0+WpsMhojK2vyFdGXxzjMba0mnt9XdPFZ2U1ZqVq8e6GB
ndTlcvSpaItG2Y9a4nlWoJ/29amfmmvxBr0fGWLRFShnk71je0At8Xwrkcex
L82l/rVY7XyiiEhRJYp80H9U8mUt8byr0Lf9q5Oc5tfhOSGHDv9pq0L3Op+d
KYytI55/NcocLznalliHp+X+jh+ZUYOs47oXkel1xPuoQZlmmxzLbtfjYV7y
4MCaWlQR4nUiajaJeD+1SGUyOOWmPgm3SRxB3aZ1yDtyuforSRLxvurQCrn7
DBcLEqatmQhq9apHsWrW23jyZOL9kdAYta7m40kybllpPjhgREI7X75QHzhB
Jt4nCb19Lb0gcJCErXRWKZ7nkxC7+/5Fmbck4v2SkadimE7Av+NUkymo252M
DsS/aDOSJRPvm4xMYu/OZMeRseFppqOjOAXNnTCI2cUlE++fgkLJpy/ETJJx
qVd6UGsEBXnPDHLcso9CjAcK2lYkj4IlKHj7w1s5tquoaB3FudKggkyMDyp6
StuSa59Dxtnxx5saC6iInBjvVFdEJsYLDa3/MnLw5FIKXp21VtzqMA1dSprR
fdaDQoyff8dfTGvQz6TgpK9ia1gtNMQOGvx2l00hxhMdaf1uCDsuScUqHK65
uScdKWSyDcv6KMT4+nd8J3lrOJeCn/VnXqNIMNBd/tLk0alUYrwx0FbGQ1sv
LSqWmRKQbBzFQKW259h8Wyox/hhoh5TmtJu3qfiOvE1tzWomcs5SmJ6fSiXG
IxMF7HGY8/YHFY+rb/phgJloaW29rOIUGjE+WehJQ3LFz0Eq9twuuaDchIU0
6Oj+kq9UYryy0C/SiTFGMxUPGPF0ddtY6Mj+y9t6tWjE+GWjN0N7Zxmk0LDj
qZzzxZfZSHJOytbpXjRiPLORV9i7nzbZVNzk+TBUZwYH2WUw4h9o0IjxzUE3
2i5GyG+gY4v7p/LzojloZiavmr6MTox3DvJ7KCWp3kbD9TFabVpruCjPMbqP
w6UR45+LdoeVPAzaQcf7MmZK5xRxUd/fgXtrV9GJ+dCAHvImf/i30zAubdu4
0bQBpWyRyaveTSfmRwM6tKqhZQaJjrcyc60y2huQjWbg4Y9bGMR8aUSTM3XM
7OQZ+F3Pk1uaXo0oc5bGwI8AOjF/GtGht6uWpe+n4xUTjq9fSTYh6TTPfbNc
6cR8akKKWqbqoil0nCC7k6oe24TcD81ZMG0lg5hfTejE2Nnf9k0MrLRMbixp
bTPyW+V7KsaBScy3ZjRzlKPyaICBn2h1q6mVNP8bX2hyzkkGMf946IPHxECi
BwOLppxMNl7JQ+kbtccP9zCI+chDG/4s3mtrycRF7w5oB7nz0I+37hnPjzOJ
+clDNvPiZP9+YuBrnzfX1uTzULySM2vnawYxX3noz4Gcynt7mFi7dJGdlDgf
5Rd4tM1YzyTmLx/lGtXsu5XAxD9qpH4YGPPR5dBJcS0DFjGf+ehby2xOhBwL
ZzJ+BgRE8FHE0TjmlmwmMb/56IhtM1k2gokv8Pgq5Xw+OpjlyJw9xiTmewti
qdif7hVhYY2emgyxVS3I6NnNO2OdTGL+t6BV189UDi9g4fbhj7q6Hi3IVtI0
JOMMi6gHLUhyW2/u4WMsnDj+nOVf0IJ2qX4PsnVjEfWhBS1ODRfVkWRja4mg
88XireiaXoddyHQ2US/+fZ5QUf+ozsLKsldFRA63ovOmC7Z2u7CI+tGKdinO
ryLTWZih7BCqE9mKTlh/7jcrYhH1pBVJyRk4P6Wx8NOlxiuutbSi6GC9G8GP
2ER9aUN2Jh9aw3awsdGabfl5q9pQVl165bURFlFv2hA/RytT0YSNJbWWHf7j
0YZsVWzUstxZRP1pQ3py2xXHdFj46+7ZbVqFbchH4tSJ1+9ZRD1qQ2ah4h+z
3NnY33DsyhWJdvQ01eRj3w82UZ/a0Z4DJTUTOWysY94hlXO4HdX5dcTtyGMT
9aodjewyml3iwMF/bMjxI5HtiHUr8vq1NRyifrWj6J0Vd85XsfHHs/kbN7a2
ow9tOla94WyinnWgMe2o37UiHOzullruuroD7bixgux1jkPUtw6kSVLDm7U4
eK3vU6sMzw40KuLx4p45h6h3HcjrqsMC46sc3Hvn2uBAYQeq3nc16MQ+DlH/
OtCjrpi7ql85OPXx2Vua0zvRRbOpD/7M4BL1sBON/BV3er2Yi+0jTRXPm/z7
/EDR8p0Ol6iPnUj2glLlCxYHq77Qef0qqhPtWbhH3CGdQ9TLTkS7lfvbpIWD
uW80UHdrJ/qqN3GGl8kh6mcXOkNL68vK4uDwHHmqumYXMlou51fnxyXqaRdq
4xkr1IdzsVnRpKPj5S4UMjYz6XU5h6ivXUjilZhf9HEunl3V8ycJd6H2YlH7
RR0NRL3tQnmXmp4k9XNxDZUe1Dq9G12amxmmqMUl6m834j7K0uY84+KAxiI1
tSPdqMVMI8qwk0vU42605zH53rcMLtbtfJ1jG92NRAy+Tx4b4RL1uRst3tBj
TnNswCLfwg7Et3Ujno/Z3JZ/3/dfve5B+a8W5oVtb8D5f242NWr2IO/qfPvw
4w1E/e5Bk19tx+9OcrGX6AU3lSs9aMbxva8eBzUQ9bwHiUYd9ehBDXjTzGPi
VkU9KDCfWjvUyyXqew862SHL8JZvwN8U90ZFzuhFG+LE1o5JNhL1vheZtFxS
HCxsxOmL16xhHelFQ5u8Z8daNRL1vxf1WRx9pmrQiJ1WzStRiOlFHme5hVIB
jUQ/6EUfDikdXLKzES/bLGph3t6LVu/P6/qAG4n+0Ic8h/qiN/1qxHydwe6Q
NX3oyucHGotfNxL9og/1PPjlG1HViGP3c65RrvShmBmrlTquNxL9ow+JTqkY
D6xpxMePfJGVLe5DvnI/m964NRH9pA+tk+2vN3rahOeeyEg2luxHO/NKdfJb
Gon+0o+kD79WibrShMmno7WDTPuRgmpBrtyCZqLf9KOtOyZtP+s24yCXu7U1
Mf3o/G6t0rP5zUT/6Uf9ca6F7P08fOCqq51URz8acIsp/zTWTPSjATTm25LS
Y92MxW+d+GGwdgCNJIybz1DjEf1pAJ0plrM+9ZSHSx7uux/gNYBWnjB1OO7D
I/rVAMp+I+s15wYPXw/bsKC8eACVTvavSjDkEf1rAP325tj+/Xd8W8KCTDGp
QfSF0xb78Cif6GeDaFx+AVMjm49/pk3X0zUbRCVGKtIqGXyivw2i4Nw+c1lj
Pn6fNczyjx1Eh1zYw2pBfKLfDaKup0plWoYt+GJB0/nijkG0NSRi7oJ1LUT/
G0I8f13S2yV8/KzVQUREaQgFz5x979I4j+iHQ2iya+ruKfP52P2s5YH4HUNo
R8SS+/fW8Yn+OIRMNN77DeXysEm/caiO3RBCKxZMtGfwiH45hBZ37IlMk+fj
tW56TY13/h036C+4vp1P9M8hZBzx2+n6Az6WGd224tqrIZR0UTpIxZRP9NMh
FLc45ZRcMA/3+axzU6kfQu8rtwyf/cEj+usQalgd02zL5+MqkeX5ecP/rtel
YYnZlhai335DBXKf73j/4gvWPzjL+Oqund8TwDemV0gPx9vEI4FvKE1f3RWc
mwC+0Z3M+33GJQ58w9W3x3bIPhwJfIOhXPDUYyISfEN85u29LndiwTfaz8wz
KagKQwLfSGyd5yM7+hQJfKM5MNxp4EwYEvgGitg8uNUiHHwj8DsnwcUyAnzj
qrTT/NYp4UjgG5xfOzz8s8KQwDdkRd/f4cmGI4FvUNVd3sgaRyCBb2hLr6tz
j44B3ygYiS+2XpsAvsENnKv0pycKfKPaau3ev99CkMA3/DUXndeVTwDfOCxa
e3/zriTwDUOX9OgJn0jwjaAS+yDnq+HgG84lS1Q7gsPBN64negQ7VgcjgW/c
k3mlsH7lIyTwjdmu72pWaDxCAt+o8CgZD9//DHxjHuVYpLXqs//5hje/p239
Q/CNz2EHnY6o+4BvtDaYUpPjX4JvhJ5XsikTyQbfKDhZzJUbzgbfiG19bf+A
nAm+8VL8/mYL6XfgG28u8K0PRqWBb0heTczOWfkWfOPg84JBucb34BtT7utP
XD+aAb6hpnZwY01zOvhG19QnUy3ZmeAbZYqFS0PO5IBv+FH3uPntygbfcFD0
SNXjp4Nv+C6oy18o8wZ8I0RZnpIlmQC+oeiydvVt/6z/+QbZ47TZwTzwDU5x
Qv3n6s/gG9V/D5Rwxz+Db6i+2bKw0yoffGP9t/ETKpaF4Bvfq7WWdhcVgm90
vbSvmiVVBL7RefqVhXtuEfiGX+9gwMerReAbvwy3RPR0YfCNPb9L7E8YY/CN
gU3qW1bLF4FvmA2rfrxZXwS+8S3caHFScjH4RsDqxjkTRcXgGzLSoihStQR8
I+4gpTfjfQn4RvuhWSRDixLwje36vp7u10rAN6qiuwe0VpSCb1w3sPkxh1oC
viHil3bu1ZdS8I1ZvmLux26XgW/Y7nlk2fi+DHxDZmlS+vY3ZeAbQ7YiZ0J4
X8A33L6/uzgz6iv4xmh81td5Xl/BNy4OmprNfPMVfOO27pL7t/K/gm/M+IHF
ttV9Bd84OeW2ecmfr+AbiTLmZVrd5eAb2smbz+TRy8E3Qs5n2YSUfwXfMB8V
X1e8oQJ8ozDw18rQFZXgGwxyxTL9sgrwja7qODe90grwDd1DdkHlcpXgG35+
Tk+5ulXgG06laXpPmqvAN3rvGvwkZVWDb1TaRzlEt9WAb1xYtmLW0+Eq8I0t
d+cHNqlUgW8Yy+/xqhytAt/oTFF3fWVVDb5x7rb9nmu+NeAbSfO+qelPqQXf
GPeNWuzpWQO+oS8iucs2oxp8o1ahZKPKplrwjc3Z4gtRUS34xrwv1XFqF2vA
N0QOiHtm5FaDb4zRGeX7w2rAN1y/KGb7HqkD3wiff8HCnVoHvlHfkJqx71Md
+Eb8uRgb5vc68I07EWZpmm714BuLUpYkxTyvB9844lZ4jt9XD75x1+3axh8x
9eAbYzb+czMY9eAbV+6y5s5IrgffmGchs/+eIgl8I+Si7EcNfxL4RoXBI43t
kSTwjZ/eygGWT+rBN+LCSQsGo+vBN3IGr/c87iCBbxQEzQnN0iaBb4iHbhOT
MKkH39hR6u5DkSaBb9TcDPTad5UEvlE+e1hWdowEvrF4OOS66S4y+MbaLXIZ
Rk5k8I2jZfwoXwYJfKN9qGdaYwQJfGNglPWDIUEG30gp8WySW04G32hovJvv
s5YMvnEodIl76jUy+MbPQ2vOGc0ng2/Qzy7b4SBJBt84uupsTX8gGXzjy8Ir
OTv1KeAb3lSRzz4RZPCNnD7RnEglMviG2PEpXql1ZPCNXztPr2xXpoBvlJzt
CO9eQwHfUItpjHlnQgHfkP55ybTmIgV846pl2Q2PCAr4xp21y9slNlLBN8wl
/bz9SqngG60jhnsoa6jgG/wngzM5lyngG8+MRqNW2lLANyzMRIxl/32fwDec
P/7++MWJAr4x7aDJytVeFPANRxw4Z/IrBXxj1txsQ4vtVPCN7SNmR/ICqOAb
35fL5zrdpoJvJFhpOmzOooJvUKV3uJY6UME3AtMcf30xooJvXD63fp+hBxV8
I9uix3jXMAV8g/7JT7FunAK+sUFepDZsnAq+EXs5l6feSQXfaJ4e4R+dQgXf
yNrm49FdRgXfMOg5r5pMp4Jv6Cm464c9oIJviImU6rzVoIFvyKhtbrKKpYFv
hDek3j92hAa+Mf29iovoHxr4xhTdQGvbChr4xnGddq6OAw184xaOOXXoEQ18
I3rLoSFyAw18Q9eRo+urTAffUKEM7qxIooFv7L5wwdlLgQa+8WRdzbk9d2jg
G0rMvKUjRTTwjWf9nTbGJBr4hjX1TYRLNQ18w2D79WO8GBr4hvop7TD/f8cF
vhGxoOhP6w46+Mb+8sOWN87RwTdWXf/x8ekoDXxjSf4BfennNPCNtxZ5ew/r
08E3MmaJdU21oYNvFN+yk3+0jQ6+QVoWGLvmKR1841t6yQO/MTr4RtpQGF/l
Ox18Q6RyXEStiQ6+saL5unNdMR18Q2/W4pUMWQb4xlBy0c9qQwb4xoLZl+WP
bmKAbxTudaZYZ9HBN2bknNh4fTsdfMO/71aJRDIdfMPBx+aY2AwG+MZouYSO
eyQDfOPMQJz9n3EG+MY4f423yisG+EarGou97yYDfCO6N5dRfJUBvlGT3fjw
5QMG+MaOvKMJI7UM8I216y31MwYZ4BvX1meI+fgzwDecy1x9jS8wwDccaKkO
BsYM8A2nCRH5Ik06+Ma8X0s8lR/SwTf0Q9c48asZ4Bs4ZWBSVooJvrHpbO7U
OZgBvmHwLtC714cBvrFtxTvuxkMM8A1LzfcvdzxigG9cPjbQf+oBE3xjxWX7
0Y63TPCNoXBNA54ME3yjYDNNOXMDA3xjsU3ggeByOvjGt78nXPiFDPCN14/y
lj06xgTfWFmDNNMuM8E3BpIqjubqMsE33P1lflRpMcE3Iha7bqUHMcE32uXy
562kMsE3Thbf45tuYIFv/D1tqll0jAW+ETvpqpJ+iQm+cfHt+ZN2iAm+Iaeu
k3k6mQm+Ye+0c9hpBxN8w+3VwV89t5jgG30ZHlnHNVngG2ypaX/XybLANxw+
JgQ7/2KCbyxWTxpu/MQC3zAjs1mvv7LBN6bdmvE09zkHfENxY86ooQQHfKOG
JLYrcx0HfKP8lwn3swgXfGNs6h1/tW4O+MaJZhnP8vNs8I2HtRPblvSw/ucb
pwqCXarY4BsaYep1PiIc8I2B1euDVX6ywDdsXjQ37eGywDeW0HxyyXZs8I2R
9a97fpqywTfEfLKb6k6xwTfc5K/Uhf67X4FvmIqKLft4hg2+8SKDP+NdARt8
w97/S6F/Pgd849F0vfzNz7jgG0y7ewcH3nLBN26NpXdekIsTrI9wrUxTRI98
Auzf8HcbT99XHCtYX+FTe9+kHv4QLVh/YV3yyuyPyyJh/4Za4IdbNoxIwfoN
j1rQLHJbIwXrO3y0g9O7Sj8C9m843T1h+LIxEvZvnDnek1AZEAH7N2ixPtov
pMIF60u8qjfJmhwVJlh/4ou+6a0PQsNh/8YL7uMmndORsH/jbor17QLFGNi/
4VHC79p9JwL2b/w9kvpGf8czwfoYN5mSyu9PPBOsn/H7Mq1hunOYYH2Nxzoj
PPumRsD+jdLK4uqHQbGC9Tn2fNGuLzE3QbB+x7pl9CdRK8IF63u87dVN9xs7
QgTrf6znavciLj9U4APY5dlgxVB8COzfSNS07E88Ewz7N7yrbJcW/ngC+zdu
nFrW0R7yVOATeJazqm35+RCBX+Cl2TaT9ZN+WOAbk57K0f1D0eAbp82mSk4P
ywPfsFJmnBE1KwbfKE7sTL7gWgK+kVQlyv6k9hV84+rS83u3T5aDb5zUpqW9
nVoFvmE6O976a30l+Ebh0L125e3V4Bvqybdrzo7WgW80aAdamlnXg2+Yjepk
Ts6vB9+QvyGxQzm0BnyjRtpmLqe8BnzD/ffAiw/d9eAbpimju6r/kMA3rhpN
41YspYBvJFEKMw/FkMA3qvQHLunsI4FvrErkcOa6kcE31paIqC7hksE3iqZV
nj7hSwbf2PMhQfbQfBL4xsDWzMgPY/XgG/kus99lD5DAN57kmv5cnEMC3xBb
2NLKY5LANzQpjVek7MjgGxdlHFcoXaOAb4QsMv+ePI8KvnG3RTmwYScVfGPl
7W+bVGdSwDemGM+c9YJDAt/Yc+NilQKNBL5xYG3hBQ8DMviGddiTiV15FPAN
+fR992Zdp4Jv0AOo0j3qFPCN0xPsg4avyf/bv+FYvmaXCAV8w5G5e397BQV8
467qkI95DBV8Y8hknBR1nwq+sVO09X30v/WFwDd2nrzwMn8zBXwjLi/EY/wc
BXxju8lU71NfKOAbunqiL3wRFXxj9bRWs/JtVPCN9Fj1ny7HqOAb/NoZoiue
UME3RswsxI5uoYFvDOyritXWoINvGHw0yBkeo4JvDPGehT9TooFvGDfQ7WL/
9XeBb0zdY8SrsWaAbzDTFAJ+rWWAb6iGt11KyaeBb0x808k90kcF37hyTmLq
CjEa+MZb6T8KhzOo4Bt96lfndpfSwTdmad8dln3JAN8QiXy10OwWA3zjlkFA
aDiPAb6BCkcbWkl08I3HitY3h2bRwTdSnRNapTfQwTf89m7LOp9GB9/4fX26
X8ZbOvhGxcCsve+nM8A3GPaJZ31XMcE33v+ySvtAZ4JvuN6rqwyqZIJvuN9I
3XkggwG+kdx3rszj3//HBL6RRPvhWp3G+J9vXK6WvTPKAN/Y67m66c10JviG
89792VlbmeAb6ZpGlhLHmeAbldUzHvBVWOAbVc5NSgwFFvhGq+dJcScZFvjG
djO3KuzBBN84ufElur2TCb7RqH/SMJrFBN9ofOHNcbjNBt/Yz7LnKamxwTe2
7uRNXePPAN8Qp0S9tp/HAt/4c33X2+Q8DvhGc9whFbYOB3xjU/jDaHFjNvjG
u/y95Un5LPCNU9rfoiq12OAbaaVVJ2f3s8A3iv8uMLk/wgLfcPJd65bbwwbf
eG3TXL8jggO+MTcirsRyHxd8Y8muH736vzngG4oP1jjphrLBN1JmajRLXWaD
b+zp/nIkl8kG3+Do6vgrF7PBN1R9029VyHDAN3YuIWsfXNoAvnHAeXhmfEYj
+IbCs+xit5kN4BufmufRdr3ggG+89FPQt8zlgG9oVYdaf/fngm8cn6BsGNFr
AN+4NG0Jn6TcAL6xdZqCztC/5y3wja7lZlvGnrLBN+QSF5nstOCCb4T1/P6s
3csF3+AZJY5weQ3gG2G0iUKbpU3gG14zV/w9V9AIvqFp33t791AD+IbOlE3B
S50awDcCTebZV+c2gG9c1nP1mn+1AXwjfdrg4UeGDeAbOQmJa94HNIBvDEo4
f4h1bgTfeFDlco1r1wi+IUl9z/C81Ai+8WRU9/P2xc3gG8sohm+OyTWDb1R2
ad9kmjSAb2xb5/fo1a8G8I2EZXGy08WawDfE/UYdi/IawTfqti/7cIPaCL4x
LK306eHjZvCNguepATeMm8A3jvss/xBv2Ai+sTq4ksX4d1zgG5/uxtPt+rng
Gw9aeknPPnDBN2JITQ2KUxrBN5Y7XZJStmwC37irZHFdYlYz+MauNa/Mbpo2
gW/cXNs4mUFuAt8wC1Tk3jnOA99YzHQM/sRsBt+Yn0TraKM2gW/Quc+O3jvZ
BL4RmXDPcvWWZvCNcLvupOkLeOAbWjrSXV1JzeAbpm3qB1ddbAbfSFvlxVt4
rxl844LsuMPy8GbwDe/AK/bzPHngG4ppS50ojjzwDRVP0R9pbjzwDbmqjvqz
iTzwDXVLU++Hs3jgG4+Div32nWwG35hUaJK9R2kG33hSMlEXd6cZfCOtknYx
MrkZfONN3NRzrVd44Bv9jwaVu1154BvTO1M3ilg1g2+sDCCF9d3ggW/wHS0M
7Pa3gG94e8e8WzSfD75RyLzZE7qRB77BT3sXtciAB77xrvH4WaOzPPCNvQtz
D7Ra8cA3Hm8Vl/uQxQPfMM1/6DyswQff8E5sr5N5yQPfWFj73TmGxgPfaHn/
eBfm88A30NsAb4NCHvgG7bJkX+dRPvgG+d20Ej0lPviGxU5q6WxzPvjGkZ4b
0ReM+OAbs8wueksm88E3hoOuKjpqt4BvMEUWzJL/ywff2Dcpy9KQagHfOE6b
Rna1awHfmL4Vj97+yQffGJpf5ir6hw++cWrz9kXFi1rAN/z6R0TXL20B35Bx
DRpEmS3gGw85HW4LolvANx75z9NXvtACvpF6UOmg49cW8A3lVYe0/zBawDcq
zjbPObmrBXyDHLT0+SZuC/jGwSBR1TTzVvAN3Q2LzZZatYJv5Nt6UHRetIJv
NARqO5qebgPfUHW31z61tw18o3TZ6lHtwlbwjZNrTlBPuraBb6jWBRQ9vtsO
vjHP3u9gwaZ28I1hEScFr8428I2Yqxx2alAb+MbeqDav0mnt4Bt/E0d3vzrS
Ab5hsru2ePx2x/98o2FjPWdmB/hGuNXEO9+odvCNLT/f7euf1gG+cV4jIEpe
oRN8YzBpoPtlbwf4xlyFqR2/n7SDb1jnJFyqv9MOvnFjkfrnqsPt4Bv2pzeu
Itu2g29o5Fd/ovxpA9+ov171cOVIG/jGhpZ95s5e7eAbd3/fFp9a2w6+oTIc
4fDsdAf4xkzTxuyBknbwjTnFlRsML7aBb8zJ87X7I9UOvnEvgn7Sz6EDfOOT
VZiTzPMO8I3Hl9e0X5vXgYX5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWY
TxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhP
EeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R
5lOE+RRhPkWYTxHmU4T5FGE+5f8nn/J/UX8DHA==
         "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
           {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
            GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
              "]]]}, {}, {}, {}}, {{}, {}, {}, 
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
            LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
             "]]}, 
           {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

             "]]}, 
           {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], 
            LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
             "]]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
           {RGBColor[0, 0, 1], PointSize[
             NCache[
              Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
           {Opacity[0]}, 
           {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
       AxesOrigin->{0, 0},
       DisplayFunction->Identity,
       Frame->{{False, False}, {False, False}},
       FrameLabel->{{None, None}, {None, None}},
       FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
       ImageMargins->{{0., 0.}, {0., 3.410605131648481*^-13}},
       ImageSize->{44.45378151260445, Automatic},
       LabelStyle->Directive[
         GrayLevel[0], Bold, Medium],
       Method->{
        "OptimizePlotMarkers" -> True, 
         "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
             (Identity[#]& )[
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& ), "CopiedValueFunction" -> ({
             (Identity[#]& )[
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
       PlotRange->{{-0.13858506964671988`, 
        1.0639756959973978`}, {-0.7214453714562246, 0.039552376815216506`}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
       Ticks->{Automatic, Automatic}]}], ";", "\[IndentingNewLine]", 
     "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{"pnA", "=", " ", 
       RowBox[{"Plot", "[", 
        RowBox[{
         RowBox[{"\[Delta]AA", "[", "t", "]"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"t", ",", "0", ",", "endTime"}], "}"}]}], "]"}]}], "*)"}], 
     "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
     RowBox[{"ppp", " ", "=", " ", 
      RowBox[{"Show", "[", 
       RowBox[{"pstL", ",", " ", "p2"}], "]"}]}]}], "\[IndentingNewLine]", 
    "\[IndentingNewLine]", 
    RowBox[{"(*", 
     RowBox[{
      RowBox[{"SetDirectory", "[", 
       RowBox[{"FileNameJoin", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"ParentDirectory", "[", 
           RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
          "\"\<Figures\>\"", ",", " ", "\"\<Figure 2\>\""}], "}"}], "]"}], 
       "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{"Export", "[", 
       RowBox[{"\"\<deltaLength-vs-time1.pdf\>\"", ",", "ppp"}], "]"}]}], 
     "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8007769977531033`*^9, 3.800777035366459*^9}, {
   3.80077707225276*^9, 3.800777073100492*^9}, {3.800777130028166*^9, 
   3.8007772591976137`*^9}, {3.800777294052352*^9, 3.8007774094695225`*^9}, {
   3.800778813539524*^9, 3.800778826169702*^9}, 3.8007790654138355`*^9, {
   3.8007997604910774`*^9, 3.800799780033786*^9}, {3.800867727478983*^9, 
   3.8008677279826603`*^9}, 3.8009459257549744`*^9, {3.800946329530687*^9, 
   3.800946329737135*^9}, {3.80094736727989*^9, 3.800947367503292*^9}, {
   3.800947614279484*^9, 3.800947668919438*^9}, {3.8009482258710175`*^9, 
   3.8009483442511816`*^9}, {3.8009485412498302`*^9, 
   3.8009485523740673`*^9}, {3.800948590361399*^9, 3.800948698997715*^9}, 
   3.800971321487528*^9, {3.822467372631235*^9, 3.8224674052869034`*^9}, 
   3.8224674364376197`*^9, {3.82246752894958*^9, 3.8224675377041435`*^9}, {
   3.8224675848312483`*^9, 3.8224676508945675`*^9}, {3.8224677202152543`*^9, 
   3.8224677870625362`*^9}, {3.822467849911455*^9, 3.822467883133606*^9}, {
   3.8224679148862553`*^9, 3.82246797038885*^9}, {3.822468090014901*^9, 
   3.8224681141334*^9}, {3.8224683121453085`*^9, 3.8224684200776377`*^9}, 
   3.822468646412854*^9, {3.8224687404234576`*^9, 3.8224688567992344`*^9}, {
   3.82246891830173*^9, 3.8224689500689745`*^9}, {3.822469263231327*^9, 
   3.822469316127198*^9}, {3.8224693787985935`*^9, 3.8224693846950164`*^9}, {
   3.822469416077057*^9, 3.8224694322149224`*^9}, {3.822469479591199*^9, 
   3.822469508613583*^9}, {3.822469539647612*^9, 3.822469569031029*^9}, {
   3.8224696076308007`*^9, 3.822469607733502*^9}, {3.822469682886541*^9, 
   3.8224697069902*^9}, {3.8224754654923515`*^9, 3.822475465946139*^9}, {
   3.8224759306438184`*^9, 3.8224759552918987`*^9}, {3.8224760129806194`*^9, 
   3.8224760678448706`*^9}, {3.8224761370687647`*^9, 
   3.8224761629934115`*^9}, {3.822476260748006*^9, 3.8224762679397707`*^9}, {
   3.8224783008519335`*^9, 3.822478322184515*^9}, {3.8224783779088445`*^9, 
   3.822478407378668*^9}, {3.8224785001765823`*^9, 3.8224785402264977`*^9}, {
   3.822656274773346*^9, 3.822656376904207*^9}, {3.822656553392215*^9, 
   3.822656560670755*^9}, {3.822657077799348*^9, 3.822657079616488*^9}, 
   3.8226592753864894`*^9, 3.8307609671228476`*^9, {3.83198532027115*^9, 
   3.8319853963716755`*^9}, {3.831985438755086*^9, 3.831985563381136*^9}, 
   3.8337017213511195`*^9, 3.8337017995198584`*^9, {3.8337018661148653`*^9, 
   3.83370187611386*^9}, {3.8337019067639985`*^9, 3.8337019348926315`*^9}, 
   3.8337019675517545`*^9, {3.833702006282547*^9, 3.8337020521842985`*^9}, {
   3.8337021490768113`*^9, 3.8337021705811515`*^9}, 3.8337022063832426`*^9, {
   3.833702245181907*^9, 3.8337022717544966`*^9}, {3.833702317805809*^9, 
   3.833702362370143*^9}, {3.8337024082257576`*^9, 3.8337024497761774`*^9}, {
   3.8337024984827785`*^9, 3.8337026240967207`*^9}, {3.8337865120977507`*^9, 
   3.8337865540107975`*^9}, {3.8337865843796215`*^9, 3.833786616917549*^9}, {
   3.8343881740907707`*^9, 3.834388211019346*^9}, {3.834388274129054*^9, 
   3.834388283590363*^9}, {3.834388333821116*^9, 3.8343884896623363`*^9}, {
   3.8343885391146555`*^9, 3.8343886288552876`*^9}, {3.83438867493519*^9, 
   3.834388720496552*^9}, {3.8343888126938286`*^9, 3.834388908384644*^9}, {
   3.8343889441425104`*^9, 3.834389131092436*^9}, {3.8343902100227056`*^9, 
   3.8343902437626853`*^9}, {3.8343902738960214`*^9, 
   3.8343903325382867`*^9}, {3.834390396252266*^9, 3.8343904241175375`*^9}, {
   3.8343916046666555`*^9, 3.83439162072241*^9}, 3.834392096981238*^9, {
   3.8344831115179324`*^9, 3.8344831832789087`*^9}, {3.8344832393689933`*^9, 
   3.8344832748840036`*^9}, {3.834671874199524*^9, 3.8346719499868507`*^9}, {
   3.8347312458551426`*^9, 3.8347312603722725`*^9}, {3.834731297398498*^9, 
   3.8347313789461856`*^9}, {3.834731474121313*^9, 3.834731522793828*^9}, {
   3.8347358603434763`*^9, 3.834735872195882*^9}, {3.834736695131233*^9, 
   3.8347368436811914`*^9}, {3.834736876060066*^9, 3.834736876878252*^9}, {
   3.834736907583767*^9, 3.834736927186511*^9}, {3.8347378279397354`*^9, 
   3.8347378465800695`*^9}, {3.8347379124492836`*^9, 3.834737943312271*^9}, {
   3.8347379793537893`*^9, 3.8347380859823456`*^9}, 3.8347385051465173`*^9, {
   3.8347385898141956`*^9, 3.834738596420125*^9}, {3.834738660804718*^9, 
   3.834738665733449*^9}, {3.834738853717924*^9, 3.834738877858732*^9}, {
   3.8347389174027123`*^9, 3.8347389264392447`*^9}, {3.8347419566894817`*^9, 
   3.834742013167309*^9}, {3.834742052756113*^9, 3.834742110385475*^9}, {
   3.834742146693407*^9, 3.834742177841133*^9}, {3.8347422135223227`*^9, 
   3.8347423245266285`*^9}, 3.8347424119368753`*^9, {3.8347431263356247`*^9, 
   3.8347431559332533`*^9}, 3.8397555111150756`*^9, 3.8397558035605497`*^9, 
   3.839755841919527*^9, {3.8397558928852777`*^9, 3.839755942761714*^9}, {
   3.8397560243383484`*^9, 3.8397560772343006`*^9}, {3.839756117196886*^9, 
   3.8397561173392105`*^9}, 3.839756502135998*^9},
 CellLabel->
  "In[380]:=",ExpressionUUID->"090eaa6e-d184-4f46-a017-82c6a48e6ae5"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", RowBox[{\\\"-\\\", \
\\\"0.6998631285714285`\\\"}], \\\"}\\\"}]\\) lies outside the range of data \
in the interpolating function. Extrapolation will be used.\"",2,416,26,
   30592023927680256357,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8347422785040655`*^9, 3.83474232533444*^9}, 
   3.8347424122774487`*^9, {3.8347431292863464`*^9, 3.8347431565247183`*^9}, 
   3.839755513902385*^9, 3.839755770806359*^9, 3.8397558038941092`*^9, 
   3.8397558624241695`*^9, 3.8397559102667203`*^9, 3.839755944822929*^9, 
   3.839756078341851*^9, 3.8397561182165537`*^9, 3.839756502497727*^9},
 CellLabel->
  "During evaluation of \
In[380]:=",ExpressionUUID->"ce6abb71-5113-4aff-9ae4-198ff8731753"],

Cell[BoxData[
 TemplateBox[{
  "InterpolatingFunction","dmval",
   "\"Input value \\!\\(\\*RowBox[{\\\"{\\\", RowBox[{\\\"-\\\", \
\\\"0.6998631285714284`\\\"}], \\\"}\\\"}]\\) lies outside the range of data \
in the interpolating function. Extrapolation will be used.\"",2,419,27,
   30592023927680256357,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.8347422785040655`*^9, 3.83474232533444*^9}, 
   3.8347424122774487`*^9, {3.8347431292863464`*^9, 3.8347431565247183`*^9}, 
   3.839755513902385*^9, 3.839755770806359*^9, 3.8397558038941092`*^9, 
   3.8397558624241695`*^9, 3.8397559102667203`*^9, 3.839755944822929*^9, 
   3.839756078341851*^9, 3.8397561182165537`*^9, 3.839756502616572*^9},
 CellLabel->
  "During evaluation of \
In[380]:=",ExpressionUUID->"c9ce2f55-d70e-4456-b066-8eee49aa82d1"],

Cell[BoxData[
 GraphicsBox[{{}, InsetBox[
    GraphicsBox[{{{{}, {}, 
        TagBox[
         {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
          Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJxTTMoPSmViYGBQAmIQzbvrr0xa2rP9DFCQEeC6e0Iogn/oWU/kbhcEv0xY
ZpqAMoL/IMeKf/f9p3D+JvlyRoFIBD+s9cPTnd5P4Px5AY/X8Ro+gvN1XP0v
6zjdhvMZQtoWce29BOfHL374LOnoETif6fE3/Wc1CP4yJZ7KTBME/91CM+6C
xYfh/LoF3fq1jYfg/LlzTSum2x6A87frCwvPyN4O5/9bZ7t03q1tcL6bXob5
Uk8E/5rO3uhN6lvh/K+a6UvOPN4E56d7lGUz7VgD539zO93PP201nN/mqrBF
pmQVwv1Op/6YGayA85/YyPVlr1gM5x9I6klcaTgVzp/xa+GBMpHJcH7BpO3y
Lt8nwPkOLUd3763shPM/bP5QGWHfCucveCxt8ZmlERGebU8yAhUK4XzdRPP9
rQ2JcD4AGzqTzw==
           "]], LineBox[CompressedData["
1:eJwV0Hk0lXkcBnAU2YX0xmRIp7I2mIZEfj9ZRijLpCaFS5SdDCkHYUYNRnaV
MKe4DFkOMVTcr+zqpouyRJbLReK+1pBt3vnjOc/5nOe/54Crv507Hw8Pjz2V
/1vDRRdiIl0QWrChrYQ0wv5sb5XcI7dQyl3JocOrjTCUE9ej0xGJ7AIluob0
miACHXPgNY5FRexzr9Nqm+CthFDW1fAE9KO771LqZhOIz3G5nIEkxOBvoZ83
bAan+kZNy73pKINb36MMzbBF862Uic9GFbTmlxKMFlCwHXG0P1GAhrdrSy+W
t4F2jH0p1/wflGeqJsLitoHZ89dbdy8Uoob9zpuS6u3gd6Dq7xdBT9Hdjjra
N3o7MOZjRxXKylD0uXItz/uv4Yf2h9rLkpWINvi733fXmfDO0/hfuFOLrhkp
FunwssBH3VWPJluHSn4ub3VWYIEwGVnLU1yHjGTn1gNOssAkiNFg1MlAQ2tX
na1useAyZE2OJtSj+fI2qRmSBZ3txNKVvgakdywnfrmvE14MiYl5+LaixW4T
5qlH3WC2M1yhxpKFcrriS1sme8AAqqxXLPqR7jrzg2LJIBTsUpSu6h1BsTk1
4vSSETgddMc+wY2DrHrTUmPZbLj1VMZ7O/czehKypRZXNA76am+2RTtmUdZi
sspNjQl4s8Kquqwyjzg3E6wj0ycBg82HbZNF5G8nd/Ns5RTwqbjQFhKW0ZST
bpR83WcQq975VJu5gtpXNh7QHk6Dc5HBMIytIbNxz6YO8y+whfhvZylvIE2n
T2cjvnyB8ROugi1mW8jc8kZosO8MiMwURCic5sEW4vQnJydmoN1qqi/akxff
aGNb1lnOgurIQsFfN/jwBrtaIz57FiqamtUNM3dgyc3m4/bTs/BpwPVwRtFO
fLolWCpSmQsaMe3baVX8eJ0tp/POkQu5t1fv6fcK4HT9HtczSVyoLZ5P+ZOz
C+cXiyiFP+fChuozq3BhISzgenF38ggXaPqGE/tUhfFjqZQ2aT4SPCJSlxx0
RHAHn4l7ujwJGVLlNSYXRXHT9ChnUJfa+x/Mv/cQwxNheZlhZ0hw0rYQFv1N
HC+Ltlw4QyMhdLCxbzpVAm9tZyi6BJKQPbhDvMZmN36WMaFoG0VC0mJsXAd7
Ny5LpycWJZLw/mCw0XFvSTw7Vh0S94gENXlTj+U5SfxTjprGDJ0EGbTmKRAt
hY8qv+KSZSTYhkrlewlJ4/lAnIdqSFAckqhTypLGkZdzL52qJ4FXZMH4qPoe
3M1Rva/fSsIxWz3+hIo9mO5I3hd8S8I3cHuMTGTw7Pe2IXldJEiZL4eYMmWw
fxcjwLqXBIOHXowc2704UZov0nOAhDWppmFL9l4sViyQeWWYBMH8aH0rTwI3
9npoVbJJkJv0Fy7wJvD02IRmA2V1Zcd+Xj8CC5pkq7AoWxfphlQHEjiT55XA
DOWM0pkKpTACYz+zgINjJBysPq+6do/AyYVmO5IpG7apyuZXEjhSyx5dGyfB
RmjfFE81gceLjH2CKLta8Fdfek7gQ4OdKVGUY5jD5yQZBE5d7Gc+osxkpSWF
tRLYq3tu6R1lh/6tXb98JHCo0SqhyyHBR26mp2SQwIltDiPGlCMu9dMFhwnc
bZD4xIby40/PjBljBD4RGrrHi/LUqMdtlVkCsw5VlGZR/qZ0/uwfJIHpi+um
hZRF3Izlh+cJbNuu2VtF+eiE/Mu0rwSOkvWY7KCMj4jEkasELvsYcHWAsp3H
6q8W69Q/WteHJym7FXKO0DcJzEY+dkuUg6e7vm5vEzhJ1R14Jkj4DyVP2Lk=

           "]]},
         Annotation[#, 
          "Charting`Private`Tag$13740#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->{False, False},
     AxesLabel->{None, None},
     AxesOrigin->{0., 0.},
     DisplayFunction->Identity,
     Frame->{{True, True}, {True, True}},
     FrameLabel->{{None, None}, {None, None}},
     FrameStyle->Automatic,
     FrameTicks->FrontEndValueCache[{{Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
        Automatic, {{-1., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.8, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.6, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.4, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-1.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-1.15, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-1.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-1.05, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.95, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.9, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.85, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.75, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.7, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.65, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.55, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.45, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.35, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.3, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.25, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.15, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.05, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.05, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.15, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {2., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {4., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {6., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-2., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-1.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-1., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-0.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {2.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {3., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {3.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {4.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {5., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {5.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {6.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {7., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {7.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {8., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}}],
     GridLines->{{0}, {0}},
     GridLinesStyle->Directive[
       GrayLevel[0.5, 0.4]],
     ImagePadding->{{32., 5.}, {23., 4.}},
     LabelStyle->Directive[FontFamily -> "Myriad Pro", 
       GrayLevel[0], FontSize -> 16],
     Method->{
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}},
     PlotRange->All,
     PlotRangeClipping->True,
     PlotRangePadding->{{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}},
     Ticks->{Automatic, Automatic}], {189., -116.80842387373012}, 
    ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[360], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.834742278775331*^9, 3.8347423256097045`*^9}, 
   3.8347424125427704`*^9, {3.8347431295882263`*^9, 3.8347431567833114`*^9}, 
   3.8397555142319965`*^9, 3.8397557710838537`*^9, 3.839755804170682*^9, 
   3.839755862704589*^9, 3.839755910541274*^9, 3.839755945093109*^9, 
   3.839756078613865*^9, 3.839756118482665*^9, 3.8397565027725496`*^9},
 CellLabel->
  "Out[425]=",ExpressionUUID->"c2af369b-bc12-4a11-b4bd-f2fd7a0f391e"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwVzX081AccwHEuS13zMF4eihRhbQupeb1uqb63k6WWp7C2meRxu06vkVJR
J04S8tD14lZkq+R6ziUZ8u10qDhxHlJ07s793DHDnet+SWrtj8/r/efHMfr3
nXEUAwMD/4/9ryM32PxqYCZ81rnA4tfQBjQtjohiAQfu1zp4XkhswHcFTIGb
RxbIywIs2vMbsD83I1Rgmg0x+MRjYUsD5mdW8xrEpyAzvOI3ilcjztXlmKsq
i0CYVx1qY/kA4/lq3uwqHvQYL6nsb2vCCz69oWZFl8BKUnExkirEkHVYnaiq
BgE3Ybo5SoQHQizdTY79Dc+eNdns2dSGC6YXNm5LeQgdftOHjvY8wYFW9so6
tggGOcZn8lgd+M4lBeiMx7DDteou/1on3rBSlyf/0AHlDPGZu4e6MLe8RCP+
qguiie63ZEY3xusOayYXSyDSr/+PKywJ5nBti+PMe2EvBn5nHN6D3XrShKnr
g6VPzEp07r2o19Hfj3Y+h71q8Qna616M8t5aUN/9Aq66ZrEpj/pQ53t6bplg
EC43+ZrvSutHMa9oUXf9K5Bo+end3s8xM3s+x7B+GHpP13hv1z5HD/uw5Mh2
GQTVeajjSgeQvpSqVYvl8MvInTWXfF9g3JvdwzRUgG74ZrKf8gXeTDtTdlc0
AvYnHAJi819iTEcql9WiBGZtwTor90F0+0CZHashIH8q6y//5kFc1s9059aN
Qp8fwzJjzxDaFSZKKNdV4AuVja7aIcy1WnPnNk8NAfNJos3pr9Ce3hpx8twY
7MtbLKm0lmLzDoNUl7xxiLRIelR0UYp587bxk4X/QNRQxnEVbRib00bzdIUT
IJHz23a1D+OnQyErhex/wWE0PIHzhQyPyCqy6jImIZefzaraL8O3rXm7UpKn
wKRP6s6tleHBTdYC2tppiK7S9Lx6I8P0sbA/2+9Mg3HmSwaHLkduNtEiXK2B
Lewu3gqOHOsOxoaIr2lA7SQ7Z9cuR1XYetuNzlpwdzt2a5WpAsVlQ0e2ndeC
pVVLcE2gAkVeB30S7GfAeekhuFGiwBaM2KI9OwMiocHY4wEFDpz3unnaRgcO
xx6kBq4cwYtSlaCtVAdDJZcE++JHMMVifCrW7DVsVqemCatGMJw3eNam+DXQ
KTIGZ3IEt5stT3Kj6iEo0VmWsVaJ0xO0cflxPRgFl0+4JimRb7+l/bohCTHv
Swo33lfi3k0VIwNHSLDTcjmlb5Q4ZzmdrkkjYSenj94wq8T8cbo9lU2Ckcme
eelbJd4uVYR6Z5KgvxZ8wHVeiTqNS2t5Lgk9LMFP9wwJZF+5wY8+TwLTWkTp
oRJYbFa/b6KRBN/2iS6T5QQ6jVKpnyAJNGfLw54OBNY0hl9ZLiThllmhQ9gK
AvuZ89KAFhKOOp1iljkSuExED6oWk/Dj0yLyS1cCLx9uW5ciJcHTiKHb6kGg
V6DtswIZCY6lk0WstQS2ujBZVQoS/O/p1xR6EjgmoV4eGCVhNdUupn89ge5u
AVbeUx9/25raYmkE4oKK6hANCd2s4MicbwgMejnlnzBDws+GPvrrGwhMPlmc
XU6S8FTPcJrZSKDRboVT7SwJDNOd9603E1jy9XrsnCPBZ5Hw+w1A4OdLssJV
8yRY0ouGI+gE1sl7yQ8fSBCZP9yf8S2B/wG5FaeU
        "]]},
      Annotation[#, "Charting`Private`Tag$141711#1"]& ]}, {}}, {{}, 
    GraphicsComplexBox[CompressedData["
1:eJzt2/dfzf//P/DQoIGUSiIyErJHGT2MikRJA6WUEmWkRSokKyFS2pOGEKWE
1qNFu86ejXPauyhCqo/v5fU89/cf8P319IvLuTzreZ7j8bjfPa6Xx23xKZcj
p6eKiIiYiYuI/L9/H1v1UdQLirGC6rIqhwAbpLhf4fWrlcX4jlsPPdVRG8dt
2nVLM6IIe/bT5vDjrNHyxc5WGWJFWEv+RXAuyRydmL/ijGNHIdY7JLbJU+Ug
Pj/io3i+uADHW1bckpCSRz619eWuMfnY79O106ky1uhByhKvK1fy8O8OxTfd
Oftw1I0rK64dycVLHkjutoo6h18dq2b5a37Guh5huWxxE/x5ver9gOmfcH3U
9YuayWqoUtJdO6g1B3/ztN3Y9tsQsVq/docUfsBJE4+mzzPfgLvylaMiI7Px
MYXwI62PzPGvZxcPxHtkYdb9t3/cFR2whEvJnyTj9/jj4UPaC5Xm4//uNxMP
tKndzfa9QNxfBtZa1XzZvsgD/Xc/6ThJyT3kicgp4vpf4y/rUiqL9toS15uG
ZQJH7Hn1ZsT1pWCXW7FSn99cQv9dTxJeeazAYlH0EfTf9z/HZnYB594M2xLf
l4AX3p/TtP2VBXH+aCyN3l15sf8Q/u98YfjbFo3ZhqEWxPU/xcGP9w8dmmGK
//v9B9jgaVf+k2Rz4vz+uNAvLMRew5D47IYNH4oxNRwckQjxw6zNUbazDibO
54bOL2Zc7f+eRXz2RymHW8IczfIE50eJJhUhoz35gu9H7vmcwOtSWHB9aIlj
HelwCSZ+PxqdPpDCS9hUhIn7Q4Yf7cW2pRcRf/8cDdtmXaSYlRDvKwlRR6jL
QoNLifOloA2Jb7NeOJcKni867bv3uIVoGXH+18hXb2Pnt9ZSYrylI/08pC7j
UUp8XwZKmWy/Oy2zVPB+0TTnYCUX3zLB+0c1ZD1z1eVlgvGBzr2tyh/w/SIY
P0jaxzDQVLkcE+MLJZJLjETby4nry0F2N0NmRVlWCMYnqnhroWkRUiEYv+jx
et4KWma5YHyj4bqOuXPflhPXn4fW6+4J3TFSgYn5gW73v0y0kqsUzB9UJmf5
Ml++EhPzC60+3btA36qSuL8ihKstdg8erhLMTySVd1Ymf0k1cb/FaH3Dq9Ox
ydWYmN9IjRSh941XRdx/CdJr91VSy6vEN/wj1NRaStCBO0NOra2VxPMoRdHm
qa01z6vwpTRdNxWJMnR4Z0SHY0c18XzK0HqS2J7K/BpsSxoqVlj9BeVa7L8t
nl9NPK8vaPmS++U0+WpsMhojK2vyFdGXxzjMba0mnt9XdPFZ2U1ZqVq8e6GB
ndTlcvSpaItG2Y9a4nlWoJ/29amfmmvxBr0fGWLRFShnk71je0At8Xwrkcex
L82l/rVY7XyiiEhRJYp80H9U8mUt8byr0Lf9q5Oc5tfhOSGHDv9pq0L3Op+d
KYytI55/NcocLznalliHp+X+jh+ZUYOs47oXkel1xPuoQZlmmxzLbtfjYV7y
4MCaWlQR4nUiajaJeD+1SGUyOOWmPgm3SRxB3aZ1yDtyuforSRLxvurQCrn7
DBcLEqatmQhq9apHsWrW23jyZOL9kdAYta7m40kybllpPjhgREI7X75QHzhB
Jt4nCb19Lb0gcJCErXRWKZ7nkxC7+/5Fmbck4v2SkadimE7Av+NUkymo252M
DsS/aDOSJRPvm4xMYu/OZMeRseFppqOjOAXNnTCI2cUlE++fgkLJpy/ETJJx
qVd6UGsEBXnPDHLcso9CjAcK2lYkj4IlKHj7w1s5tquoaB3FudKggkyMDyp6
StuSa59Dxtnxx5saC6iInBjvVFdEJsYLDa3/MnLw5FIKXp21VtzqMA1dSprR
fdaDQoyff8dfTGvQz6TgpK9ia1gtNMQOGvx2l00hxhMdaf1uCDsuScUqHK65
uScdKWSyDcv6KMT4+nd8J3lrOJeCn/VnXqNIMNBd/tLk0alUYrwx0FbGQ1sv
LSqWmRKQbBzFQKW259h8Wyox/hhoh5TmtJu3qfiOvE1tzWomcs5SmJ6fSiXG
IxMF7HGY8/YHFY+rb/phgJloaW29rOIUGjE+WehJQ3LFz0Eq9twuuaDchIU0
6Oj+kq9UYryy0C/SiTFGMxUPGPF0ddtY6Mj+y9t6tWjE+GWjN0N7Zxmk0LDj
qZzzxZfZSHJOytbpXjRiPLORV9i7nzbZVNzk+TBUZwYH2WUw4h9o0IjxzUE3
2i5GyG+gY4v7p/LzojloZiavmr6MTox3DvJ7KCWp3kbD9TFabVpruCjPMbqP
w6UR45+LdoeVPAzaQcf7MmZK5xRxUd/fgXtrV9GJ+dCAHvImf/i30zAubdu4
0bQBpWyRyaveTSfmRwM6tKqhZQaJjrcyc60y2huQjWbg4Y9bGMR8aUSTM3XM
7OQZ+F3Pk1uaXo0oc5bGwI8AOjF/GtGht6uWpe+n4xUTjq9fSTYh6TTPfbNc
6cR8akKKWqbqoil0nCC7k6oe24TcD81ZMG0lg5hfTejE2Nnf9k0MrLRMbixp
bTPyW+V7KsaBScy3ZjRzlKPyaICBn2h1q6mVNP8bX2hyzkkGMf946IPHxECi
BwOLppxMNl7JQ+kbtccP9zCI+chDG/4s3mtrycRF7w5oB7nz0I+37hnPjzOJ
+clDNvPiZP9+YuBrnzfX1uTzULySM2vnawYxX3noz4Gcynt7mFi7dJGdlDgf
5Rd4tM1YzyTmLx/lGtXsu5XAxD9qpH4YGPPR5dBJcS0DFjGf+ehby2xOhBwL
ZzJ+BgRE8FHE0TjmlmwmMb/56IhtM1k2gokv8Pgq5Xw+OpjlyJw9xiTmewti
qdif7hVhYY2emgyxVS3I6NnNO2OdTGL+t6BV189UDi9g4fbhj7q6Hi3IVtI0
JOMMi6gHLUhyW2/u4WMsnDj+nOVf0IJ2qX4PsnVjEfWhBS1ODRfVkWRja4mg
88XireiaXoddyHQ2US/+fZ5QUf+ozsLKsldFRA63ovOmC7Z2u7CI+tGKdinO
ryLTWZih7BCqE9mKTlh/7jcrYhH1pBVJyRk4P6Wx8NOlxiuutbSi6GC9G8GP
2ER9aUN2Jh9aw3awsdGabfl5q9pQVl165bURFlFv2hA/RytT0YSNJbWWHf7j
0YZsVWzUstxZRP1pQ3py2xXHdFj46+7ZbVqFbchH4tSJ1+9ZRD1qQ2ah4h+z
3NnY33DsyhWJdvQ01eRj3w82UZ/a0Z4DJTUTOWysY94hlXO4HdX5dcTtyGMT
9aodjewyml3iwMF/bMjxI5HtiHUr8vq1NRyifrWj6J0Vd85XsfHHs/kbN7a2
ow9tOla94WyinnWgMe2o37UiHOzullruuroD7bixgux1jkPUtw6kSVLDm7U4
eK3vU6sMzw40KuLx4p45h6h3HcjrqsMC46sc3Hvn2uBAYQeq3nc16MQ+DlH/
OtCjrpi7ql85OPXx2Vua0zvRRbOpD/7M4BL1sBON/BV3er2Yi+0jTRXPm/z7
/EDR8p0Ol6iPnUj2glLlCxYHq77Qef0qqhPtWbhH3CGdQ9TLTkS7lfvbpIWD
uW80UHdrJ/qqN3GGl8kh6mcXOkNL68vK4uDwHHmqumYXMlou51fnxyXqaRdq
4xkr1IdzsVnRpKPj5S4UMjYz6XU5h6ivXUjilZhf9HEunl3V8ycJd6H2YlH7
RR0NRL3tQnmXmp4k9XNxDZUe1Dq9G12amxmmqMUl6m834j7K0uY84+KAxiI1
tSPdqMVMI8qwk0vU42605zH53rcMLtbtfJ1jG92NRAy+Tx4b4RL1uRst3tBj
TnNswCLfwg7Et3Ujno/Z3JZ/3/dfve5B+a8W5oVtb8D5f242NWr2IO/qfPvw
4w1E/e5Bk19tx+9OcrGX6AU3lSs9aMbxva8eBzUQ9bwHiUYd9ehBDXjTzGPi
VkU9KDCfWjvUyyXqew862SHL8JZvwN8U90ZFzuhFG+LE1o5JNhL1vheZtFxS
HCxsxOmL16xhHelFQ5u8Z8daNRL1vxf1WRx9pmrQiJ1WzStRiOlFHme5hVIB
jUQ/6EUfDikdXLKzES/bLGph3t6LVu/P6/qAG4n+0Ic8h/qiN/1qxHydwe6Q
NX3oyucHGotfNxL9og/1PPjlG1HViGP3c65RrvShmBmrlTquNxL9ow+JTqkY
D6xpxMePfJGVLe5DvnI/m964NRH9pA+tk+2vN3rahOeeyEg2luxHO/NKdfJb
Gon+0o+kD79WibrShMmno7WDTPuRgmpBrtyCZqLf9KOtOyZtP+s24yCXu7U1
Mf3o/G6t0rP5zUT/6Uf9ca6F7P08fOCqq51URz8acIsp/zTWTPSjATTm25LS
Y92MxW+d+GGwdgCNJIybz1DjEf1pAJ0plrM+9ZSHSx7uux/gNYBWnjB1OO7D
I/rVAMp+I+s15wYPXw/bsKC8eACVTvavSjDkEf1rAP325tj+/Xd8W8KCTDGp
QfSF0xb78Cif6GeDaFx+AVMjm49/pk3X0zUbRCVGKtIqGXyivw2i4Nw+c1lj
Pn6fNczyjx1Eh1zYw2pBfKLfDaKup0plWoYt+GJB0/nijkG0NSRi7oJ1LUT/
G0I8f13S2yV8/KzVQUREaQgFz5x979I4j+iHQ2iya+ruKfP52P2s5YH4HUNo
R8SS+/fW8Yn+OIRMNN77DeXysEm/caiO3RBCKxZMtGfwiH45hBZ37IlMk+fj
tW56TY13/h036C+4vp1P9M8hZBzx2+n6Az6WGd224tqrIZR0UTpIxZRP9NMh
FLc45ZRcMA/3+axzU6kfQu8rtwyf/cEj+usQalgd02zL5+MqkeX5ecP/rtel
YYnZlhai335DBXKf73j/4gvWPzjL+Oqund8TwDemV0gPx9vEI4FvKE1f3RWc
mwC+0Z3M+33GJQ58w9W3x3bIPhwJfIOhXPDUYyISfEN85u29LndiwTfaz8wz
KagKQwLfSGyd5yM7+hQJfKM5MNxp4EwYEvgGitg8uNUiHHwj8DsnwcUyAnzj
qrTT/NYp4UjgG5xfOzz8s8KQwDdkRd/f4cmGI4FvUNVd3sgaRyCBb2hLr6tz
j44B3ygYiS+2XpsAvsENnKv0pycKfKPaau3ev99CkMA3/DUXndeVTwDfOCxa
e3/zriTwDUOX9OgJn0jwjaAS+yDnq+HgG84lS1Q7gsPBN64negQ7VgcjgW/c
k3mlsH7lIyTwjdmu72pWaDxCAt+o8CgZD9//DHxjHuVYpLXqs//5hje/p239
Q/CNz2EHnY6o+4BvtDaYUpPjX4JvhJ5XsikTyQbfKDhZzJUbzgbfiG19bf+A
nAm+8VL8/mYL6XfgG28u8K0PRqWBb0heTczOWfkWfOPg84JBucb34BtT7utP
XD+aAb6hpnZwY01zOvhG19QnUy3ZmeAbZYqFS0PO5IBv+FH3uPntygbfcFD0
SNXjp4Nv+C6oy18o8wZ8I0RZnpIlmQC+oeiydvVt/6z/+QbZ47TZwTzwDU5x
Qv3n6s/gG9V/D5Rwxz+Db6i+2bKw0yoffGP9t/ETKpaF4Bvfq7WWdhcVgm90
vbSvmiVVBL7RefqVhXtuEfiGX+9gwMerReAbvwy3RPR0YfCNPb9L7E8YY/CN
gU3qW1bLF4FvmA2rfrxZXwS+8S3caHFScjH4RsDqxjkTRcXgGzLSoihStQR8
I+4gpTfjfQn4RvuhWSRDixLwje36vp7u10rAN6qiuwe0VpSCb1w3sPkxh1oC
viHil3bu1ZdS8I1ZvmLux26XgW/Y7nlk2fi+DHxDZmlS+vY3ZeAbQ7YiZ0J4
X8A33L6/uzgz6iv4xmh81td5Xl/BNy4OmprNfPMVfOO27pL7t/K/gm/M+IHF
ttV9Bd84OeW2ecmfr+AbiTLmZVrd5eAb2smbz+TRy8E3Qs5n2YSUfwXfMB8V
X1e8oQJ8ozDw18rQFZXgGwxyxTL9sgrwja7qODe90grwDd1DdkHlcpXgG35+
Tk+5ulXgG06laXpPmqvAN3rvGvwkZVWDb1TaRzlEt9WAb1xYtmLW0+Eq8I0t
d+cHNqlUgW8Yy+/xqhytAt/oTFF3fWVVDb5x7rb9nmu+NeAbSfO+qelPqQXf
GPeNWuzpWQO+oS8iucs2oxp8o1ahZKPKplrwjc3Z4gtRUS34xrwv1XFqF2vA
N0QOiHtm5FaDb4zRGeX7w2rAN1y/KGb7HqkD3wiff8HCnVoHvlHfkJqx71Md
+Eb8uRgb5vc68I07EWZpmm714BuLUpYkxTyvB9844lZ4jt9XD75x1+3axh8x
9eAbYzb+czMY9eAbV+6y5s5IrgffmGchs/+eIgl8I+Si7EcNfxL4RoXBI43t
kSTwjZ/eygGWT+rBN+LCSQsGo+vBN3IGr/c87iCBbxQEzQnN0iaBb4iHbhOT
MKkH39hR6u5DkSaBb9TcDPTad5UEvlE+e1hWdowEvrF4OOS66S4y+MbaLXIZ
Rk5k8I2jZfwoXwYJfKN9qGdaYwQJfGNglPWDIUEG30gp8WySW04G32hovJvv
s5YMvnEodIl76jUy+MbPQ2vOGc0ng2/Qzy7b4SBJBt84uupsTX8gGXzjy8Ir
OTv1KeAb3lSRzz4RZPCNnD7RnEglMviG2PEpXql1ZPCNXztPr2xXpoBvlJzt
CO9eQwHfUItpjHlnQgHfkP55ybTmIgV846pl2Q2PCAr4xp21y9slNlLBN8wl
/bz9SqngG60jhnsoa6jgG/wngzM5lyngG8+MRqNW2lLANyzMRIxl/32fwDec
P/7++MWJAr4x7aDJytVeFPANRxw4Z/IrBXxj1txsQ4vtVPCN7SNmR/ICqOAb
35fL5zrdpoJvJFhpOmzOooJvUKV3uJY6UME3AtMcf30xooJvXD63fp+hBxV8
I9uix3jXMAV8g/7JT7FunAK+sUFepDZsnAq+EXs5l6feSQXfaJ4e4R+dQgXf
yNrm49FdRgXfMOg5r5pMp4Jv6Cm464c9oIJviImU6rzVoIFvyKhtbrKKpYFv
hDek3j92hAa+Mf29iovoHxr4xhTdQGvbChr4xnGddq6OAw184xaOOXXoEQ18
I3rLoSFyAw18Q9eRo+urTAffUKEM7qxIooFv7L5wwdlLgQa+8WRdzbk9d2jg
G0rMvKUjRTTwjWf9nTbGJBr4hjX1TYRLNQ18w2D79WO8GBr4hvop7TD/f8cF
vhGxoOhP6w46+Mb+8sOWN87RwTdWXf/x8ekoDXxjSf4BfennNPCNtxZ5ew/r
08E3MmaJdU21oYNvFN+yk3+0jQ6+QVoWGLvmKR1841t6yQO/MTr4RtpQGF/l
Ox18Q6RyXEStiQ6+saL5unNdMR18Q2/W4pUMWQb4xlBy0c9qQwb4xoLZl+WP
bmKAbxTudaZYZ9HBN2bknNh4fTsdfMO/71aJRDIdfMPBx+aY2AwG+MZouYSO
eyQDfOPMQJz9n3EG+MY4f423yisG+EarGou97yYDfCO6N5dRfJUBvlGT3fjw
5QMG+MaOvKMJI7UM8I216y31MwYZ4BvX1meI+fgzwDecy1x9jS8wwDccaKkO
BsYM8A2nCRH5Ik06+Ma8X0s8lR/SwTf0Q9c48asZ4Bs4ZWBSVooJvrHpbO7U
OZgBvmHwLtC714cBvrFtxTvuxkMM8A1LzfcvdzxigG9cPjbQf+oBE3xjxWX7
0Y63TPCNoXBNA54ME3yjYDNNOXMDA3xjsU3ggeByOvjGt78nXPiFDPCN14/y
lj06xgTfWFmDNNMuM8E3BpIqjubqMsE33P1lflRpMcE3Iha7bqUHMcE32uXy
562kMsE3Thbf45tuYIFv/D1tqll0jAW+ETvpqpJ+iQm+cfHt+ZN2iAm+Iaeu
k3k6mQm+Ye+0c9hpBxN8w+3VwV89t5jgG30ZHlnHNVngG2ypaX/XybLANxw+
JgQ7/2KCbyxWTxpu/MQC3zAjs1mvv7LBN6bdmvE09zkHfENxY86ooQQHfKOG
JLYrcx0HfKP8lwn3swgXfGNs6h1/tW4O+MaJZhnP8vNs8I2HtRPblvSw/ucb
pwqCXarY4BsaYep1PiIc8I2B1euDVX6ywDdsXjQ37eGywDeW0HxyyXZs8I2R
9a97fpqywTfEfLKb6k6xwTfc5K/Uhf67X4FvmIqKLft4hg2+8SKDP+NdARt8
w97/S6F/Pgd849F0vfzNz7jgG0y7ewcH3nLBN26NpXdekIsTrI9wrUxTRI98
Auzf8HcbT99XHCtYX+FTe9+kHv4QLVh/YV3yyuyPyyJh/4Za4IdbNoxIwfoN
j1rQLHJbIwXrO3y0g9O7Sj8C9m843T1h+LIxEvZvnDnek1AZEAH7N2ixPtov
pMIF60u8qjfJmhwVJlh/4ou+6a0PQsNh/8YL7uMmndORsH/jbor17QLFGNi/
4VHC79p9JwL2b/w9kvpGf8czwfoYN5mSyu9PPBOsn/H7Mq1hunOYYH2Nxzoj
PPumRsD+jdLK4uqHQbGC9Tn2fNGuLzE3QbB+x7pl9CdRK8IF63u87dVN9xs7
QgTrf6znavciLj9U4APY5dlgxVB8COzfSNS07E88Ewz7N7yrbJcW/ngC+zdu
nFrW0R7yVOATeJazqm35+RCBX+Cl2TaT9ZN+WOAbk57K0f1D0eAbp82mSk4P
ywPfsFJmnBE1KwbfKE7sTL7gWgK+kVQlyv6k9hV84+rS83u3T5aDb5zUpqW9
nVoFvmE6O976a30l+Ebh0L125e3V4Bvqybdrzo7WgW80aAdamlnXg2+Yjepk
Ts6vB9+QvyGxQzm0BnyjRtpmLqe8BnzD/ffAiw/d9eAbpimju6r/kMA3rhpN
41YspYBvJFEKMw/FkMA3qvQHLunsI4FvrErkcOa6kcE31paIqC7hksE3iqZV
nj7hSwbf2PMhQfbQfBL4xsDWzMgPY/XgG/kus99lD5DAN57kmv5cnEMC3xBb
2NLKY5LANzQpjVek7MjgGxdlHFcoXaOAb4QsMv+ePI8KvnG3RTmwYScVfGPl
7W+bVGdSwDemGM+c9YJDAt/Yc+NilQKNBL5xYG3hBQ8DMviGddiTiV15FPAN
+fR992Zdp4Jv0AOo0j3qFPCN0xPsg4avyf/bv+FYvmaXCAV8w5G5e397BQV8
467qkI95DBV8Y8hknBR1nwq+sVO09X30v/WFwDd2nrzwMn8zBXwjLi/EY/wc
BXxju8lU71NfKOAbunqiL3wRFXxj9bRWs/JtVPCN9Fj1ny7HqOAb/NoZoiue
UME3RswsxI5uoYFvDOyritXWoINvGHw0yBkeo4JvDPGehT9TooFvGDfQ7WL/
9XeBb0zdY8SrsWaAbzDTFAJ+rWWAb6iGt11KyaeBb0x808k90kcF37hyTmLq
CjEa+MZb6T8KhzOo4Bt96lfndpfSwTdmad8dln3JAN8QiXy10OwWA3zjlkFA
aDiPAb6BCkcbWkl08I3HitY3h2bRwTdSnRNapTfQwTf89m7LOp9GB9/4fX26
X8ZbOvhGxcCsve+nM8A3GPaJZ31XMcE33v+ySvtAZ4JvuN6rqwyqZIJvuN9I
3XkggwG+kdx3rszj3//HBL6RRPvhWp3G+J9vXK6WvTPKAN/Y67m66c10JviG
89792VlbmeAb6ZpGlhLHmeAbldUzHvBVWOAbVc5NSgwFFvhGq+dJcScZFvjG
djO3KuzBBN84ufElur2TCb7RqH/SMJrFBN9ofOHNcbjNBt/Yz7LnKamxwTe2
7uRNXePPAN8Qp0S9tp/HAt/4c33X2+Q8DvhGc9whFbYOB3xjU/jDaHFjNvjG
u/y95Un5LPCNU9rfoiq12OAbaaVVJ2f3s8A3iv8uMLk/wgLfcPJd65bbwwbf
eG3TXL8jggO+MTcirsRyHxd8Y8muH736vzngG4oP1jjphrLBN1JmajRLXWaD
b+zp/nIkl8kG3+Do6vgrF7PBN1R9029VyHDAN3YuIWsfXNoAvnHAeXhmfEYj
+IbCs+xit5kN4BufmufRdr3ggG+89FPQt8zlgG9oVYdaf/fngm8cn6BsGNFr
AN+4NG0Jn6TcAL6xdZqCztC/5y3wja7lZlvGnrLBN+QSF5nstOCCb4T1/P6s
3csF3+AZJY5weQ3gG2G0iUKbpU3gG14zV/w9V9AIvqFp33t791AD+IbOlE3B
S50awDcCTebZV+c2gG9c1nP1mn+1AXwjfdrg4UeGDeAbOQmJa94HNIBvDEo4
f4h1bgTfeFDlco1r1wi+IUl9z/C81Ai+8WRU9/P2xc3gG8sohm+OyTWDb1R2
ad9kmjSAb2xb5/fo1a8G8I2EZXGy08WawDfE/UYdi/IawTfqti/7cIPaCL4x
LK306eHjZvCNguepATeMm8A3jvss/xBv2Ai+sTq4ksX4d1zgG5/uxtPt+rng
Gw9aeknPPnDBN2JITQ2KUxrBN5Y7XZJStmwC37irZHFdYlYz+MauNa/Mbpo2
gW/cXNs4mUFuAt8wC1Tk3jnOA99YzHQM/sRsBt+Yn0TraKM2gW/Quc+O3jvZ
BL4RmXDPcvWWZvCNcLvupOkLeOAbWjrSXV1JzeAbpm3qB1ddbAbfSFvlxVt4
rxl844LsuMPy8GbwDe/AK/bzPHngG4ppS50ojjzwDRVP0R9pbjzwDbmqjvqz
iTzwDXVLU++Hs3jgG4+Div32nWwG35hUaJK9R2kG33hSMlEXd6cZfCOtknYx
MrkZfONN3NRzrVd44Bv9jwaVu1154BvTO1M3ilg1g2+sDCCF9d3ggW/wHS0M
7Pa3gG94e8e8WzSfD75RyLzZE7qRB77BT3sXtciAB77xrvH4WaOzPPCNvQtz
D7Ra8cA3Hm8Vl/uQxQPfMM1/6DyswQff8E5sr5N5yQPfWFj73TmGxgPfaHn/
eBfm88A30NsAb4NCHvgG7bJkX+dRPvgG+d20Ej0lPviGxU5q6WxzPvjGkZ4b
0ReM+OAbs8wueksm88E3hoOuKjpqt4BvMEUWzJL/ywff2Dcpy9KQagHfOE6b
Rna1awHfmL4Vj97+yQffGJpf5ir6hw++cWrz9kXFi1rAN/z6R0TXL20B35Bx
DRpEmS3gGw85HW4LolvANx75z9NXvtACvpF6UOmg49cW8A3lVYe0/zBawDcq
zjbPObmrBXyDHLT0+SZuC/jGwSBR1TTzVvAN3Q2LzZZatYJv5Nt6UHRetIJv
NARqO5qebgPfUHW31z61tw18o3TZ6lHtwlbwjZNrTlBPuraBb6jWBRQ9vtsO
vjHP3u9gwaZ28I1hEScFr8428I2Yqxx2alAb+MbeqDav0mnt4Bt/E0d3vzrS
Ab5hsru2ePx2x/98o2FjPWdmB/hGuNXEO9+odvCNLT/f7euf1gG+cV4jIEpe
oRN8YzBpoPtlbwf4xlyFqR2/n7SDb1jnJFyqv9MOvnFjkfrnqsPt4Bv2pzeu
Itu2g29o5Fd/ovxpA9+ov171cOVIG/jGhpZ95s5e7eAbd3/fFp9a2w6+oTIc
4fDsdAf4xkzTxuyBknbwjTnFlRsML7aBb8zJ87X7I9UOvnEvgn7Sz6EDfOOT
VZiTzPMO8I3Hl9e0X5vXgYX5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWY
TxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhP
EeZThPkUYT5FmE8R5lOE+RRhPkWYTxHmU4T5FGE+RZhPEeZThPkUYT5FmE8R
5lOE+RRhPkWYTxHmU4T5FGE+5f8nn/J/UX8DHA==
     "], {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, 
       {RGBColor[1, 0.5, 0.5], Opacity[0.3], EdgeForm[None], 
        GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl1GO0EAYYx+Fbt5Ztd7Nt17Jt27bdso2ttmxu2bZt28b2dPbhOef9/Dvn
/Qc17lC5ffCAgIBgxHckICGJSEwQSUhKMpKTgpSkIjVpSEs60pOBjGQiM1nI
Sjayk4Oc5CI3echLPvJTgIIUojBF+JWiFKM4JShJKUpThrKUozwVqEglKlOF
qlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrTjZ9AOdKQTnelC
V7rRnR70pBe96UNf+tGfAQxkEIMZwlCGMZwR/MZIRjGaMYxlHOOZwEQmMZkp
TGUa05nBTGYxmznMZR6/8wfzWcCf/MVCFrGYJSxlGctZwUpWsZo1rGUd69nA
RjbxN/+wmS1sZRvb2cFOdrGbPexlH/s5wEEOcZgjHOUYxznBSU5xmjOc5Rzn
ucBFLnGZK1zlGte5wU1ucZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5
wEc+8ZkvfOUb3/nBvwQE+kuCE0gIQvILoQhNGMISjvBEICKRiEwUohKN6MQg
JrGITRziEo/4JCAhiUhMEElISjKSk4KUpCI1aQL/3454xCUOsYlFTGIQnWhE
JQqRiUREIhCecIQlDKEJxS+EJASBBCfYzzY/GxmtH3znG1/5wmc+8ZEPvOcd
b3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nCZS5xkQuc5xxn
OcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbnaxkx1sZxtb2cJm/uFvNrGRDaxn
HWtZw2pWsZIVLGcZS1nCYhaxkL/4kwXM5w9+Zx5zmcNsZjGTGUxnGlOZwmQm
MZEJjGccYxnDaEYxkt8YwXCGMZQhDGYQAxlAf/rRlz70phc96UF3utGVLnSm
Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYS
FalAecpRljKUphQlKUFxilGUXylCYQpRkALkJx95yUNucpGTHGQnG1nJQmYy
kZEMpCcdaUlDalKRkhQkJxlJSUIQiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJ
xH/Pdwdz
          "]]]}, {}, {}, {}}, {{}, {}, {}, 
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large], 
        LineBox[CompressedData["
1:eJwl1FV4EAQUBeCNbbCgQ7pbCQHplkYQGChKM0okRneHdJegqIRS0kiDpIRS
kkp3dzf/Ph7+c5/O47kZo6Ij2wcGBATEFzE3FkEEE0Js4hBKGOFEEJd4MT0S
kJBEJCYJSUnGByQnBSlJRWrSkJZ0pCcDGclEZrKQlWxkJwc5+ZCPyEVu8pCX
j8lHfgrwCQUpRGGKUJRiFKcEJSlFacpQlk8pR3kqUJFKVKYKVfmMalTnc2pQ
k1pEUps6fMGX1OUrvqYe9WlAQxrRmCY0JYpmNKcFLWnFN7TmW9rQlna0J5oO
dKQTnelCV7rRnR70pBe96UNf+tGfAQxkEIMZwlC+YxjDGcFIRjGaMYxlHOOZ
wEQmMZkpTGUa3zOdGfzAj8zkJ37mF2YxmznM5Vd+Yx7zWcBCFvE7i1nCUpax
nBWsZBV/sJo1rGUd69nARjaxmT/Zwla2sZ0d7OQvdrGbPezlb/5hH/s5wEEO
8S+HOcJRjnGcE/zH/5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3ucNd7nGf
BzzkEY95wlOe8ZwXvOQVr3nDW2LGH0gsgggmhNjEIZQwwokgLvEC3/+NdyPV
gbs=
         "]]}, 
       {Hue[0.9060679774997897, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwV0VVjFgQAQNFvdI9tMDY2aaRBukNAGoHRLaV0d4dKSnc3GDRKl6CSgnQp
KI3SIQ2Hh3P/wE3fsktM56BAIJBMgklOCKGEkYKUhJOKCCJJTRTRfEAa0pKO
9GQgI5nIzIdkISvZyE4OcpKL3OThI/KSj/wUoCCFKEwRilKM4pSgJKUoTRk+
pizlKM8nVKAilahMFapSjep8Sg1qUosYalOHutSjPg1oSCMa04SmNKM5n9GC
lrSiNW34nC9oSzva04GOdOL9hC50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUY
wxnBl3zF14xkFKMZw1jG8Q3jmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhax
mCUsZRnLWcFKvuU7vucHVrGaNaxlHevZwEZ+5Cc2sZktbGUb29nBTnaxmz38
zF728Qu/8hv7OcBBDnGYI/zOUY7xB8c5wUlOcZoznOUc57nARf7kLy5xmb/5
hytc5RrXucFNbnGbf/mPO9zlHvd5wEMe8ZgnPOV/nvGcF7zkFa95w1sCsQKB
IGIRmzjEJR7xSUBCEpGYJCQlGcEkJ4RQwkhBSsJJRQSRpCaKaN4Bu+WDmw==

         "]]}, 
       {Hue[0.1421359549995791, 0.6, 0.6], Opacity[0], LineBox[CompressedData["
1:eJwNxGWADgYAANDPndjE2WbaJae72ZiYYZge092d06aZTTfbdGympru7u7s7
p3k/3ots0LZSmxiBQCBEoUGBQBjhRBBJFKlJQzRpSUd6MpCRTGQmC1nJRnZy
kJNc5CYPeclHfgpQkK/4mkIU5huKUJRiFOdbSvAdJSlFab6nDGUpxw+UpwIV
qURlqlCVH6lGdX6iBjWpRW3qUJd61KcBDWlEY5rQlGY0pwUtaUVr2tCWdrSn
Ax3pRGe60JWf6UZ3etCTXvSmD335hX70ZwADGcRghjCUYfzKcH7jd0YwklGM
ZgxjGcd4JjCRSUxmClOZxh/8yV9MZwYzmcVs5jCXecxnAX/zDwv5l0UsZglL
WcZ/LGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5w
lGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCU
ZzznBf/zkle85g1vecd7PhAIDgRiEEQwMYlFbOLwCZ8Sl3jEJwEhJOQzPucL
EvEliUlCUpKRnBSkJBWhhBFOBJFEkZo0RJOWdKQnAxn5CEbnhXs=
         "]]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}, {
       {RGBColor[0, 0, 1], PointSize[
         NCache[
          Rational[1, 120], 0.008333333333333333]], Thickness[Large]}, 
       {Opacity[0]}, 
       {Opacity[0]}, {}, {}, {}, {}, {}, {}, {}}}], {{}, {}}}, {{{{}, {}, 
      TagBox[
       {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
        Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJxTTMoPSmViYGBQAmIQzbvrr0xa2rP9DFCQEeC6e0Iogn/oWU/kbhcEv0xY
ZpqAMoL/IMeKf/f9p3D+JvlyRoFIBD+s9cPTnd5P4Px5AY/X8Ro+gvN1XP0v
6zjdhvMZQtoWce29BOfHL374LOnoETif6fE3/Wc1CP4yJZ7KTBME/91CM+6C
xYfh/LoF3fq1jYfg/LlzTSum2x6A87frCwvPyN4O5/9bZ7t03q1tcL6bXob5
Uk8E/5rO3uhN6lvh/K+a6UvOPN4E56d7lGUz7VgD539zO93PP201nN/mqrBF
pmQVwv1Op/6YGayA85/YyPVlr1gM5x9I6klcaTgVzp/xa+GBMpHJcH7BpO3y
Lt8nwPkOLUd3763shPM/bP5QGWHfCucveCxt8ZmlERGebU8yAhUK4XzdRPP9
rQ2JcD4AGzqTzw==
         "]], LineBox[CompressedData["
1:eJwV0Hk0lXkcBnAU2YX0xmRIp7I2mIZEfj9ZRijLpCaFS5SdDCkHYUYNRnaV
MKe4DFkOMVTcr+zqpouyRJbLReK+1pBt3vnjOc/5nOe/54Crv507Hw8Pjz2V
/1vDRRdiIl0QWrChrYQ0wv5sb5XcI7dQyl3JocOrjTCUE9ej0xGJ7AIluob0
miACHXPgNY5FRexzr9Nqm+CthFDW1fAE9KO771LqZhOIz3G5nIEkxOBvoZ83
bAan+kZNy73pKINb36MMzbBF862Uic9GFbTmlxKMFlCwHXG0P1GAhrdrSy+W
t4F2jH0p1/wflGeqJsLitoHZ89dbdy8Uoob9zpuS6u3gd6Dq7xdBT9Hdjjra
N3o7MOZjRxXKylD0uXItz/uv4Yf2h9rLkpWINvi733fXmfDO0/hfuFOLrhkp
FunwssBH3VWPJluHSn4ub3VWYIEwGVnLU1yHjGTn1gNOssAkiNFg1MlAQ2tX
na1useAyZE2OJtSj+fI2qRmSBZ3txNKVvgakdywnfrmvE14MiYl5+LaixW4T
5qlH3WC2M1yhxpKFcrriS1sme8AAqqxXLPqR7jrzg2LJIBTsUpSu6h1BsTk1
4vSSETgddMc+wY2DrHrTUmPZbLj1VMZ7O/czehKypRZXNA76am+2RTtmUdZi
sspNjQl4s8Kquqwyjzg3E6wj0ycBg82HbZNF5G8nd/Ns5RTwqbjQFhKW0ZST
bpR83WcQq975VJu5gtpXNh7QHk6Dc5HBMIytIbNxz6YO8y+whfhvZylvIE2n
T2cjvnyB8ROugi1mW8jc8kZosO8MiMwURCic5sEW4vQnJydmoN1qqi/akxff
aGNb1lnOgurIQsFfN/jwBrtaIz57FiqamtUNM3dgyc3m4/bTs/BpwPVwRtFO
fLolWCpSmQsaMe3baVX8eJ0tp/POkQu5t1fv6fcK4HT9HtczSVyoLZ5P+ZOz
C+cXiyiFP+fChuozq3BhISzgenF38ggXaPqGE/tUhfFjqZQ2aT4SPCJSlxx0
RHAHn4l7ujwJGVLlNSYXRXHT9ChnUJfa+x/Mv/cQwxNheZlhZ0hw0rYQFv1N
HC+Ltlw4QyMhdLCxbzpVAm9tZyi6BJKQPbhDvMZmN36WMaFoG0VC0mJsXAd7
Ny5LpycWJZLw/mCw0XFvSTw7Vh0S94gENXlTj+U5SfxTjprGDJ0EGbTmKRAt
hY8qv+KSZSTYhkrlewlJ4/lAnIdqSFAckqhTypLGkZdzL52qJ4FXZMH4qPoe
3M1Rva/fSsIxWz3+hIo9mO5I3hd8S8I3cHuMTGTw7Pe2IXldJEiZL4eYMmWw
fxcjwLqXBIOHXowc2704UZov0nOAhDWppmFL9l4sViyQeWWYBMH8aH0rTwI3
9npoVbJJkJv0Fy7wJvD02IRmA2V1Zcd+Xj8CC5pkq7AoWxfphlQHEjiT55XA
DOWM0pkKpTACYz+zgINjJBysPq+6do/AyYVmO5IpG7apyuZXEjhSyx5dGyfB
RmjfFE81gceLjH2CKLta8Fdfek7gQ4OdKVGUY5jD5yQZBE5d7Gc+osxkpSWF
tRLYq3tu6R1lh/6tXb98JHCo0SqhyyHBR26mp2SQwIltDiPGlCMu9dMFhwnc
bZD4xIby40/PjBljBD4RGrrHi/LUqMdtlVkCsw5VlGZR/qZ0/uwfJIHpi+um
hZRF3Izlh+cJbNuu2VtF+eiE/Mu0rwSOkvWY7KCMj4jEkasELvsYcHWAsp3H
6q8W69Q/WteHJym7FXKO0DcJzEY+dkuUg6e7vm5vEzhJ1R14Jkj4DyVP2Lk=

         "]]},
       Annotation[#, 
        "Charting`Private`Tag$13740#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {2., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {4., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {6., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-2., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {4.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {5., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {5.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {6.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {7., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {7.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {8., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{62.22689075630291, Automatic},
  LabelStyle->Directive[Bold, 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.834742278775331*^9, 3.8347423256097045`*^9}, 
   3.8347424125427704`*^9, {3.8347431295882263`*^9, 3.8347431567833114`*^9}, 
   3.8397555142319965`*^9, 3.8397557710838537`*^9, 3.839755804170682*^9, 
   3.839755862704589*^9, 3.839755910541274*^9, 3.839755945093109*^9, 
   3.839756078613865*^9, 3.839756118482665*^9, 3.8397565028676896`*^9},
 CellLabel->
  "Out[426]=",ExpressionUUID->"8e039e20-ac1c-49bb-8cdb-029f976886a1"],

Cell[BoxData[
 GraphicsBox[{{}, InsetBox[
    GraphicsBox[{{{{{}, {}, 
         TagBox[
          {RGBColor[0, 0, 0], Thickness[0.007], Opacity[1.], 
           Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwBMQLO/SFib1JlAgAAACIAAAACAAAAb3TpeOVWlMAgYSrbInDhP07vyIGc
R5TA7p1YnlF54T8uaqiKUziUwPM6aTeFguE/7F9nnMEZlMD8WGL1+pThP2hL
5b+d3JPAarpU6CC64T9hIuEGVmKTwPnVrutYBeI/U9DYlMZtksBEssm7i5/i
PzcsyLCnhJDAICSvupPj4z/7s2U4QsCIwFAPuVPN7+Y/Gm8ICMQDgcD6/sHt
6DPqP4rGIpU+3HLAr51Kxhbb7T+LzW/ibJpywA0hfuQD7O0/jNS8L5tYcsA1
3Eeb+vztP4/iVsr31HHAa/Bj6AQf7j+U/or/sM1wwINo1ZmNY+4/PW3m00Z+
bcCaXIssdO7uP2ZNh30QRGXALY8yp94F8D9oWyEYbcBkwDWsPyP0DvA/a2m7
ssk8ZMBfh7HFDhjwP3CF7+eCNWPA/eJyiVMq8D96vVdS9SZhwBEClV4bT/A/
HltQTrQTWsCO4BjWppnwPyN3hINtDFnA+GV0GhCj8D8ok7i4JgVYwDNptLR+
rPA/MssgI5n2VcBKGv32a7/wP0c78fd92VHAtb7PB4fl8D/gNiRDjz5DwGXJ
HAnCMvE/z8a/ayVTQcAOGSJb2zvxP3yttih3zz7A7rOAfflE8T837STLzyE3
wJ8Vez1EV/E/FQ1cHPxKM8Cl4DLgcGDxP+VZJttQ6C7AugB8XaJp8T+4sgVA
BBofwF0tCfITfPE/Igo82LnID8A8RwFaPYXxP2FSGjI=
            "]], LineBox[CompressedData["
1:eJwV1nk4VV0XAHCKiMxDKTImc5JMyV6mlAZDlCl5kSmRRoR6M6uEvEkDcV13
xCVzhsJFUciYaJKGkyui21eSb/vrPL/nPM85e6+99lpL2Tfc+dgKHh4eYV4e
nuWnipD5SF2nGPDPSMwVD3HQ70+DD6yG1cE7ft/M1z4OQtRACSJBDxLDRHQT
ezjIP9s2QH7GCCwWKDefPuWgpDOiMjPtZmB7jJx1rpODqC7Dra33LKBuoSlP
o52DzqVVZlRtsoYSwXUpeY856KH9rmmvfnvgNb61uqeWgwonKwdc17pCqolR
wRYqB9EVAh8JiRyCkLbXYgbFHPTAVY7ZvOIw8K9HBqZFHNTGjo3XnHaDti0u
dq73OegTeZfBYpsX6BilkVtucZDstik7Z1NfGPt4ycE3jYM85mLJvz4Gg9ut
L0ZWJzkoL2PSUCE0BOJsf0vmhnHQhO7+NpgNAb8qcZm5UA4KDZKfSF44Dg+r
svexgjkodrxeSVY8DJoTyR37/Tiod2Jhf658BOznH3YSOMxB889MnlTZngXz
V+P/kwIOMiusaJ7OiYXnn6TCNshykNtU6MShn0nwx2w8PLV9CvFobAvbfDMd
HO0ovz6enUKDD2c620JvwPt3AbVpMlPo3bZ/vPV258Bn9SA7qZqvKPC6t5m2
+B0oS9wTGuX5FU3P97w/qZUPkzTpfbV/CcRWvPTqkWk+XKkWcolYJNBde/0B
8T35MPE5e1HrD4Hs72ewWYH5wIlyMbn/i0DkvU7UmaJ86JQF76x5Auk5fTGq
FbsP1+kHpG4SBPpICfljnHYfPrKPn1UaJtAh1xPJxhcLoHr15QW/CgINOXvL
JCQXwPCcybpt5QRydXQg9V4vgKFoIZWVLAK57N3aHHy/AOwm7y2RSwjkbPmD
e+dxAfzXwjfPpRLogG5sAA9fIdzxm0Pt+QTaxX/N9klKITRkrD2tkE6g9hVx
/TKZhUBiXdIVvkYgW57wf3xzC8Fkc+SHX1cIZLPgGLtAK4Srhv/aj6YSyGpW
ukq3qxDUUuUEKIkEshi/q5YlQoL9JZJVJ2MJtL2KudIziwQp3jdTOk4QKKZb
q/bSbRKsb/i8djSUQC0T1NDiQhLA7K8iznG8Pkny4GwFCY6ketSuDSFQUPg9
Sko/CTx0BjrPB+D4aqbvrZYuAm+jm9zAowRamRd+QyKnCHhrX/EJO+N4V3Hs
jPOLoHqM8mGnE4Eyuo//8aIUQVwm6WmEI4HkFwKPUWuK4JmJKW3sAIGM3HyM
0UgRqE1rs5r2EihE0ulVqBwZuF55vQ9sCdSXZKDaeYcMlINjXn5mBKrtrdn9
D4kMY4Yt1S2mBMpbvzPsN50MEW3a/1PBDi21q9OpJ0NYbPvWj8YEEhzycsgc
IcPx7d8vnd9OILQp+YKHTDHICvunsvUJVNL6qn8qvRgMFYMiRDUIlC3yz6/E
m8Uwl5hLSttMoOjDHzcq5hWDiNxggwD27q8zwU4lxfBJQoTMp06gD5KreKq7
imFxm77jajUCbfDV17koSAEpMyNVCyUCpfIkJkhcpoDb8dVprnIESjAg7XBI
o0Cw9fq/k+sIFOf/+PvVLArMHM6/eB77TOeijyCJAkbxR2j31hLIJ+PczqVW
Cij05mVyZQhkrBTEneKnQoEk8XpUkkAGzkklWqJUcJ3I2ByDrZNQ5B8kS4Xi
kxlxG7FVPr99MaFOhRSlrsMBEgQSZbmXjdpRYcep0zUrxAk0ifYGdaZSQbRM
SCFMhEBvI4IVV2VR4UDIjV1K2KOk5CHr21RIlSdi+tcQqFegzaaZToVx6Q+i
O7EbesyVq7uosPYzb7O8MIFqeD1H5vqpkOS/btewEIEqtkVd3zpGhZ4EveEs
bGpO1SJzigoP9ybIiGDfOKo3ShKhQQ858afIagKlZ+7LfCdDg8FPnLZeQQKl
tIbsVtxIg1Ad6TvZ2HGbKdW39WggoWPjq4gd8k3xRqYDDUIEho5aChDomLKF
fc9hGig6z55bg+1z0ItXxIcGn/yLc0ZW4ftccys85SQNrFq+/ziNbXlRYt/F
TBrwzt3cVMNPoLEJozP6uTR48ogddQ07crfX3Xf3aZDkLVblj10qQZmyZtFA
6FPCWxls+SLza4I9NKgsWC8Qz4f3L+hbVTdEA3sTrwwfbOcTyeMhr2lQ8u/Z
JQvsVKMXus84NNgyA+l/VxKI2xn4PHMNHdYmPw9Iwc7Uvca1kqZDcXTs2hPY
OlkVG+c30GE0qZ7hjO3nuRh2SJsOQe1BsUrYf5tVcgS20UGcI1UviH1bbXdz
rRkdGlc8Hpldgc+LkyW2wZ4OpDd+9e3Yoc61xt1OdGig3ompwBaoGT8a604H
5/qnivnYFpc0WG+C8HrEC1dfwH75Yf9Ixkk6ZDRdcQzBPrPnNI9VJB1Ek79F
emAzJJsci5LpEJMTH7YTe9f5iUjX63SQvzy6Qx/7/SvBglU5dLjb9D9CFTsW
9J7U5NGhcvWXC+uw15EPzgYV02ETuWJaBLtydZTc+lI6MBzdrfmwHcLyLLuq
6ICsx6MWeAlEvGgNjmmkw5Tqjqw57CTjL5m6bDoMrQi9OoWtfFe0/nU3HfSc
jwV9xG7gMXx/fYAOMm/Wqb/DdjvmLmQ5Roekp2fYY9hzT+IMvk/QQfWy366X
2Ol6RR6kr3SYr+2iDmFr3Xhy2WWODgd8MqYGsNk/p+n8C3Twu58hsWwfL+n+
6hUM2NhHWbvshUemC4FCDCg6VfJ32Tc3HVWVk2SAsPrZ9uXvGaQl7H0qx4D3
5Odhy/97Nk07fUGZAb1NiT+X1xN0sOeOjiYDlux8fZbXy1c73zquzwDSBg3a
8n7y5ddPpZswwFssp295v2b/ImkABjROhbxcjsfQpL/5rB0DooM9Hy3HK8I+
zb/QgQGjivJJy/FcU1Z29eBhBvAme2mJYlOlBiv5jjJA5WsHc/k8rCN/j1UF
MKD8GL+IGvbrMUX+wDAG0AZr7JfPU6Y4xPVJLHbjrNde7LbvGmKKSQx4Sh8+
77mcH+hT55l0BgRRerJDsV+M+Jkr5TMgN+r2i0zsy5tUuGcpDHj4qGWWjL31
1NuyrjIGcIrKxR9iZwgfUT3/iAE+Wk8OfMZGbhvGuzsZEKfuEcaD83u66OVN
lT4GnPG9nC6Hvd/ikNDzdwx4O2nadwBbKMJhVm0lE7T31PixsesaRRjRwkzI
ic+6MokdJNTt3yvFBPG+/spV+D52kHaPXFBjgue/ucL7sBOGLJtf2DJhRi7/
yXtsQ1WeKI0DTDBYMvkjhO/7RHiTQdwhJmiOv95iiG21ekexZiATXn9ry03F
XtpheO1SChMWbRROA64vpSnfdw1lMMFX24t2Ett7kMWjk8uE3xSxNwXYDWG6
Z4ZpTDCZIdsJ4HoVXaDuqdfFhLRiBb7X2JrTH6QT+pmQ9PqBjiyudyNmpOcv
XzHhV8uAkwO28YCiVeIUE9zcRq63Yc+vktMcEymBW/lZ3fW4npIODr/fKlsC
lrZOXb+xne//dzd5YwmM/7Zr2YHrb7mppPi2LSWw0szm5iPssFDhn6mOJVDM
5uscxPX8S99im/GNEvBovHNMTxTnu8kecsCdEpA+K3wkBnsoLzvxP1IJsEd/
WHVhtxzX3jX3oASOcw+NHhfD8wK/e0fpQAkokDYb1+J+c8C08skm2VLg7ZvK
jZXC+ZO/RHPZWAo2pzJOj2KbrdqbFq9eCt7uemYm0gTa3P/O/p1RKbipeV3j
YvOcEOu+e7gUtm+/Zh0ni/vL/ZDnUrmlcPX50/w63F81BKpLrQpKoSA9UnnT
ejwfnOC9HkErBbD6X2om9hWzWw49daUw1rpV5MQGAvkPsHvTRkshybm3S0+B
QLKCyv288mVgH4/+jOH+HR0+PPwtrwyyjY40fMDzQYaglmZWcRkYPA4n+2kS
iFIQE21YWgYanHKXCeyBfmWFqMYyCKYo809qEWiLSajvirEy2O0aTZ3VIdCp
S5fOpa1hQYOKVtuWrXi9e2R47+1hwbm9Aj/N8XxT+V+TZth+FmwBqsIANnof
6IycWPBGPGFF6A7cvy7Uk965sSBdzVkgz5xA8SVHd6kHsWC6IWpJCOH7KkG/
UpbEgq8tIRWCNri/jlrItrSyYL3dg2dZeN7SuFOZPNnBAkt6TLSjA4GaPLV+
CXaz4GHLWj4xPJ99HpMZcxhggcXRg8x0PL9ZvJkqGP/AgspbHba3XPD7idu6
v/jLYWxweNuAB37P4dro7y6Hgfpvs1OBuD4vlZ7O6y6HTi3b2fwE3H/cqfcu
9JbDeJ7Mt8t4Pq16UNDhNlAOhsoz+QFJBLoUmL1BaqwcFnyD5fRTcPx7olqT
v5ZDQdVgWBeed63zbKQihCoghxzfoHoD55P5aIX17gqYjDip4FmI8ymK//vn
1groyBeLGW/B/VN7ydKt+gGsdhdLCRD6ilzeyrDdGyuhMUiPZOX3FW36Ihn8
pKIKeHUvpzk/+orOzetAV0M1NMqZhPVumUJkE+Lz7OMa4BrdNqRRptD73msV
SVW1cDPozd8IJQ7KP36grKSxDhgvXu5ZYnJQiMePbqvKejD0H1BcNJlG0pdR
wx/yQzgc8ZLH8ek0smAWv97NbAC3eSfh6ZPf0DmteeWVBY1gSWhSXIVmkB7D
+5YDvQkU76oKZQTOoPmLZVuECptBR4Wl190yg561O3WfsX8E2eEGmepKs+jt
AY/bus8fQfu9nZEdqbPoN89QpMKex5Dww7Q8cmYWuRi+PXno+WN4sT2Lify/
IwW+hj5lpxbwVFP2jB39jjiLQtZqXS1Q/1k36tO+ObQY+flZuEMrJAvWaMc9
m0PSG02Dvz9tBTjmaj68Zx7dPup5QsCmDUY4Ub/6OuaRj8qaK8c62kDNnBuj
5PoD6Yrp1/22ZMOSWbCD3/gPpBJySnqjDRvehKxOfPbmB5JlV4Zb7mLDFU68
uMn7H4jngql6ij0bVvpUa4h++oFefLS6IXOQDTLKFz2bZn6g802uJ/T92RAQ
p92sx8dFj09cUA5IYgOMdOg7anNRdWdjTGoKGw6ZJ2uzdbmIrsozwkxjgwmT
FWumz0XZLxPS59LZkP4hVEN9OxcF2KYvXMphg61dxC1exEXCCgWDd6hsyPdL
mux05iKeyAn9ZjobbHZauFu7ctH8i01X3zPZ0Bx7Sq3pMBe9TqFbaZaz4WGf
6uNKLy5izT8oq65jg3aNomRxABcVOXCFRh+ywfmNGagGc1Eu3SRgsZEN99Kd
2fePc9Fln0Z5mxY21DmsH7h7kovOP1w6H9jGBvLznCMbTnNRqKxVf1o7Gyop
zJ23z3KRT0SCXmknG9yTd5yRi+Qi1+721L6nbHgXuYk3N5qL/g9JsyKu
            "]]},
          
          Annotation[#, 
           "Charting`Private`Tag$13838#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}}, \
{{{}, {{{}, {}, 
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
           CapForm["Butt"], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAGIQDQYLphxIsDb8nvn7kT2Yv2HyAbndp2viZzyG8A9M
OmC0Zf+OiVxPIPwLEw/0dS/8e7QXyn8w4UC9ldLd10JPofz+AxsfWXRXzIby
GfoOZD9yXb/S8RmEr9Bz4AqzF3vASyjfoeuAaJmAlnDvcwg/oeOA7k7ubXpm
LyD8hrYDOuKVjXO/QfkLWg6Y3zr9Inv3S6j7mg70Tjv/ULPwFdT+hgP6ZwTP
zeZ7DbW/7sD8S7kJdw9D+Q5VByrTbuVWL3gDNb/swPLiBYZhQW+h5hUdWBzY
MJtB5h1Uf94BZtvHcs5i76Hq0w78BwMonyHugJGI8kUnjg9Qvt+Bj9cf7Y9S
gckzMEw+VZXp/RBmnp9DoEj/3dR9cP0OdYl9BfdKPsDMd3h6t09BgPEjzH4H
51LzacvqP8Lc56Cx/9LNHIZPMPc7FBqCIugTzH8OTVkPT3VwfIb530EqjHFJ
R+NnWPg4RHhYpbbrfYGFn8OziK0H1937Agtfh9eCVisMC7/Cwt9hcvsFtVMM
32Dx47DrFKPl95ZvsPhz+CceJMrF8h0Wvw67p7+Z9X/Bd1j8O8TwZoTxO/+A
pQ8HWSO2lsrfMP4Eh98KXWu0V/2EpS+HdyV8Jse8fsHSn4PS8lTGW3y/YenT
wbo/xTTrMpS/YIpD+p3kE486/0D4E6Y6qDlaH33l9hfq/mkOsybOWy5q/A/C
L5juECr95tVZkf/2ACDUCq8=
            "]]}}, 
         {RGBColor[0, 0, 1], PointSize[
           NCache[
            Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
          CapForm["Butt"]}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
           CapForm["Butt"]}, {}}, {
          {RGBColor[0, 0, 1], PointSize[
            NCache[
             Rational[7, 360], 0.019444444444444445`]], Thickness[0.007], 
           CapForm["Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
         TagBox[
          {RGBColor[
            NCache[
             Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
           Opacity[1.], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwd1Gs01HkcBvD50wiLLkpYJrqIdqtditDu94tqtoTcEg6zTU2yO4WplHWJ
0NS4ZMzs/EOJU3ROOqF0T+fH1mkroraOyuxOhmJyGw2acV27L57zvPqc87x6
7LlxQTw9BoPhN5P/erpVpZ4+LyX2MeK0RR1K+O3hmK/orJS0KYpjmZ1KGL31
1aUFRVKy2oUl1HQpoa90VZRToZQITC6Ft/Yo4R0/4UlQlpRorYKictVKqDPU
lVfsk5LUDkmnKaMTfkHDYN/vpaRcbT7XbXEnvK52uCFrlJARjovp0uhO2FzB
bch7WUiu5FdIIlWdoK9+0cv/LCZz+do1HQe6wCH5Nl1rISYFj2Whq0a6oMum
NGeHYwHJHwr7oVH0AeQrDng+luST9T2sNSzrj7Dcp3SwvDaXbLYOrq258xE8
Ffcr2W9ExFsw6+HdiG5QLfcurmedIsyXE06jw93QVPTIdhiEpMZH7l5X1gPs
29V/j6Vnk4QsRRxnkwryw06WNT3NJOHNzX26TyowXsbRRA9mkNklntJDFz4B
q+Ts8QaXdMK0js5zDemF52k1Pk8qUojhebZk0rIPdH/OOlkxcpT4TAUJ8hR9
ELLPYdOS7MMkNNUksepcP1hxNy6xe5pATMU8XkzCANhyOeqUc3yy0us3g6gN
g9Bet1p+bx6PGN0wrrebowbZwvhLfkGRpHazWn9xhhoOfBuv2Tq9lUxHcKO3
D6hhvrYbO1sWYaPl1P6umCFQp8MkjPpjafMcQbJ8CEzG79eqnKOwjle//UHg
Z5jgHRKEGe9FY4ZnQeSrzzDvYpy1bpyPW6r8pScCNXDZwt1rm5cAE93Ms9rl
GrgWHjXI1BzGHP7Jq4mxwyBi1y1bzEtCbuWTehv1MGjfmXncsk9FesHVLLMT
I1Bi4v9rWEA6qi505bcsHIX+lZWuhszjeKNBeJ5TOQrGNgyBVpGJO4paI/js
L3Caq4m3LMnGrj8sYm91fAFFco/iSLIQVY2nq9PytEB/Spw/e8MpzDAVp6Gz
DjLfWHg/04gwvGbqjLZNBx5Ftzuet+aiw9oW15yCMQiv1mzUy89Hv7/eLjjo
NQ722yxzPdYX4AetejLCYAK+S4dDZsvFaIHKVvPmCdBEu/w4RhXiK0ODn2Jz
JsFmhSPJHirE4GucBzs5U6ArUi11eiHBNlvfloKV0xDX5GIQc0WKu5JCnw2N
ToNvT1rZxuLf8bmhkuW/n4HtV2U2HkdlOOjzNW/XOwbuGe92sUqRIURmtvjL
GdjHdvfVHpNhWny4YMM/DJx63550UyhDvb2xuyyVDLQzt29zpmVoxGn+8FI1
449Uib+5KcODzIC8IB0D+4EY2A7LUDZclZViSWFi7jzWxBcZprJ2GyVYUzj1
hruufVyGve47H/NsKJwrYO4p0qfx3mGLwQA7Cp0vbm1YaE7judTiAQfHGW/4
OtnMmUae47HrCrcZH+Ig6V9Ho9EFx5Y2dwqF5UcuN7nTWLMiaVmrJ4VnPKzf
irxoTK52SmkACu/yOa6zA2mMOpHxvpJNofedGr+PITSutbJ5WraFwmdMPd6j
nTSKRYX9xb4UyksvSjJ/pvFYxirl6QAKeb0jl7l7aPTZxLkuCqRwwI3d6LWP
xuHdwgfZwTP7ss68tePP+LQr+hmhFP7/X3E0yl1fH08Jo/Bf0OpafA==
            "]]},
          Annotation[#, "Charting`Private`Tag$9983#1"]& ]}, {}}}},
     AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
     Axes->{False, False},
     AxesLabel->{None, None},
     AxesOrigin->{0., 0.},
     DisplayFunction->Identity,
     Frame->{{True, True}, {True, True}},
     FrameLabel->{{None, None}, {None, None}},
     FrameStyle->Automatic,
     FrameTicks->FrontEndValueCache[{{Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
         Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{
        Automatic, {{0.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {1., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {1.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {2., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {0., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.3, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.4, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.6, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.7, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.8, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {0.9, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.3, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.4, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.6, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.7, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.8, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1.9, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {2.1, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {2.2, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {2.3, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {2.4, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {2.5, 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {2500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {5000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {7500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {10000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
            AbsoluteThickness[0.1]}}, {-2500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-2000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-1500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-1000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {-500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {1500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {2000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {3000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {3500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {4000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {4500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {5500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {6000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {6500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {7000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {8000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {8500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {9000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {9500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {10500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {11000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {11500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {12000., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}, {12500., 
           FormBox[
            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
            AbsoluteThickness[0.1]}}}}}],
     GridLines->{{0}, {0}},
     GridLinesStyle->Directive[
       GrayLevel[0.5, 0.4]],
     ImagePadding->{{22., 5.}, {23., 4.000000000000057}},
     LabelStyle->Directive[FontFamily -> "Myriad Pro", 
       GrayLevel[0], FontSize -> 16],
     Method->{
      "DefaultBoundaryStyle" -> Automatic, 
       "DefaultGraphicsInteraction" -> {
        "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
         "Effects" -> {
          "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
           "Droplines" -> {
            "freeformCursorMode" -> True, 
             "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
       "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
        "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& ), "CopiedValueFunction" -> ({
           (Identity[#]& )[
            Part[#, 1]], 
           (Identity[#]& )[
            Part[#, 2]]}& )}},
     PlotRange->All,
     PlotRangeClipping->True,
     PlotRangePadding->{{
        Scaled[0.02], 
        Scaled[0.02]}, {
        Scaled[0.05], 
        Scaled[0.05]}},
     Ticks->{Automatic, Automatic}], {189., -116.80842387373012}, 
    ImageScaled[{0.5, 0.5}], {360., 222.49223594996212}], {}},
  ContentSelectable->True,
  ImageSize->{
    UpTo[360], 
    UpTo[360]},
  PlotRangePadding->{6, 5}]], "Output",
 CellChangeTimes->{{3.834742278775331*^9, 3.8347423256097045`*^9}, 
   3.8347424125427704`*^9, {3.8347431295882263`*^9, 3.8347431567833114`*^9}, 
   3.8397555142319965`*^9, 3.8397557710838537`*^9, 3.839755804170682*^9, 
   3.839755862704589*^9, 3.839755910541274*^9, 3.839755945093109*^9, 
   3.839756078613865*^9, 3.839756118482665*^9, 3.8397565030780883`*^9},
 CellLabel->
  "Out[427]=",ExpressionUUID->"029f661e-c21f-41a1-8e30-f128047b7dd8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["fitRes"], "Input",
 CellLabel->"In[66]:=",ExpressionUUID->"98197575-3665-4fce-9417-f532a2f104d0"],

Cell[BoxData["fitRes"], "Output",
 CellChangeTimes->{3.834742064635209*^9},
 CellLabel->"Out[66]=",ExpressionUUID->"d8691092-a0ef-4e0f-b305-cf94b7203295"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["fitRes"], "Input",
 CellChangeTimes->{{3.834737865719081*^9, 3.8347378659806337`*^9}, {
  3.8347388646612277`*^9, 3.8347388673503017`*^9}},
 CellLabel->
  "In[2360]:=",ExpressionUUID->"4baeb606-ac42-42bb-9e42-08bf3d7b31b1"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"a", "\[Rule]", "1.0973712210539464`"}], ",", 
   RowBox[{"b", "\[Rule]", "0.0005377482574550649`"}]}], "}"}]], "Output",
 CellChangeTimes->{3.8347378669130707`*^9, 3.8347388675984344`*^9},
 CellLabel->
  "Out[2360]=",ExpressionUUID->"21070b22-31ab-4544-a0cc-2a079f6f52df"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<deltaLength-vs-time-1000.pdf\>\"", ",", "ppp1"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<Length-vs-time-1000.pdf\>\"", ",", "ppp2"}], "]"}]}], "Input",
 CellChangeTimes->{
  3.8343903889191155`*^9, {3.834735895192317*^9, 3.834735918364741*^9}, {
   3.83473815176663*^9, 3.8347381659925594`*^9}},
 CellLabel->
  "In[2453]:=",ExpressionUUID->"c2425d1f-7872-48e8-ba65-11b3c056dc8d"],

Cell[BoxData["\<\"deltaLength-vs-time-1000.pdf\"\>"], "Output",
 CellChangeTimes->{3.8347359207350698`*^9, 3.834736951206499*^9, 
  3.834738166470042*^9, 3.834738948246869*^9},
 CellLabel->
  "Out[2454]=",ExpressionUUID->"d817f0c0-3acb-419f-9020-5235c7624dee"],

Cell[BoxData["\<\"Length-vs-time-1000.pdf\"\>"], "Output",
 CellChangeTimes->{3.8347359207350698`*^9, 3.834736951206499*^9, 
  3.834738166470042*^9, 3.8347389484632864`*^9},
 CellLabel->
  "Out[2455]=",ExpressionUUID->"5a8e9494-5f09-4a84-9e06-fa9b09956f51"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Making", " ", "Cylinder", " ", "plots"}], "*)"}]], "Input",
 CellChangeTimes->{{3.8224671057370477`*^9, 3.8224671111489725`*^9}},
 FontSize->72,ExpressionUUID->"d76f2a1b-6646-4ae6-a996-57ceb82a1c7f"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"R", " ", "=", " ", "0.5"}], ";", " ", 
    RowBox[{"L", " ", "=", " ", "3"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"cylinder", "[", 
      RowBox[{"\[Phi]_", ",", "z_"}], "]"}], " ", "=", " ", 
     RowBox[{
      RowBox[{"R", " ", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Cos", "[", "\[Phi]", "]"}], ",", 
         RowBox[{"Sin", "[", "\[Phi]", "]"}], ",", "0"}], "}"}]}], " ", "+", 
      RowBox[{"L", " ", "z", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "1"}], "}"}]}]}]}], ";"}], " ", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"sphere", "[", 
     RowBox[{"\[Theta]_", ",", "\[Phi]_"}], "]"}], " ", "=", " ", 
    RowBox[{"R", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        RowBox[{"Cos", "[", "\[Phi]", "]"}], " ", 
        RowBox[{"Sin", "[", "\[Theta]", "]"}]}], ",", 
       RowBox[{
        RowBox[{"Sin", "[", "\[Phi]", "]"}], 
        RowBox[{"Sin", "[", "\[Theta]", "]"}]}], ",", 
       RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "}"}]}]}], " ", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"cyl", " ", "=", " ", 
     RowBox[{"ParametricPlot3D", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"cylinder", "[", 
         RowBox[{"\[Phi]", ",", "z"}], "]"}], " ", "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Phi]", ",", "0", ",", " ", 
         RowBox[{"2", " ", "Pi"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"z", ",", " ", 
         RowBox[{
          RowBox[{"-", "1"}], "/", "2"}], ",", " ", 
         RowBox[{"1", "/", "2"}]}], "}"}], ",", " ", 
       RowBox[{"Boxed", "\[Rule]", "False"}], ",", 
       RowBox[{"Axes", "\[Rule]", "False"}], ",", " ", 
       RowBox[{"Mesh", "\[Rule]", "None"}], ",", " ", 
       RowBox[{"PlotPoints", "\[Rule]", "40"}]}], 
      RowBox[{"(*", 
       RowBox[{",", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", "Yellow", "}"}]}]}], "*)"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"sph1", " ", "=", " ", 
     RowBox[{"ParametricPlot3D", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"sphere", "[", 
          RowBox[{"\[Theta]", ",", "\[Phi]"}], "]"}], " ", "+", " ", 
         RowBox[{"{", 
          RowBox[{"0", ",", "0", ",", " ", 
           RowBox[{"L", "/", "2"}]}], "}"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Phi]", ",", "0", ",", " ", 
         RowBox[{"2", " ", "Pi"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Theta]", ",", " ", "0", ",", 
         RowBox[{"Pi", "/", "2"}]}], "}"}], ",", " ", 
       RowBox[{"Boxed", "\[Rule]", "False"}], ",", 
       RowBox[{"Axes", "\[Rule]", "False"}], ",", " ", 
       RowBox[{"Mesh", "\[Rule]", "None"}], ",", " ", 
       RowBox[{"PlotPoints", "\[Rule]", "40"}]}], 
      RowBox[{"(*", 
       RowBox[{",", " ", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"Yellow", ",", " ", "Yellow"}], "}"}]}]}], "*)"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"sph2", " ", "=", " ", 
     RowBox[{"ParametricPlot3D", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"sphere", "[", 
          RowBox[{"\[Theta]", ",", "\[Phi]"}], "]"}], " ", "-", " ", 
         RowBox[{"{", 
          RowBox[{"0", ",", "0", ",", " ", 
           RowBox[{"L", "/", "2"}]}], "}"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Phi]", ",", "0", ",", " ", 
         RowBox[{"2", " ", "Pi"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Theta]", ",", " ", 
         RowBox[{"Pi", "/", "2"}], ",", "Pi"}], "}"}], ",", " ", 
       RowBox[{"Boxed", "\[Rule]", "False"}], ",", 
       RowBox[{"Axes", "\[Rule]", "False"}], ",", " ", 
       RowBox[{"Mesh", "\[Rule]", "None"}], ",", " ", 
       RowBox[{"PlotPoints", "\[Rule]", "40"}]}], 
      RowBox[{"(*", 
       RowBox[{",", " ", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"Yellow", ",", " ", "Yellow"}], "}"}]}]}], "*)"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{"Show", "[", 
    RowBox[{"cyl", ",", " ", "sph1", ",", "sph2", ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8010326432838774`*^9, 3.8010326448456974`*^9}, {
  3.8010328134783278`*^9, 3.8010331904607143`*^9}, {3.801033412594317*^9, 
  3.8010336066788597`*^9}, {3.8010595955456667`*^9, 3.801059642936866*^9}, {
  3.8010597877453966`*^9, 3.8010598714076834`*^9}},
 CellLabel->
  "In[435]:=",ExpressionUUID->"f9553a16-ea7d-4ac1-ac96-f742ebe499cf"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"0.5`", " ", 
    RowBox[{"Cos", "[", "\[Phi]", "]"}], " ", 
    RowBox[{"Sin", "[", "\[Theta]", "]"}]}], ",", 
   RowBox[{"0.5`", " ", 
    RowBox[{"Sin", "[", "\[Theta]", "]"}], " ", 
    RowBox[{"Sin", "[", "\[Phi]", "]"}]}], ",", 
   RowBox[{"0.5`", " ", 
    RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], "}"}]], "Output",
 CellChangeTimes->{{3.801032959343029*^9, 3.801032972081943*^9}, {
   3.801033018509736*^9, 3.801033035531168*^9}, 3.801033109908179*^9, {
   3.8010331470757017`*^9, 3.8010331951980176`*^9}, 3.801033247561904*^9, {
   3.8010334130900154`*^9, 3.8010334928827906`*^9}, {3.8010335300992084`*^9, 
   3.801033607780884*^9}, 3.8010595961690135`*^9, {3.801059789392993*^9, 
   3.801059885938811*^9}},
 CellLabel->
  "Out[437]=",ExpressionUUID->"6c40bc31-3743-406d-a217-dd2d4304df99"],

Cell[BoxData[
 Graphics3DBox[{{GraphicsComplex3DBox[CompressedData["
1:eJx13X/s5wVdwPETGlNyLgFDnVs6MxwbObIZRfD9o5hkjpSEIboxfjS1sdBl
Kor94WpyYzU2j620wwAn1lh2Tt1oxXfWzV9haQoeP48dnCfcERjIpW2eB5/P
88V6vHf8w3jus8/ndZ/X6wEDPvf9vOKSK879g6O2bNlywTFbthx9+M/XHHr6
j90bF577y499/JN/cuaBPW/df+jQwc2LP/DRix+5bvfGa35n2/Vvv/rzG/Ub
bzhuy7suvH/jK9/483e+4bd3Tv/Ixs/cdvN5926cdenRO4+57RvTD37qlO88
97q7NrbtPOMFZ//6t6d/4Q+f/6LbT75zY9+hU99y4gnfnX7hmRc9et0p/7Xx
kTs/c9me8+6efvrzbrz6c1f8+8Y3r7zmxz/38L3Tb37Ba8540398aePQx758
9bX/fP/0p578+pVX3fMPGy+85rWXn7Vz9/TXffKqize3b9v80XFHv/ZtP3q2
v+qPfv+L7/n4rZsfvvXSve+58Nn+vJMuf3zXji9v3nf8L73y5v33Tb/g4MEX
b9nyzc3z9z561we/eM/0d97yoVf/5De/s3n+lvvPvvZru6b/519t3Hf7E9/d
PPa9b3vijafdMf0TJ5//stt/9p7NL330kmMueOm3pj944OzND7z7vs2bnv9r
x/7fi742/efv+ZttT75w9+ZjVz566t4bbnt2ztPOuO6Kvbs3r/zfix57719/
avqx6/7qVd+sv2T9PF9dPc/0fevXvXb1utP/dj3nras5p9+5/nUdtfp1TX/3
+n140+p9mH7x+n178+p9m/7y9ft81+p9nn7eei8fWu1l+o///x6nX7fe+3Gr
vU+/dn0nR2175k6mv2p9V3es7mr6763vcOvqDqffsr7bH6zudvpj6zu/fnXn
069au3j7ysX069eOHlg5mn7R2t2lK3fTc3riqX/x+GGnt9nz+66HTjn9wM6n
Fn7r+q3rt67fun7r+q3rt67fun7r+q3rt67fun7r+q3rt67fun7r+p058VvX
b12/df3W9VvXb12/c1f4reu3rt+6fuv6ret39o7fun7r+q3rt67fun7r+q3r
157f7+19zjW7tv5w4beu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+
6/qt67eu35kTv3X91vVb129dv3X91vU7d4Xfun7r+q3rt67fun5n7/it67eu
37p+6/qt67eu37p+7fm9bN8dd+8858mF37p+6/qt67eu37p+6/qt67eu37p+
6/qt67eu37p+6/qt67eu37p+Z0781vVb129dv3X91vVb1+/cFX7r+q3rt67f
un7r+p2947eu37p+6/qt67eu37p+6/q153fP9//u5B3HP7HwW9dvXb91/db1
W9dvXb91/db1W9dvXb91/db1W9dvXb91/db1W9fvzInfun7r+q3rt67fun7r
+p27wm9dv3X91vVb129dv7N3/Nb1W9dvXb91/db1W9dvXb/2/F70yIc/uH3X
DxZ+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+6/qdOfFb
129dv3X91vVb129dv3NX+K3rt67fun7r+q3rd/aO37p+6/qt67eu37p+6/qt
69ee33v3v/nrW7c/vvBb129dv3X91vVb129dv3X91vVb129dv3X91vVb129d
v3X91vVb1+/Mid+6fuv6reu3rt+6fuv6nbvCb12/df3W9VvXb12/s3f81vVb
129dv3X91vVb129dv/b8fv7u3/3VAzv/e+G3rt+6fuv6reu3rt+6fuv6reu3
rt+6fuv6reu3rt+6fuv6reu3rt+ZE791/db1W9dvXb91/db1O3eF37p+6/qt
67eu37p+Z+/4reu3rt+6fuv6reu3rt+6fu35/ex9T3x75zkHFn7r+q3rt67f
un7r+q3rt67fun7r+q3rt67fun7r+q3rt67fun7r+p058VvXb12/df3W9VvX
b12/c1f4reu3rt+6fuv6ret39o7fun7r+q3rt67fun7r+q3r157fv3/gE3+8
fdfDC791/db1W9dvXb91/db1W9dvXb91/db1W9dvXb91/db1W9dvXb91/c6c
+K3rt67fun7r+q3rt67fuSv81vVb129dv3X91vU7e8dvXb91/db1W9dvXb91
/db1a8/vpx/8rePfd8m+hd+6fuv6reu3rt+6fuv6reu3rt+6fuv6reu3rt+6
fuv6reu3rt+6fmdO/Nb1W9dvXb91/db1W9fv3BV+6/qt67eu37p+6/qdveO3
rt+6fuv6reu3rt+6fuv6tef3xu/t/9w5Bx5a+K3rt67fun7r+q3rt67fun7r
+q3rt67fun7r+q3rt67fun7r+q3rd+bEb12/df3W9VvXb12/df3OXeG3rt+6
fuv6reu3rt/ZO37r+q3rt67fun7r+q3rt65fe363P/yxc096356F37p+6/qt
67eu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+Z0781vVb129dv3X9
1vVb1+/cFX7r+q3rt67fun7r+p2947eu37p+6/qt67eu37p+6/q15/dX7nr/
Q4f/euG3rt+6fuv6reu3rt+6fuv6reu3rt+6fuv6reu3rt+6fuv6reu3rt+Z
E791/db1W9dvXb91/db1O3eF37p+6/qt67eu37p+Z+/4reu3rt+6fuv6reu3
rt+6fu35PXn3V1654/h7Fn7r+q3rt67fun7r+q3rt67fun7r+q3rt67fun7r
+q3rt67fun7r+p058VvXb12/df3W9VvXb12/c1f4reu3rt+6fuv6ret39o7f
un7r+q3rt67fun7r+q3r157fV+w98dJLTrpz4beu37p+6/qt67eu37p+6/qt
67eu37p+6/qt67eu37p+6/qt67eu35kTv3X91vVb129dv3X91vU7d4Xfun7r
+q3rt67fun5n7/it67eu37p+6/qt67eu37p+7fl98f533Hj86d9a+K3rt67f
un7r+q3rt67fun7r+q3rt67fun7r+q3rt67fun7r+q3rd+bEb12/df3W9VvX
b12/df3OXeG3rt+6fuv6reu3rt/ZO37r+q3rt67fun7r+q3rt65fe35fvueK
f9u6/asLv3X91vVb129dv3X91vVb129dv3X91vVb129dv3X91vVb129dv3X9
zpz4reu3rt+6fuv6reu3rt+5K/zW9VvXb12/df3W9Tt7x29dv3X91vVb129d
v3X91vVrz+/L7v2FP9u19V8Wfuv6reu3rt+6fuv6reu3rt+6fuv6reu3rt+6
fuv6reu3rt+6fuv6nTnxW9dvXb91/db1W9dvXb9zV/it67eu37p+6/qt63f2
jt+6fuv6reu3rt+6fuv6revXnt//2bd51Ok7blr4reu3rt+6fuv6reu3rt+6
fuv6reu3rt+6fuv6reu3rt+6fuv6ret35sRvXb91/db1W9dvXb91/c5d4beu
37p+6/qt67eu39k7fuv6reu3rt+6fuv6reu3rl97fs/7/jN9Q791/db1W9dv
Xb91/db1W9dvXb91/db1W9dvXb91/db1W9dvXb91/c6c+K3rt67fun7r+q3r
t67fuSv81vVb129dv3X91vU7e8dvXb91/db1W9dvXb91/db1a8/vOat/Li/8
1vVb129dv3X91vVb129dv3X91vVb129dv3X91vVb129dv3X91vU7c+K3rt+6
fuv6reu3rt+6fueu8FvXb12/df3W9VvX7+wdv3X91vVb129dv3X91vVb1689
v6et/r144beu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu
35kTv3X91vVb129dv3X91vU7d4Xfun7r+q3rt67fun5n7/it67eu37p+6/qt
67eu37p+7fn9xdV/l174reu3rt+6fuv6reu3rt+6fuv6reu3rt+6fuv6reu3
rt+6fuv6ret35sRvXb91/db1W9dvXb91/c5d4beu37p+6/qt67eu39k7fuv6
reu3rt+6fuv6reu3rl97fk9Z/X/hhd+6fuv6reu3rt+6fuv6reu3rt+6fuv6
reu3rt+6fuv6reu3rt+6fmdO/Nb1W9dvXb91/db1W9fv3BV+6/qt67eu37p+
6/qdveO3rt+6fuv6reu3rt+6fuv6tef3davPZS381vVb129dv3X91vVb129d
v3X91vVb129dv3X91vVb129dv3X91vU7c+K3rt+6fuv6reu3rt+6fueu8FvX
b12/df3W9VvX7+wdv3X91vVb129dv3X91vVb1689v2euPhe98FvXb12/df3W
9VvXb12/df3W9VvXb12/df3W9VvXb12/df3W9VvX78yJ37p+6/qt67eu37p+
6/qdu8JvXb91/db1W9dvXb+zd/zW9VvXb12/df3W9VvXb12/9vzetPp9SQu/
df3W9VvXb12/df3W9VvXb12/df3W9VvXb12/df3W9VvXb12/df3OnPit67eu
37p+6/qt67eu37kr/Nb1W9dvXb91/db1O3vHb12/df3W9VvXb12/df3W9WvP
72dWvy944beu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu
35kTv3X91vVb129dv3X91vU7d4Xfun7r+q3rt67fun5n7/it67eu37p+6/qt
67eu37p+7fm9ZfVzORZ+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+6/qt
67eu37p+6/qdOfFb129dv3X91vVb129dv3NX+K3rt67fun7r+q3rd/aO37p+
6/qt67eu37p+6/qt69ee339c/Vyshd+6fuv6reu3rt+6fuv6reu3rt+6fuv6
reu3rt+6fuv6reu3rt+6fmdO/Nb1W9dvXb91/db1W9fv3BV+6/qt67eu37p+
6/qdveO3rt+6fuv6reu3rt+6fuv6tef3C6ufS7nwW9dvXb91/db1W9dvXb91
/db1W9dvXb91/db1W9dvXb91/db1W9fvzInfun7r+q3rt67fun7r+p27wm9d
v3X91vVb129dv7N3/Nb1W9dvXb91/db1W9dvXb/2/P7T6udCL/zW9VvXb12/
df3W9VvXb12/df3W9VvXb12/df3W9VvXb12/df3W9Ttz4reu37p+6/qt67eu
37p+567wW9dvXb91/db1W9fv7B2/df3W9VvXb12/df3W9VvXrz2/D6y+l2Hh
t67fun7r+q3rt67fun7r+q3rt67fun7r+q3rt67fun7r+q3rt67fmRO/df3W
9VvXb12/df3W9Tt3hd+6fuv6reu3rt+6fmfv+K3rt67fun7r+q3rt67fun7t
+b1k9b1IC791/db1W9dvXb91/db1W9dvXb91/db1W9dvXb91/db1W9dvXb91
/c6c+K3rt67fun7r+q3rt67fuSv81vVb129dv3X91vU7e8dvXb91/db1W9dv
Xb91/db1a8/vQ6vvJVz4reu3rt+6fuv6reu3rt+6fuv6reu3rt+6fuv6reu3
rt+6fuv6ret35sRvXb91/db1W9dvXb91/c5d4beu37p+6/qt67eu39k7fuv6
reu3rt+6fuv6reu3rl97ft+x+l7ghd+6fuv6reu3rt+6fuv6reu3rt+6fuv6
reu3rt+6fuv6reu3rt+6fmdO/Nb1W9dvXb91/db1W9fv3BV+6/qt67eu37p+
6/qdveO3rt+6fuv6reu3rt+6fuv6tef3kb3PuWbX1h8u/Nb1W9dvXb91/db1
W9dvXb91/db1W9dvXb91/db1W9dvXb91/db1O3Pit67fun7r+q3rt67fun7n
rvBb129dv3X91vVb1+/sHb91/db1W9dvXb91/db1W9evPb+XP3TK6Qd2PrXw
W9dvXb91/db1W9dvXb91/db1W9dvXb91/db1W9dvXb91/db1W9fvzInfun7r
+q3rt67fun7r+p27wm9dv3X91vVb129dv7N3/Nb1W9dvXb91/db1W9dvXb/2
/B7Y89b9hw4dXPit67eu37p+6/qt67eu37p+6/qt67eu37p+6/qt67eu37p+
6/qt63fmxG9dv3X91vVb129dv3X9zl3ht67fun7r+q3rt67f2Tt+6/qt67eu
37p+6/qt67eu3/pL//T1f3l4vxuXPXrCDe9/+nsnn/lc1sHl94qu+0vWj//s
6vGbPn6+33Ddff7V574OHuFzm4fviuc/Uj/S/Ou+mLN+hMcf4fNph/8+8/qz
Tn3a+XPf8sAJ/7p928YbHjzn0G/sOLhZP3PVN+09/o2rvuHj674PR3r+5vf5
jzS/r8vjF/vqdZ3nSPP3uj8FIZO+QA==
     "], {
      {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[2], EdgeForm[
       None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[
         TagBox[Polygon3DBox[CompressedData["
1:eJxFnXnclVP3h8+57/sc42ue53lokKRJkaQyVUplaEBShjJFRCKJiFLGTBma
RJKSKYlMJTIn8xQyz5n97uu3rvO5/9if9ey19l5773WtzpPe5/m+2/c5vctp
SalUStYuldLctq7mX+e2Tj72yEclH7mrVLcUftbU02b52D8fm+Zjs3zU18ee
RvlYMx9r5aOBOVbLR8N8rJ6PNfKxl5Z1exontrf78iuVWuZjw3xslI998rF+
PjbIR9N8rJOPdfPRTLtePprk43/GmutjT2PzEWthDvLua+6N87GfdpN8XJmP
4/PRJx+t9PHOo3wP922Xj63zsU0+2uRji3xsmY8DtVvl44B8bG6srT72HJqP
HfKxYz7am2PbfBycj+3ysX0+DtGyrrU1Jtdh7tspH93kQe2PkBusOuVjl3zs
mo+OefEPzEebfHTM5zsb65KP3d3TwXzEupqDvN3NTS8cqeX9B3lf7nq09YDt
+fnobO5j5QGrnqXoCdj20sLkTHPx7t762NNXTvA/zhzN5AFXeuEEbQtZNTN2
ovtgO1Ae1P5UecDqJLnun4+TtdS4fyn6gNgp+tjTz3zEBpiDvKeZm144XQvP
HqXob958hj7eeYx1InZuKXjA6uxS9ARsz9HCZFAp+oDYYH3suVBO8D/PHIfn
4wJrTy8M1bLuLGtMrmHug+1l8qD2l3pvWA0vRa/D9hItd7+4FH1AbIQ+9lxk
PmIjzUHey81NL4zSwvObfCzMxzP5uEIfDL/Ox9PGrpEHrK4uRU/AdowWJneX
oud491h97LleTvAfZw44XytXeuE6LevGGyd2g/tge7s8qP2t8oDVBLnSvzdr
qfFNpegDYrfoY8+N5iN2mznIO9Hc9MIdWnheVYr+5s135WOI73zM93Dfe+QB
qyml6AnYTtXCZHIp+oDYNH3suV9O8J9uDjjfJ1d6YYaWdZOsMblmug+2D8uD
2j/kvWH1oFz5HJ2tHZ2PWaXoA2Jz9LHnAfMRm2sO8j5ibnrhUe049/WxRo9b
D9i+53nkfkoesJpfip6A7ZNamLyRj3t99wJ97HlOTvB/2hxwfkau9MKzWtYt
NE7seffB9hV5UPuX5QGrF+VK/y7RUuPF+bjT2Ev62POC+e7Ix1JzkPdVc9ML
r2nh+UQp+ps3v66Pd86zTsTekQeslpWiJ2D7thYmb5WiD4gt18eeD+UE/3fN
Qd3ft/b0wgda1r1pjcn1kftg+6U8qP3n3htWn5ai12H7mZa7f1KKPiC2Qh97
PjYfsS/MQd6V5qYXvtI+bS3od3r9W7nC88xy/jmdj4Pz8bM8YPV9KXoCtj9o
YVIpR8/x7p/yscg9v8sJ/r+YA86/yZVeWKVl3a/Gif3hPtiWy8GD2v8nD1j9
LVf69x8tNf7LPiD2rz72/Gk+YqVy5CBvUo7c9EJaDgvPbcpxJ+6blcPHO7cu
x3uIrVUOHrBavRw9Ads1ymFhslo5+oDYmuXwsWe9cnCC/9rlyAHndcrBlV5Y
txyWddVy1Jhc65djH2y3yL/+0dpvmn/9naw2Ksf3Er7PbFwOC+cNy9EHxDYp
h489G5QjH7HNypEDzluWIze9sJU9wfv/V477ctdty1EneLYqR17uslM5eMBq
+3L0BGx3KIeFSZ1yMIbDjuXwsWf3cnAitnM5csB513JwpRd2K4dl3S7liBOr
az54NipH3WFVvxws6dk9tNS1gRZW9dzHuj31wXavcnAlV0N9zPc2Nwwba6nN
duWoB29uog+2zcrBFf77loMTfPYpB1c4tNDCqrlribXUx5425WAPn/3MQd33
t/YwPCAfm7uuqedz9oHug+dh1h1Wh5SDE3zal+PPAGwP0vKmduX4M0DsYH3s
aWs+Yoeag7wdzA3DjlpY0XN83vCZ0kkfbDuXgyv8u8sMVkeUo1dg21ULq5PK
0XO8u5s+9vSQGfyPNAecj5YrDI/Rsu4o48R6ug+2feVB7fvIA1bHloMrdT1O
C9ve9gGx4/Wxp5f5iJ1gDvKeaG56oZ8Wnl2sAW/ur493Xux7uO/p8oDVgHL0
BGwHamFyqn1A7DR97DlbTvA/wxxwPkuu9MIgLetOyUdrc53jPtheKA9qf4H3
htV55eB6eD6GaGF7rn1A7Hx97BlsPmJDzUHeYeamFy7SHmk++oVeGW49YHuX
55H7cnnA6tJy9ARsR2phcnM5vufx7sv0secqOcF/lDngfKVc6YXRWtZdYZzY
1e6D7Q3yoPbXyQNW18iV/h2fj5Ot8dhy9AGxa/WxZ4z5iF1vDvLeaG564SYt
PEeUo7958wR9vPMS60TsDnnA6rZy9ARsb9fC5NZy9AGxifrYM1lO8L/THNT9
bmtPL0zSsu4Wa0yuKe6D7f3yoPb3eW9Y3VOOXoftdC13n1aOPiB2rz72TDUf
sRnmIO9Mc9MLD2jh2SLNP2PzsWE+ZumD4WwZw/YRecDqoXL0BGznamHyYjl6
jnc/rI898+UE/8fyMU7O8+RKLzyhZd3jxok96T7YPi8Pav+sPGD1tFzp34Va
avyUfUDsGX3sWWA+Ys+Zg7wvmJteWKSF58ZJ/neG3H6bj8X6eOenvof7vioP
WL1cjp6A7VItTF6yD4i9oo89b8kJ/q+ZA85vyJVeeFPLuiXWmFzL3AfbD+VB
7d/PxxxZvVMOrg/m410tbJfbB8Te08eet81H7ANzkPcjc9MLn+TjUd//uvfl
rp9ZD9hmSZxH7q/kAasvytETsP1SC5O/zcW7V+pjz/dygv/X5lgoD7jSC99p
WfeNcWI/uA+2v8uD2v8mD1j9LFf69xctNf7JPiD2qz72/Gg+YqvMQd4/zE0v
/KmF5+fl6G/e/Jc+3rnCOhFLkuABq//K0ROw5R9al8nkX/uAWDkJH3tWS4IT
/NMkclD3ShK1pxeqSVjW/WONybV6Evtgu34SPKj9ukncG1ZrJ9HrsP1fEpa7
r5VEHxBbJwkfe9bMv/7YHlkviRzk3SCJ3PTChklYeNJzfMbwmbJREj4YDs6/
7pCPjvnYMgkesNosiZ6A7eZJWJjUT6LnePcWSfjYs10SnOC/VRI54LxNElzp
hW2TsKzbOok4se2T2Afb3ZPgQe13TYIHrHZKgiv9u3MSlhrvmEQfENslCR97
dkgiH7HdkshB3jrmphfqauG5aRL9zZvr6eOdbZN4D/fdOwkesNoziZ6A7V75
WCMJJg2S6ANijfSxp3kSnODf2BxwbpoEV3qhmZZ1e1hjcu3jPtgekAQPar+/
94bVvklw5XN0P+0m+WiZRB8Qa6WPPS3MR6y1Ocjbxtz0woHardzHZwE1amc9
YNvf88h9WBI8YHVwEj0B20O0MDk2H01896H62NM5CU6724/kgHOnJLjSC4dr
WdfROLEu7oNtD3lQ+6PkAatuSXClf7trqXFX+4DYkfrYc4T5iB2Tj4bm7Wlu
eqGXFp4HJdHfvLm3Pt7Z3joRO1EesOqTRE/A9gQtTI63D4j11ceeU+QE/37m
oO4nWXt64WQt646zxuQ61X2wHSQPan+m94YV/6MUvQ7b07XcfaB9QOwMfewZ
YD5iZ5mDvGebm144RwtPvh/y9x3+rnOu/GD7Vz5ey8fr+bhQHrA6P4megO0F
Wphck0TP8e6h+tgzQk7wH2YOOF8sV3rhknwc7bqLjBO71H2wvUoe1P5KecDq
crnSv6O01Pgy+4DYFfrYM9J8xEabg7xXm5teGKOF5zv5mEWd8jFWH++c6nu4
7w3ygNW1SfQEbK/TwmS8fUDsen3suUVO8L/RHHCeIFd64WYt68ZZY3Ld6j7Y
TpIHtb8rH0NkNTGJ7yWwvUN7Xj5utw+I3amPPbeZj9jd5iDvZHPTC1O0vP8m
78tdp1kP2C7yPHLPlAes7kuiJ2A7QwuTp8zFu+/Xx545coL/A+YYJQ+40guz
taNlNcrYQ+6D7RPyoPaPywNWj8iV/n1US40fTqIPiD2mjz1zzUdsnjnIO9/c
9MKTWnjem0R/8+YF+njn9HwMN/a8PGD1TBI9AdtntTBZmEQfEHtOH3uWyAn+
L5iDui+29vTCi1rWPW2NyfWS+2D7ljyo/RveG1avJNHrsOXz4B7vvjSJPiD2
uj72vGw+Ym+ag7zLzE0vvK2FJz3H9w8+U5brgyH92MnYR/KA1ftJ9ARsP9DC
5Kckeo53f6iPPSvkBP+PzQHnT+VKL3ymZd0nxol97j7YficPav+NPGC1Uq70
71daavxlEn1A7Gt97PnCfMS+NQd5vzc3vfCDFp7vJdHfvPlHfbxzzTTew31/
lwesfk2iJ2D7mxYmvyTRB8RW6WPPv3KC/5/5eFXOf8uVXvhHy7qfrTG5/nMf
bFdLgwe1r6Rxb1glaXDlczRNw76bj3IafUAsS8PHHn6ggnzEqmnkIO/qaeSm
F9ZIw35srget0Vpp1AO29dI4j9zrp8EDVuuk0ROwXTcNC5Od0viex7vXS8PH
nk3S4AR//p1gpZw3SoMrvbBxGpZ1/DvCVzLfNI19sN02DR7Ufus0eMBqizS4
0r9bpmGp8eZp9AGxrdLwsWezNPIR2yaNHOTdLo3c9MIO+dd/yPN/afQ3b94x
DR/vXDuNOhGrkwYPWO2aRk/Adrc0LEx2SaMPiO2eho89DdLgBP+65qDu9a09
vbCHlnU7p1Fjcu3pPtg2S4MHtW+Sxr1h1SiNXoft3lruvlcafUCssT72NDQf
sabmIG9zc9ML+2jh2ama/10jH+3y0dJ/B4Ltfmlwhf8BafCAVSt9sN1fC5Nu
afQc726tjz3t0+AE/zbmgHPbNLjSC+20rDvQOLGD3AfbzmnwoPad5AGrw9Lg
Sv920FLjQ9PoA2Id9bHnkHxsb+xwc5C3i7nphSO08JyYj8H5ODcfXfXxzgG+
h/v2kAesjrInYHu0FiZH2gfEjtHHnuPkBP+e5oBzb7nSC8dqWdfdGpPrePfB
9mR5UPv+8oNV3zT+jQ+2J2r3zccJ9gGxfvrY08d8xE4yB3lPMTe9cKqW9/fy
vtx1oPWA7RjPI/fZ8oDVGWn0BGzPysfBMrnMXLx7kD72DJET/M8xRwd5wJVe
OE97uKw6GDvffbC9RB7U/mJ5wOpCudK/w7TUeGgafUDsIn3sucB8xIabg7wj
zE0vXKqF5+lp9DdvHqmPd55mnYhdJQ9YXZFGT8D2Si1MRqXRB8RG62PPODnB
/2pzUPex1p5euEbLusutMbnGuw+2t8iD2t/kvWF1fRq9DtsbtNz9ujT6gNiN
+thzrfmI3ZyPM817q7nphdu08Cxn+fe63C7Px+36YMgPEC5LIzZZHrC6K42e
gO3dWpg8nEbP8e5J+tgzXU7wn2IOOE+TK71wj5Z1U40Tu9d9sJ0tD2o/Sx6w
ul+u9O9MLTWeYR8Qe0Afe+4zH7EHzUHeOeamFx7SwvPONPqbN8/VxzuX+h7u
+4Q8YPVYGj0B28e1MHnUPiA2Tx97FsoJ/vPNAecFcqUXns7HBNc9Yo3J9Yz7
YLtEHtR+sfeG1fNy5XP0Be0d+XjOPiC2SB97njUfsRfNQd6XzE0vvKyd4r5z
rdEr1gO2P3oeud+SB6xeT6MnYPuGFiZf5uNJ3/2mPva8Kyf4LzMHnJfLlV54
R8u6t40Te899sP1MHtT+E3nA6kO50r8faanxB2n0AbGP9bHnffMR+9Qc5F1h
bnrhcy08X0ujv3nzF/p456vWidj38oDVN2n0BGy/1cLk6zT6gNh3+tjzi5zg
/4M5qPtP1p5e+FnLuq/y8ZS5fnUfbP+RB7X/y3vD6vc0eh22f2i5+6o0+oDY
n/rY85v5iP1tDvL+a2564T/tMmtBv9PrSRZc4Tky/7pnPnrlY7UseMAqy6In
YFvJwsJkiyx6jndXs/CxZ+0sOMF/9SxywHnNLLjSC2tlYVm3RhZxYv/LYh9s
N8mCB7XfKAsesFovC6707wb51yut8bpZ9AGxDbPwsWedLPIR2ziLHOTdNIvc
9MJmWVh47pXFnbjv5ln4eGfDLN5DbLsseMBq6yx6ArbbZGFhslUWfUBs2yx8
7Nk5C07w3z6LHHDeMQuu9MJOWVjWbZlFjcm1Sxb7YLtHFjyofb18pFmw2j2L
7yV8n6mjhfNuWfQBsbr62LNrFvmI1TcHeRuYm17YU8v7d8jivty1kXWCZ1fz
cpdmWfCAVeMsegK2TbQwaZUFYzg01cee/bLgRGyffKyfBeeWWXClF/bVsq6F
cWL7mw+eB2VRd1gdIEt6to2Wuh6ohVVr97GurT7Yts+CK7na6WN+sLlheIiW
2uxtPXjzofpg2yELrvDvIif4dMqCKxwO18Kqo2uJddbHniOzYA+fI8xB3btZ
exh217LuMM/n7KPcB8/jrDusessJPj2y+DMA255a3nRMFn8GiPXSx56jzUfs
WHOQt08+msvwBC2s6Dk+b/hM6asPtv3kCv9TZQark7LoFdierIXVhVn0HO8+
RR97zpAZ/AeYA86nyRWGp2tZN9A4sTPdB9sh8qD258oDVmfLlbqeo4XtIPuA
2GB97DnLfMTOMwd5zzc3vXCBFp79rQFvHqqPd17ve7jvCHnA6uIsegK2w7Uw
ucg+IHaJPvaMkhP8LzUHnC+TK71wuZZ1w6wxua7Mx/GyHS8Pan+N94bV1Vlw
PTEfY7Swvco+IDZWH3tGm4/YOHOQ91pz0wvXaQeYj36hV26wHrB92PPIfas8
YDUhi56A7c1amNyfxfc83n2LPvbcKSf432YOOE+UK71wh5Z1txsndpf7YDtd
HtR+mjxgNVmu9O8ULTWelEUfEJuqjz13m4/YPeYg773mphfu08Lzpiz6mzfP
0Mc7b7ROxB6SB6wezMcVsp2thckDWfQB/TJHH3sekxP855qDuj9i7emFR7Ws
m2mNyfW4+2C7UB7U/invDav5WfQ6bJ/UcvcnsugDYgv0sWee+Yg9bQ7yPmNu
euFZLTyf08LteS1sX9DCdol1h8lLWrgtzqI/4PyilnUvG4fnq/KG1WtaemGp
cdi+omXdh9aR/v1ISy3flCsM37aOMHknH7Pk9pZxevl1z6Ev3jUOzw/kzRlv
GCfve8Zh+76WdcvMx3kfexd4/mC9qNMK6w6Tz7Vw+zSL/oDzZ1rWfWEcnl/J
G1Zfa+mFL43DdqWWdausL/X7xLtwxndyheeP3mtRPn7Swup749z7G8+hL342
DsPfZMwZ3xon7y/G6YVftazbrZL/XSm3/LJfnXyU85Hk40/Zw/wfaw3Df7Ww
+ss4rP7Wsu4/49Q+rQRjGGaVsO953jJ7gfOW2wvrVaK+1G/9Sljqt1ol2NNf
a1aCJfVbqxIWVqtXIk7fVSpxDr2wdiXiMFy3Eow5o1qJOHn/V4k4vbBOJSzr
fpcVPb5BJe4C8+0rEfsjH5tUotYw3LQSFlYbVaInYLVxJSzrNqtEnB7cshKM
YbhVJSysNq9EnF7YohL2J897RTYbVuIunLFtJdjTXztUYh0Md5QlrLarRJx7
b12Jc+iFnSoRh+GulWAMw20qESfvzpWI0wu7VMKybo1K1Bsede0dmJ+ajwPy
0SYfDSpRaxjuqYVV/Ur0BKz20LKuoXFy710JxjBsrIXVXsbphUZa1rWuRH03
93ws9WtWCfb0V4tKsKR+LbWwam6cvmviOfTCvsZhuH8lGHNGU+Pk3c84vdBK
y7p9zLeBteAuMD/CP2/UrH0lag3Dg7SwaluJnoBVOy3rDjZODx5WCcYw7KCF
1SHG6YVDtaw7xvpSvwO9C2ccXgn2fB509V718tFNC6su+djde3f0HHqhu3EY
Hi1jzuhknLxHGqcXjtKybnQ++uTjBM+hd+iJXrKH+XHWGobHa2HV2zisjtU2
NV9za3+ijGHYT7uf5xGnF/pqWXeW9aV+g7TU72TZ018DZEn9BmphdYpx+q6/
59ALpxmH4Zky5oyTjJP3dOP0whla1vWQFT1+tneB+aXGeubjPGsNw/Pz0VlW
gyvRE7A6V8u6C4zTg8NkDMOLtLAaapxeuFDbzfMayeYc78IZl8ie/hrpOhhe
poXVCOPc+2LPoRcuNw7DK2UMw+HGyTvKOL1whZZ1fG/k7zj8PeYqucJzjOxh
Pl5+8BmrDz7XaOEw2Tfz1nH62HOj/OBzrTn4bLvePoD/DVrWXWec2E3ug+cd
MoDV7dYOPrdUoufotVu1cL65Er1C7DZ97JlgPmITzUHeu/IxRP53a+H8XT6e
zcdz+Zikj3fO8z3c9175wWeafQCfe7RwmFqJXiE2XR97HpAffO4zB715v30A
/5la1k2xxuSa5T54PioPav+w/GA1pxKfEbB9SHt1PmZXoleIzdXHngfNR+wR
c5D3MXPTC49ref8M78tdn7AesP3A88i9UB6wWlCJnoDtU1qYvGUu3v20Pva8
ICf4P2OOW+UBV3rhee1EWd1qbHE+7pTta/Kg9q/IA1YvyZX+fVlLjZdUog+I
LdXHnhfNR+xVc5D3dXPTC29o4flkJfqbN7+pj3fOt07E3pMHrJZXoidg+44W
Jm9Xog+IvauPPR/LCf7vm4O6f2jt6YWPtKxbZo3J9Yn7YPuVPKj9l94bVisq
0euw/VzL3T+rRB8Q+0Ifez41H7GV5iDv1+amF77RwvNbLdy+lys86Uc+h/gM
+sW6w+RXLdx+ysciOf+sZd1vxuH5h7xh9aeWXlhlHLa/a1lXrUYd6d/VqmGp
5T9yhSEiHstkUq6Ghdu/xunlvzyHvkiqEYdnpRq8OeNv4+RNqxGHbVYNy7r/
zMd5q1fjLvDctBqfTdRs7WrUHSb/q4aF25rV6A84r1UNy7p1qhGH5/rV4A2r
Daph6YV1qxGH7XrVsKzbthr1pX5rVOMunLFxNbjCc7Nq3OuHfLStBqctcrtJ
NeLce8NqnENfbOkaGG5TDcacsVE14uTdqhpxemHrathfPYN+4XNiu2rcC547
VIM9zHepBj/47FgNH3x2qoaFQ7NqvJm37lwNH3vqVoMffHatRg6Y7F6NPoB/
HS3rdqtGnFg998Fz72owgNVe1agdfBpUo+fotT21cN6jGr1CrKE+9tQ3H7FG
5iBvY3PDv4kWzk21vK2574P59tWoEzXatxq1huF+Wli1qEZPwKqllnWtjNOD
/HgQGil1SoUmDvPD8lj7avTCAdXQ00FjZR/PJy//GVvfPZQTPRV0VdDBQS8E
bRC0cPY0hiZOQ+c13RzmaOTs7Z6KOciLzk1jY+jdNHGOJk5T5/wsOD/v//8/
618K7RRi6OU0d45uzj7O0b9BEwX9E3Rz0FdBdwXtnH2d8060R9B/qenpEKtp
4rQphYbO/uZCy+aAUmisbGGc+Wb6WIdeTlv371QK/RO0UXYohSYKeibo0KCt
gsbKdqXQOWG+jb52pUJPh9jW+si7o/nItXMptFU4Y5dSaKowR8MDXQf0HdDQ
wb9rqdCOOUlOaKIcKVf0VbrKo7vzuvqOKBV6Ot1LhSZOTxkfbS44o61yjIx7
Oq9jji5y7e1+at2vFNoosOlbCn0MWB5fCo0VWPZx3lTfsaVCT4dYE3295Xqi
ueDZ3zNa+W7mDb3j0XI7xbqQC52OK+WAJsrpskRfZYAMTnNOjhGl0GVo59rT
SoUmztlyPdNc8Bwkn0OND5LxWa6D5WD3U2v0T4bJAU0U9EzoV7RVhljTC5zD
GS2Wc0uFng6xjvoGy3WYueB5sWfAb7jzNr711FKhp0PsAH2nyAFNlFGyvKwU
uiswuNx5T32Xlgo9nctLhSbO1XK90lzwvEoGfY0z72GOEbIc635qjf7JDd4X
7ZDrZIm+yjjveq3zk/RdUyr0dIj11zdWrjeYC543eQb8Jjiv/Q4nv+NX09Mh
VtO2+Fs2d5VCGwWW6KvcJoOJznkn2iOzS4WezsRSoYkzRa53mwuek0uhsXKh
8ckynuQ6WE5zP7VG/2SmHNBEmSFP9ESmW9P7nA/Xd0+p0NMhdrG+aXKdaS54
zvIM+D3o/Gzfemup0NN5sFRox7woBzRRHpUl+ipzZfCI86v1PVQq9HQeKRWa
OPPl+ri54Im2yjz5zXd+lTnmyHKB+6k1mijPe9/nSqFxAM+FpdBd4XP0GecT
9D1VKvR0iN2kb4FcnzcX7NFWWSS/F50Pcv8tcnvJupALfY9v5IAmymuyRF9l
qQxedc47V5RC16Omp/NqqdDEWSbXN8wFT7RV3pTfMuf36XtDlsvdT60/LoU2
ChzQRPlAnmirvGtN33f+oL53SoWeDrFZ+pbL9SNzwfMTz4Dfp86n+NaXS4We
DrHJ+l6SA5ooX8kSfZUvZLDS+Xx9n5cKPZ2VpUIT53u5fmMueH4ng+eMM3/C
HCtkib7Kj9Ya/ZM/vC/aIatkid7ML971N+cv6vu5VOjpEFus7ye5/mEueP7l
GfD72zmfWfOsDdzQUOFzB00Ffu+e37WHA5ooaKPAEl0WdFdggNYKc96JBgla
JDU9HWLwQSsFzRS4ortCLniir4L2CvyIM4cxPtbBEs0V9lNrdFHQQoEDuijo
mcATfRW0V6gpOifMYYwPfRbqzVpi9AQ+8sKVfOSCJ/oqnAE/dFaY1zQ+0ICo
6elsVC50ZNAbgQPaJ2igwBLNFbRXYIDWCnP4o8uCPktNT4dYTRMHHRW4oq1C
Lniir4L2CvyIM6eHyEGtYYnOyg7WGl2UOrJBPwR9DFiir4L2CmzRzWAOf3zo
s9T0dIjRE/h2lGsdc8Gznmdkvps5PccdtykXejp7mAudjk7lQh9nb1miudJQ
Bo2c17Rm2stsb2PwQS+luVybmAuezeSznvFmMm7qupqezj7WGl2UNrJBywRN
E3iir7KvNW3lfCN9LWW2v7EN9bWQaxtzwbOtZ8CvnfPVfeue1qi9sdX0NSgX
+jgdZInmyiEyOMz59voOllkHY/BBL6WLXDuZC56dZbC7cebbmeOgcqGnc4S1
RhelR7nQxzlalmiudPeuRzmvr6+b7zjaWD19XeXaw1zw7OUZ8OvtnO8b9Cs9
CLNjjfG95D8/j2r6OCfKEs2VPjLo67ymNXOefE40Bh/0Uk6Va39zwR59lZPl
d6pzGJ/kupqezgBrjS7K2eVCH+cseaKvcro1PdN5O32nWe+zjLXVN1CuZ5sL
noM9A37nOm/uW4+X7XnGuB/aJGPLhT7OMFmiuXKBDC503kXf+fIZZgw+6KWM
kOvF5oIn+irD5TfCeWdzDCkXejqXWmt0Ua4qF/o4V8oTfRW0V/gcvcJ5b32X
+bYrjfXSN1KuV5kLnmM8o5/vZt7M/cfJEh2Vcebi95xnlQt9nBtliebKdTK4
wXlNa+Ye+dxoDD7opdwq1wnmgif6KjfL71bnZ+qbUC70dG6z1uiiTC4X+jh3
yxN9lTus6V3Oz9U30XrfbWywvtvlOtlc8JzqGfCb5vxU33qtbO8xdoq+8eVC
H2emLNFcuU8G9zsfoe9e+cw0Bh/0UubIdZa54DlbBqONM7/EHNPLhZ7OQ9Ya
XZT55UIfZ54s0Vx51Ls+7hz+6LI87DvmGRujb65c55sLngs8A35POYfT087h
h4YK/z3G71Dxezf8Pg71Rv/k+XKhlfOCXNFfeVYezzuH32LXwQYNlSWyetk5
LF903d3GX7R+6JksLxf6Ne/IDH2VV6wfeiavlwutnDdk+5rralo8L8vvLdc9
YG60VKaab6ksl7lupvFlcnrdvPB7zztRIzRLvrbe6Kl8KCd0UD6WK/or78vj
Q+fw+9R1sEFDZYWsvnAOy89cN8/4Z9YLPRN0TuaY+z35oa+yUobfer+aVs63
cv7adTUtni9k9r3rFpkbLZUF5vtStj+47gXjzNE6QR8D3YyaHgpzGKOv8qs1
Rv/k93KhlfOHbFa5bqnxVdb6L9fBDA2Vf2Tzn3OY/O26N4z/bb3QM0HnpKZf
wxzm6Kugt0K90DNBU6WmlcOcPkNrhXU1LZ7/ZIaGCutgRm60VOgR8rEOtuiv
sA72xNFhqWkM/SzDdfy3V3zolqBnQo3RP0FXpaaVwxw26K+gwwID4sxhiIYK
62CGhgqaKLBBO4U57NFdYR3siTNfIpNf7LN1/XdgmKOvgt4KcXRCuF9NK4c5
b+C+rKtp8XAezNAaYR3M6AW0VOgR8rEOtuiusA72xJnzZwkO1B2GaKjQQ+iJ
oDnRT2bon+yeFFo5dWSD/squMiC+m7nquQ5maKjsIZs9nXNmfddVjNe3XuiZ
tEwK/Zp97Sf0VRpZL/RMmiSFVk5T+6yx62CPRktDmTV33YbmbmEPNXIdbPdx
3QbG97FXmpgXhq28EzVCt6SDzNA/OSAptHLayAb9lf1lcIBzGLZ1HczQUGkv
m4Odw76d67Yx3s56oWeCzsmm5uZOMEdfBb0VGHbyfjWtHOY7ed/DkkKL52CZ
dXZdXXOjpbKD+Q6RbRfX1THOHK0T9DHQzeBzYVfPhzE6K0daY/RPeiSFVk5P
2aC/crQMejhvbN5eMkND5TjZ9HEOk2Nd19T4sdYLPZOBSaFfc5rM0Vfpa73Q
M+mfFFo5zOmzfq6rafH0kdkprjvQ3GiptDDfCbI91XVtjDOvaQx1k+EZ3gkf
uiXDrDH6J4OSQivnbNmgv3KmDAY5h+Fg18EMPYvzZHO+c9if67pOxpnvIRPO
P8jcZ8gcfZWhxi/2frBBL2S4bxjmupoWz/kyG+E6mNELaKkcYb4LZHup63oa
Z36r3yP5nlnT07lcxuirXJEU+jhXy2O0Mep+lfOa1sxEmVxtDB7opYyX7Vhz
wRt9lWvkOt55f31jk0JP51prjy7KLUmhj4OmCb2FvsoNcr3J+UB911vfCcYG
6LtOlreYC963eQZcb3de0/hYKcuJxrgfuiIPJ4U+zmR5oLlyl3Wf5HyIvjtl
MtkYPNBLuVe2U80Fb/RV7pHrvc7PM8cdSaGnc5+1RhdlTlLo4zwoS/RVZsp2
lvPL9N0v4weNjdQ3Q65zzAXPuZ4xxnczp0enee+ans4j5kL3Y3lS6OPMlyWa
K4/L4AnnvBMNklflM98YfNBLWSjXBeaC59Pyudn40zJ+ynU1PZ1nrDW6KEuS
Qh9nsTzRV3nemi5yfru+56z3YmO36XtWrkvMBc+XPQN+S52P962PWaNXjI3T
92hS6OMskyWaK2/I4C3n9+p7XT7LjMEHvZT35LrcXPB8VwazjTOfbo7XkkJP
531rjS7KiqTQx/lUlmiufORdP3H+sL4Pfcenxubq+0CuK8wFzy88A35fOofT
SufwQ0OFP298P6EvR1lv9E++SwqtnO/liv7KN/L4zjn8fnQdbNBQ+VlWvzqH
5U+uW2z8J+uHngk6JzX9GuYwQ2dllfVDz+SvpNDKYU7vorXyR1Jo8fwqv39d
Bxty84MTL5vvN1n+5zrYEv9PTn+ZF37oq3AnaoRuCXom1Bv9E3RValo5zOGK
/go6LPAgzhx+aKiwDjZoqKClAiu0U5jDEt0V1sGWOHPqhZ4JOif0FLm5E/zQ
V0FvBYboqXC/mlYOczhzX9bVtHg4D2boq7AOZuRGS4X+IB/rYIvuCutgT5z5
Qvl/nRR6OtwPxuiroKkCD7RP0ECBB5orxKg7WivbpIXWDFokMEF/hRg80EtB
RwUG/LsAueCNvgraK3AlzhxW+HZMCz2dXWWDLkqDtNDHqW9voa9SR671nJf1
7W596xsr6dtNlg3MBe+GngHXvZyv6Zv2knFj30m/U5stZYb+SbO00MppLhv0
V5rIoJlzGLZwHczQUNlXNq2cw76l6zYy3tLeauI9ano6rewn9FVap4U+TltZ
tjHGXQ90vpXxA+XX3j2bmWN/+R1kDPboqxwsv0Od1zR0DvOOG/kmWHY0xs+S
8/PX/Bw2LNFc6SSDzs5rWjN900IH56i00NbpIteuznfX11l+6Kx0l+dRzuvr
6yY/9FWOkQ1aKMfLtqcxuPZyXtPmuF9urD0uLbR1esvyOOeN9fWS6wme0dAz
j04LvRj0ROo572rd+vl+WKK50l8GJzvfT18/GaCPcmZaaOucItcBzlvrO1mu
6KycJssznLew3ifIE32VQdYVLZTz5XqOMVgOdt7VdwyVAWuHpIW2zrlyHeK8
o77B8hvqGYd4Ju9p6x0Hyg99lYvch2bHRNkON0ZNL3Fe05q5Pi10cK5IC22d
EXId6fwYfZfID52Vy+V5hfPe+i6zRuirjLauaKGMt35XG4PfGOdoKvA79fzu
/cmuHZcW2jpj5TrOeT99Y+R3nWf08cwrrR01QP+kl/caac1u9P30BJorE6zp
Lc7hfZPrajo4d6WFts6tcr3d+SB9t8jvThkMcR/zAdb7OnmirzLJuqKFgk4K
PTLFGL0/1Xl32Q6TAWunp4W2zjS5Tnd+kb6p8pvhGRd4Ju9BrwINA+rO59pA
7whDtFVmyhbNlVnWdLbzmtbM82mhg/NYWmjrzJHrXOej9c2WHzorj8jzMedj
9T1sjdBXmWdd0UJ5xvrNNwa/J52P8o4PyIC1C+WKDspTcl3oHK4L3A+/5zzj
Ws98PC30YtATGeN8rlwX+X7Yormy2JoucX6nvkVpoYPzelpo67wk16XOJ+lb
Ij90Vl6V5+vOb7fez8kTfZU3rStaKOik8Pm7zBj83nY+13d8IAPWvpsW2jrL
5fqu8wf0vS2/DzzjPs/kPSM9b4b80Ff52H1ofaADAttPjVHTz5zXtGZ+Twsd
nG/SQltnhVy/cD5P32fyQ2flK3l+4/wpfSutEfoq31lXtFB+tX4/GIPfj845
B+0Q9ECWuPaXtNDW+UmuvzhfpO9H+a3yjGc981trRw34IWT67EvPgeufvh+2
aK78ZU3/cf6avj/TQgcHnZSats6/ciX3fzL51/3wQ/MCBvBkH/Ol1nuVPNFX
QW+FuqKFgk4KPYLmCjF6H+0Z5o/I9iMZsBa9kZq2DposcMXHnLX42A8/6soZ
9BBn8p5p1uIV+aGvwucRmgH8rj2/hw9bNFeIUVM0WjbOCq0Z9ElqOjjopNS0
ddBkgSvaKsxhgo/98ENrBR0WeLKPOTzxodVCjdBaQYOFuqKRgi4K9UN3hRj8
0FrZPit0XtADgQFr0VKpaeughwJXfMzhim8H+aG1whn0EGdukxV6MeSlzzhj
c7nW9f2wRXelnjXdw3mqr25W6OA0zgptnQZybei8qm8P+aG10kjGjZ2XrPdu
/jlBx6WptUYjBf0Qvn+ju4IOC99XWjjf3Nq0lgFr98sKbZ2Wct3P+Yb6Wsiv
tWes45m8Z03vuJf82lov9qP1caI90c4YNW3vHD7oonTMCh2cTnJFO+WgrNDZ
Odg+OMj98ENr5TAZd3S+o75DrVFn81JftFCOkhn6Kl1k09U5/x+5/Bw5Pxve
wLVHWu8u5qrp7NR0d7q5H4bHeMYe7utu/agB+ic7eK9DskJnp4d1RHOlt3U9
znljfb2yQgfnpKzQ1ukjm77Om+s7Xob9ZdDKff3l1MO70gvoq5xifdFCQSeF
Xh9gDJYDne/tXXrKgbVnZIW2zmmyOcN5W30DffMgz2jtmScb4zMGfY81vF/D
rNDZQYeFnkBz5VxZDnFe05q5Oit0cC7OCm2d8+U61HlnfUNkg87KMFld7Lyb
vgutEfoql1hXtFCutH6XGqMWI5139I6DZcDaK7JCW+cyuY5y3kvfSPld5RlH
e+bwrNCLQWekq/Ohch3r+2GL5so11nS88/76xmaFDs6ErNDWuVau1zs/Rd94
+aGzcqM8Jzjva72vkif6KrdYVzRR7pLZbcZgeLvzob5jkgxYe2dWaOtMlOud
zgfru11+kzzjLM/kPYd63iD5oa0yNSu0XZ6X7T3GqOl05zWtmflZoYPzYFZo
69wr1xnOL9E3XX7ossyUMftmyRPf/dYIbZU51hVNlMet31xj8HvYeQfffI4M
WPtYVmjrPCLXx5yP1few/J7wjNGeOTsr9G7QQxnpvWbIdYHvhy16LE9Z04XO
b9K3ICu0bxZnhbbOM1mhrfOsTJ5xP/wWyeBO9zG/3no/kRU6O0usK5ooaKPQ
Iy8bo/eXOh8m2ykyYO1rckXn45Ws0N95NSs0d5bK703PuNszec9U/+7D38uo
y1uuo07LnMMJ7ZP35Yw2yzvW9z3n1Bgdku+zQlvnPVmhqfKJjD80F9zQAvlI
lp84r+kBfZgVejqfWlN0Ub6WCXomK60lGi2fy/JL5zWNnhVZoa1DbJ6+z7JC
i+cruX3rGbD8zjmaHOg/oBPxnO/7zvuhPYJGCZzQPvlVzmiz/GR9f3Fe0+j5
MSu0dX6RFZoqf8p4lbnghjbL77L80/kL5vghK/R0/rLW6KKgiQEb9DHQWIEf
Gi3/ypNfHPwvKzR60GdBU4e1aPq8oe/vrNDiIRc80VzhDPjxbuZLveMquaG1
srq50P9ABwQOaJ+ggQJLtFnQYIEB2inMyYEOCXolNW0dYvBBUwXtFbiiu0Iu
eKKVAh/4EWde0wNiXU1Ph/3UGl0UNEzggJ4JGivwRKMFDRZqig4M85pGD/os
NW0dYvQEPvLWtHjIBU80VzgDfmizMK9pD6E7Q414HzF6HR/1ggPaJ2igwBJt
FjRYYIB2CvOaRg/6LDVtnZ3ljaZKPbmiy7Kr7OvKIDXOnB4ix/aVQk+nvrVG
F6WxbNDtaCRLNFr29K57Oa9p9DSoFNo6e9kTDcxb0+LZW/ZNPQN+zZzzPeMd
e3A9/5wRQ88CDYSbZYP2SStZos3SUgb7Oeed6JB0qRTaOvvJG02VA+Xa2lzw
RJvlAPkd6LymB9S6UujptLXW6KJ0kA16JmiswBONloOs6SHOaxo97SuFts4h
9kR789a0eA6TfSfPgN/hzmvaQ+jO7O77Ons/NEZOlgPaJ0fJEm2WbjI40nlN
o6drpdDWOVI+aKr0kusx5oIn2iw95NfLeV1zHFEp9HR6W2s0Uvp5X/QM+soT
jRY0WPgcPcF5TaPnuEqhrUOsqb5jK4UWz4nyPMkz9vfdzDdw/z5yO9W6kAsN
kNFyQAflDFmivzJQBqc7553oe4yoFNo6p8sH7ZRz5HqWueCJ1sog+Z3jvKYH
dFal0NMZbK3RSLlIDuiaXChPtFbOt6ZDnXfWN6RSaOsQoyfOM29Ni2eYPId7
BvwucV7THhog2xHG2ug7VQ7ooFwhS/RXLpPBKOc1jZ6RlUJbZ5R80E4ZI9fR
5oLn1TI40Tjznua4tFJo64y11mik3FgptHKulyX6K+O963XOT9Y3zndcb+wk
fdfI9UZzwXOCZ8DvZuc1PZ1bZIi+Cpoq6Cugs4AOBPwmGqPudzivac3MqRQ6
ONMqhbbOXbKc5HyIvjtlhs7KFBlOc36hvslyQl9luvVGC2WWDO8zRh1nOEc/
A02Gf2XD2gcqhbbO/bJ8wPlIfTNkNtszhnvmPZVCLwadkaHOJ8lyru+HH5or
D1v3R52P0Te3UujgLKgU2jqPyXKe83H6HpUZOivzZbjA+WjrPVuG6Ks8bV3R
RFksy2eMwfZZ55N8xxIZsHZRpdDWeU6uLzi/Td+z8lviGRM8k/dc7x2fkB/a
KkvdhzbId7J91Rg1fc15TWtmRaXQwVleKbR1Xpfrm86n63tNfuixLJPncuf3
63vLGqGt8q51RRPlE+v3vjH4feCc/257278nPurajyuFts6Hcv3Y+Vx9H8jv
M8940DPfsXbUAD2UGd7rTWv2he+HLXosX1rTr5w/qe+LSqF981Ol0Nb5ulJo
63wjk6/dD78fZLDIfT9WotdWeNeazs4v1hUtFHRS6JHfjNH7q5xPke3LMmDt
n3JFX+T3SqG/80el0NxZJb9/PONFz+Q919kH86zLv66DYUmNFThV1EOBc6IO
C/VN1WOhxpuqV1LT1iEGqzXVVIFxVU0VuK2uDgss11B7paYHxLqang77qemG
6pnAZH01VqjlOuqwwHJddVhqGj1otdS0dYjRH2ur5VLT4iEX3DZSewWWG6vB
UtMeohZw3kTdlqqaMujHwAk9HfRy4IzODjo81Bc9Heb8/x/x/32ETk9NW4cY
rNDKQUcHxnzeb6NmDNoxfA+A5Q5qydBPm6kJU9PW2dFao4NTt1po5aCdA0/0
dHaRJbo5zGGMb2ffxlpi9Ae+neRa11zwrO8ZFd9dv1ro6TSQMZo76Oh0zcfh
1dCngV8jY9R9b+eHWo8tqoX2TYtqoa3TuFpo6zSRZWP3wwyNm+b2RAvn6+lr
Vi10dtDdQVsDLZXDS8GwlbH2fk09+fsTn7l8Zh9SjfXorqAzg64OOiidc9uh
Glo72IOrEWPtgebfyDNb2nPNfAO9wXt/1Lbz6y657ViNM6nZQd6rvV9zv82c
b+p5nMuPrHV3727510dUo8+oazfvx6+U1O7a2jM6et9DXd/Wc2G2v8wO97yj
/Br/6rLd0xxdPJfcnT2LfNxjc8/s5l1Z390aHem5rOFnuPj5D37W43DP483/
B9BGDTo=
           "]],
          Annotation[#, "Charting`Private`Tag$66417#1"]& ]],
        Lighting->{{"Ambient", 
           RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, {
          "Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{0, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}},
     VertexNormals->CompressedData["
1:eJzt1G9M1HUAx/EbIJlsWfyxeW5N0mJWVEotyfTX5E+MHFJiXeoDJnNgYwGd
RmOmkLOVLTtXlyJZmhoPLojAOSu7X7hrg3bTuFmhTuPuQDjhvMhaiHb0/f4+
P7/05B7Q1pP2eT9h++x29/vzfZG+vurZDXEWi8WWaLHEi79bJmQR7S/j7xvL
LKj+wAVv6WVnRIvL3NG27k2PdnPfHvkmWrHmitbbs7W6MPeM2ls8J080rx7R
fDXerkT3BbVPaxo8Pd0Z0rJc4ZSC7KDaW7saU733XdLumXOg5M7UQbXfFr1/
yJkZ0EJfaxWB1ZfV/sLrH25rrzqvjb74+Y3bQyNq9+3Jzyo+1aMlhh/d6Thx
Re076sZXbDnv1ta7/JV5nojaD/V+0qbvP6yvnPHDorXX1G7Jt83rqdnXrX9a
Pq2/Zs3kPt40M9r7xU/6u3GOuc3DYbVfvLhorsXSp+/M7/yx7tiw2sccuQ9F
n+jXl/2yKsfRPaT2/mvfB7xXB/X0otnhFYsH1P7gWwnp3qRhvX/z9ejzVv/k
71qTPK9Wh/W9HX1Xx9POqt0+r2zP73dE9PhdlxIGDp5S+5mhhR9UDUT0Ulez
Y1PjUbU/4sl5X+6FGb+u3Nx4VFfX+dvTu+X3bEpxl4vvUXu81/ml/N2H7WPz
r6edVfvLRcWp8jqX2pNTbFa/2gOzx3zyvkq8f0TFfam9M1I+Rz6HNNvbq8Rz
UPtXzuoZ8rndW/BMQDw3tXcfHz0tn/NHHUULxHNW+3O+UKV8L7NCd4fEe1H7
7pyGx93iPbbldWaJ96j2l+y5ya+J915qDW4U713tB/3vlclzcqv1se3inKjd
fq6iVZ4rf5JzVJwrtbf4pk/Ic1jcU2sT51Dtycd/ni/P7V1rE/PEuVX7kZkN
fnnOKycabjyVHVR7xqxjXdJFxrrlTcKF2rctcd2yUTjqy05YIhxN3ldV7Qbp
rn25a6lwp/bvTKd9rr0dXbu2um/u9IvoF9Evol/s9IvoF9Evol/s9IvoF9Gv
Ef2a0S+iX0S/2OkX0S+iX/O+6NfY6RfRL6Jf7PSL6BfRL6Jf7PRr/i79GtEv
ol/s9GteJ/3iedKvsdMvol9Ev4h+sdMvol9Ev4h+Ef0i+kX0i51+Ef0i+kX0
i51+Ef0i+jWiXzP6RfSL6Bc7/SL6RfRr3hf9Gjv9IvpF9IudfhH9IvpF9Iud
fs3fpV8j+kX0i51+zeukXzxP+jV2+kX0i+gX0S92+kX0i+gX0S+iX0S/iH6x
0y+iX0S/iH6x0y+iX0S/RvRrRr+IfhH9YqdfRL+Ifs37ol9jp19Ev4h+sdMv
ol9Ev4h+sdOv+bv0a0S/iH6x0695nfSL50m/xk6/iH4R/SL6xU6/iH4R/SL6
RfSL6BfRL3b6RfSL6BfRL3b6RfSL6NeIfs3oF9Evol/s9IvoF9GveV/0a+z0
i+gX/V/9Bj/78x3xfjXXx+N67eR7r4/lurWuwCE/3/JAw7lX/nEe/uvvj7XH
+v6pfj7W9ZdULFgonQfbrU+e3H9Yfb5ucaHhv2wks/5bcY7+7edjPYepfv9U
r3+q/89jXc/f1phUBw==
      "]], {}}, {GraphicsComplex3DBox[CompressedData["
1:eJxl3XlYTV/7P3CZhZApQ8gQRYmIqLMMhTKljMkQQimhUZkTlUIqEpHmWSkp
6uxK86C5NGgQyfQxVDSg31mtte7z6/t8/nme63W51t77vt/3aZ9z9t5H6oCp
tkHfPn367BzYp08/wf/O0Jb/5vVwG2/WvUFF8spfVf519/yH3tVM9/28YxtP
a8sv21xuLo/5gfFJ4xMubeUNXtXgnHdwOfjCn7K1DrN0eN5DRvgNm6AGvqLc
ee5hjS28DmOzth+dGuBZS/6+Wt+2kbcu62myh8JmcM2LrQUyrut460UnF8Xl
bgE30N/bPdNpFW9IzAXZWY464MtNH3YcGbmUl6Uz5e6w9K3g/XduC/lROZN3
6/gPD57VNnAl400nntQM5S8Y6hcgeU/ojmc1u4ZvXMD34Yn/fDFf6JVnTKoK
wnh8Bx1k1rBEuP6gyi8j7z1U599RSDnXkaANPtLVOPzbrvV8RZNBS5s5LeFx
XT2eazFfiz/eevFv14gN4Dcbn9j5rdHmXx6y+7u85Frw+CGvHvi/0+HLnttx
7FrLCvAvNiazk/9t5cceC54xKGYRuLP1f6FBLtv4b2bJf31fPul/3JQ4n/l/
dB0vsg74C7pdSbJdcDe6n6fJfoJvpsc1jBwX+CRah/mkDuBjaN3cSd3A22md
r5A6g4fSvjwkfQFHJr36CP5yB+m7G+m7cH9oTnJITsB30FwNI7kCV6E51CI5
BE+kud1Gcgu+jOZ8oElPzsHl6VxEkLkA30/nSIbMEfhbOnd3yNyBszl1yG0o
FsxpIuxPWs4gvrc7Kr412TuqZi5P6lx73vZ/3UiMi3E32OWOPGfuimowN0LM
TV2OmEldd0PhiveK5kragN+fp7xr8cpbyL/vsrn6MnbgY4KG+a2wvYn2bDCx
nJbuAM7Nb9ARvemM9v7qPOKf6AKu3i72YKHxVfRppciq879vgo9vW3xVLOIi
6j70MkPO5xZ4zA+rZSd+WCIx3WiRvflu4C/6Xnuv0XAQ/Tmv83eVlTt41IbR
XaY3NbnY16FrLe8KXa52QnXiuRPchDPFU8YqCj21efnr4byz3Jo0C62MNcL1
vzb+ms33vszVV8oGBFe5gqtOi7ieNtqJW7z4sufW7zfAf1h7VL6ruc6Je8mF
uu+4Br6WSx3xxNiVG36gMfjakCvgK2Z/n2j0+xaXWh4aZyBzAVx07mAr/f7u
nC3/iPn8RDNwT830Yh9nd27Co44HzU664HepR/n0OMd8GF3nAFkHfDXdbhzZ
Lrgm3c9+ZD/BO+lxDSLHBb6W1kGO1AG8ndbtDakbeD2t82pSZ/ANtC8SpC/g
4Rt79RH8LO37X9J38Ns0JyNJTsCH0Fz1NejJFfgSmsP/SA7BY2luj5Hcgo+g
OTciOQf3pHMRQ+YC3JjOUR6ZI/DhdO6qydyBszk1Da9/IJhTPvNdi/PvWdz1
R6sdF5c3lS/nGf6se7e7oxvN87+we+42f7ThcFfwAVMbxHzwaWPzUU5+KFev
uS833gncdvRHOyNVX9SkZDbx8Cw38MvKGpNLrXzQl7T307o4T/Ck4cGak5zu
I6vy9s+Wcd7gnwckf9965A5af+LO5/YWH3ADzT/WB0JcUYVNhNLm+77gk8OL
hod/uYL8/vrUrcj2A3fYKOIz540Zqswsu9HXzB/89Yilyz4LclwlpcXJewj9
7Ncur822F7gJj9dUv5UX+inXS8GdS1y4PWr7Z6av+v/WD/j5wkKQm0knnkq2
lD8CD4gQj90l5sU5fZvU98nHh+CB6l62tuUPOPHoPU5NW+6B5yoe3z/a8BGn
YNkU/Lv/bfAqJdNjp1t8OU2zeQtEpW+Ci4kt/rC0jz/3Olny3dh4O/DZIS2t
ux38uYy30v0N7I3+x/cQ55iPpOtwZB3wN3S7PLJd8Fd0P6XJfoI/psc1mByX
0Gkd7EgdwN1o3SRI3cBv0DrrkjqD36d9kSB9AS8d2auP4Jq9+w7+L4zkJIDk
BHw7zVUVyZWwDjSHWiSH4E9obi+T3IKfpznvIDkHt6Jz0UbmAnwgnaPPZI7A
Zenc3SBzB87mtFWto0Iwp3zmvOL2M+eqI1F4l/mAlko13jBziV2jfgjOD2un
ui60iESJogFLIvLsEPOE1AUybWoRSOn36uVDrrmBz5cabhmkHYZym04dnhN5
H3zWGHHdBWHB6JXDxBs3HH3Bt1tfrJi7PwCFotI701cGgtdOH3fQ+OojpCiX
NnmOQQh4tNS7Fc3mXih4cZRqfn0YeFbMoZsuc13R9P7vbe/5RYDH6+VlGKec
RccTTRreP4oEr5+Vf25Dw0FuUnuE0bgyoWtuWp19NMqB2zp5YnTlcqG/ute5
7PBbD85tjsPT2VXh4A0a0yLOVT/gvuYX3pBJCAVfZnktqtvOj2t/vvTJn6Yg
8FCj37xqiSBOct82nW2W/uABhle6b40J5e4kfjXqe85HWOcg+/X7DoZzk5Sl
v4creIJf1FH6+7MtgnukZf6l0dEF3H/+1cb6lEhuy6l96jKC/ML61PsR55hf
puucIeuAJ9HtDibbBQ+l+3mT7Cd4ND2useS4wFfROvwkdQBvoXVrJnUDf0fr
fIPUGfw07Ys26Qu4t3SvPoLr0r6bkr6DP6E5mUlyAn6P5iqC5Aq8lOZwGckh
+Eaa21iSW3BJmvPXJOfgMnQuGshcgD+lc7SJzBH4ADp3/5G5A2dzOk8nc6Bg
TvnMp6paPNjtEIsmRRRL5XDreZMru7xs3gvm60H+CE21WHRkjIHxiV1OiHno
7Nj016djUGeaqsPYvl7g7zpcutXln6Bpfl//XRjrBy7e6TNnjlEUartzStRU
cHzM/ym2FhieCkf3d+0dl+cdAb4k+1Bnk04QWhme8OH9+yhwh+iQynivR6im
NepTtfMT8OARq7/4Vd5GNqMVEkviY8C3KU36FSp43Rn8e8q5wQdiwTc9a5N6
Kzgv0TP8tEnistAV0pVe+pjc5Da7vt0hNUXoB2UyS+OnenPWvncDMxcK11/3
9zwf/10bl24TOiMrGvxM8ZqB8e0hXPINfQ/FgsfgTzYnOjYkRnIOv/1WLF0e
Br5yZPDMh7rR3LBrRxof/wwAr52wKzWp8Qn3VXrwTF8JH/AxQaulHnyL4co7
dos8C3ID93X6IKNlFcvxh/66uF9wvvR/fTtxjvk4uk4iWQe8nm63gWwXXI3u
Z1+yn+Av6HGdI8cFfoXWIYHUAXwrrdtoUjfwi7TOFqTO4JtpXzaRvoBrxPfq
I/j43n0Hv0ZzcobkBNyG5qqO5ApchuZQneQQvIXmNoTkFnw4zbmIZ0/OhfWk
czGfzAV4MJ2jiek9cwS+jc5dKJk7cDan6T/cZwjmlM98wDl3/ZNeCWj8xYGp
wzdu4alyJjb3y7tRR1X12ZvqCWhTTOquRyY3EfNLngoR0zTi0fLdMbdll/iA
31H1CA4Li0MNb4/NFckLAn9r5JTWZBWLcua4zxr5MhL85kqtH8cSo1Ggz97H
Y6yegGeap5RHj4tAYjr884riT8H9bAerRLYEoLhND7d6Sz0DPz7DY4vqufvo
fccAzZA78eAXkndWH45yQCfPue8MMkoQ7v9ciYQkwfupVLmcm9M8hH55xoyi
ZWfcuVVPdLZ3jRU6JzIm+/QcX+6O+sKwS9+F2z3d6uB40iuEM1bcq6s1Lw5c
Pak6V2dBFGf2KOjWxLIY8KYh8YvEZWO421a/0eHOKPAp8S4jk/2ecv/s3dav
2BsG/tvi9McWl2ecW5RyDk/cH/zXgA1uXdXx3BfRyc+0L3kK9/P60F0K9glc
aaB11SbbC+DJ1N2Ic8zb6Tr5ZB3wTrrdy2S74NPpfv4g+wn+hR7XTXJc4Otp
HY6TOoBfpXU7SuoGXkzr7E7qDB5K+7KC9AV86rxefQRXpH0/RfoOrklz0kxy
An6L5uo5yRX4U5rDMSSH4A40t5Ekt+A1NOdVJOfC9elctJK5AD9P52gzmSNh
X+jcWZO5A2dzekVl6kvBnPKZ97Vptn//iI8SRI7qDYrZytMeWDPjbFo3WusU
dm2nCh8F3D02L17wOs+8yH7PQB2xJDSwvvbp9cN+4FtW+54MmvoCmQXP4D+0
DgfPTv/kOetsPNr0g+fbdvgJuMUX5wD1pU/RF8/gM57j48Ad+kmvjz0cLai3
Mi9lcQL4eaczM6+sDkXFV+e+fxn+AjxJRKT1wtBHaFSoWcQ64yTwEaprtN4K
zi9HD19qHH+UD964/nibQqIZ51j95ajjPaFLKJms1xHkeN1epzijfkKXvnaj
1TkhgNt7zOLrBv9E8Osj4p7i8zOJI7xh664+B3fpqNp4a18M5zHRcN6+58/A
lWaJ2/K/xnF+v/vcm6EVC37PcULMu8YErku2NVF5XxR4rmLzsgPyiVzg5Pe1
9v2CwR8f1D8zkJ/EtZlET0nR9gZPHRuVaOXA55Z4TbHA74uZv6T+6W6Pc8yf
0HUKyDrgr+h23cl2wX3ofraQ/QRXocd1nxwXuAetww1SB/CHtG6jSd2E69A6
7yZ1Bl9D+7KG9EW4zoZefRQelwrp+xjSd/AgmpMxJCfgRjRXFSRX4GdpDreQ
HIIb09y2kdyCp9Kc7yQ5B19P58KRzAV4Pp2jKWSOwNXp3FWQuQNncxrV8GyP
YE75zEt35SdovUpBzRtFfY+O3Mk76RopOfNxN1owp2SNhlsKOuOqFBIgOO9g
HryNt/d5YzI6HPLG5Z1LIHhqYuO/fQ4cyuxz6vNT5yhwi67d6srWichn07lh
3KGn4FtbdKI3h8WjOI01Td8iE8C1Dl77WrYsFm0/2FeuYlMS+GjvxqWWDpHI
bc9/WkrjksFTfhnvLyj0Q/2fdi7aOTEF/HnH+4/Ogvc7WwdfthsTIfQ5/VJ2
n/phyUnkqex4kCP02/03W/HO3eekLiyrWHBK6FWR2tleK0O46Gc2GhMChds1
ybxdpvUqmuNb2mQur+CD9zu0zjTdPo7bIZd8LtvjBXhMcdXJ90HPuYnWy6JP
ej8Dz7eSWKIxgc/pTjP9d2VwDHiX9FCz6/rJXIb24g2ln8LAZ4c+b6rWSOFS
x7mqXBTkkXnoloOJDlwKF6u977+wL1fAw6jrEueYy9B1wsk64H/pdqPJdsGL
6X5uIfsJ/oIe1yhyXODDaB22kDqAW9G6JZC6gbfSOj8mdQbPpX2ZSvoC3rd/
rz6CX6Z930b6Dh5EczKA5AS86z7J1W2SK3A1msO9JIfgmjS3KSS34MY052Ek
5+CJdC5KyFyAB9I5ukTmCFyBzl0cmTtwNqffMm76CeaUzzzd0uKrhloaGq50
syn34G5ezN7Z6l63u5FU9aFBE0XSkPj5RPlxgve5zP/bFVy7VvklktqMGmvC
QsCnn6/T6vMzBbX4jeNUyp+A31NdsCVJMRmZT4zaHrgrHnxkZrPhpDGJKCHP
Vd57eRL4rIfhM1wHPkOKfjsr6iOSwa/Wyuvo7Y9Gjh5vQ/U2p4LLPh5xpFHw
OpJc80b0lNVLcBMLrXODrrmhFSkPqiympIEvXv25eZ6kDVfvkMONWSF0hdJm
Q3weM/D6gULTauE6sskv387lwrmNzfyd01uE27X8O3a44H0KN3/VAjcFlxRw
6bVGJg98BX9Pp+Zf5Qw48C2+wz90budzpw2H2P2ofw5etkts6ngpwXxFT+r/
NeQp+PFb82ynBKRy63XXTruW8Rj8R9H0vCsRL7kpVfWi+PyH+RUNm05LxTRu
9vQRTknjnf7Hk6V6nGPeQtcZSNYBP0G3q0i2C/6a7qcW2U9wXXpcpuS4wBVo
HVpIHcAv0brNJXUDX0vrrEnqDL6J9mUA6Qu4nFqvPgq327vv4MNpTlJJTsBP
01w5k1yBj6c5XEpyCN6f5jaD5Bb8Ns35RZJz8Kl0LkT8e+YC/Audo5VkjsCn
0bnbSuYOnM2pSOCGZsGc8pkXHvyT+To6A8Ufz/QrCNvLa1kZm/PRphsdGJ23
9f7hDNT/+Lxhz6d6I+ZeXrnvKq+ko9HlE/bO48LBp+rFDd8jkYYiLyYu/TH+
KXi0rGu838xU5Ny8Rumk2gvwjd3HDXgnOaRzOe3S6L3J4Lo+t14kZiWgUwX8
CYYRqeD31eqOr7GIQVUJQ8KbL6SBO0fc+Hx3ZQjSfnHwtmVeOviSeO/AQ289
UKlfksuZqxng1n7W10fg7xmTzl2fHiF0o9ySd/j9l8ynGZ3HVYR+87LjvcMS
UdzmZZpiG5cK1w9uOPz5dXQcp+G51ul00EvwyfWBR4pjEzn5W779trungE8/
eM/nxZ9kbkH03BnrJvDBBx6dlm8s/5Lzbvw9f+uqePAZVdevf69P494avZjs
kBMN3nlG/+eAIRnc6beatwTnm+CDpUqqRR5mcNOX15/vWOICPoT642U9zjH/
Q9fZQ9YBl6bbLSPbBR9C9/MW2U/w2fS4pMlxCZ3WQZbUAfwprZs6qRv4I1rn
DaTO4M60L3NIX8Cv+/fqI3jLM9L3MtJ3cGOak60kJ8L1aa5qSa7ANWkOrUgO
wVfQ3OqS3IKH0Zx7kZyDT6RzwSdzAX6HztESMkfg+nTuNpG5A2dzKiaZECCY
Uz5zy219FnaNzUaNA5ddudayn5eTHSM3Ra8b1ZWvMi1KzUJSkTsG+kn4IOZO
Wdce2eZmotF7H452FvxdYP6tPiRSXykDebq5WjZqPQO307C/LCKWhj53XXD7
OIMP/uNAjEPI/hR09lviLefxqeDLFe7ZKl5IRBsX9f81PyANPP/kB+nJl56i
jkFz5/wIyQB/ETnhaYng/FL0WvZ3E4kscCnJwEthCp7odeGyI3M+CH223Ma6
wzIXuCVyLg3pI7PBV+86Nw+J+3ORVvvMF7oL//2UfoE7cY69tmyQCDbPBE8e
K70Lf57S0nRR/W5COrjHxebmiS84zmSBntv54y/B69oHjvqSkcoFfjngd8M3
Gfz6w4ZLuYrpnFGzsk9w4XPw78ENKuPHZHKBhtusj4TGCPez4V/K3t1ZXLf2
rJf4fTHzE8Xrp84RyeaC1LxfDpG+CX6S+lHiHHN1uk49WQe8hW7Xk2wX/Bbd
zz1kP8Hf0+PyIccF7kvrcJTUAfwVrds3UjdwBVrn26TO4EdpX8JJX8CTe/cR
vGxyr76D36E5GU5yAp5Ic/WX5ApcluZQm+QQ/BPNrT3JLfgZmvMuknPhv6dz
EUrmAvwqnaPlZI7Aa+ncaZC5A2dz+nnsxquCOeUzv/vh9d8nprkoqJ/bpllO
B3hXRj5eorZM8Dr/7KUZf0wuygqz6vPc6xFi3ujR3rV8YA7aGfTfwD2C8w7m
44cazpBbn4V8DAuVZ19IAO+rc+fi0G/paKjd2AGmtsngG7a4+Z0ReYlGaORa
Xsp+CW4atex+6VwOSVnVqxxyzwBXK3dw6XflGVKrHHHmZnYWuOgK//cWgvcv
tTNPtx3UzQF38lBqbzL3Qt2jakafVckFR3lTukZEXORMREcn9zESenjX6beR
LQFczJ8Ti1IahOt4N4S9E7w+c7ujPfLVg7LB24ND5sSYvuDqvZr8Y1IzwS99
81gySTeFi1yXd+POinRwFbdTdlqOadyozakfby1IBf/cNs5YTyGTU1hd+6hK
Jwl86hmDx8Gq2Zy5ZOR+nC/maY3TTnj55XCao6M24M9dmDfPVzH6sjOXSw3y
UsDXIzD/SP0scY55Jl1HhqwDPp1u9xDZLvg3up/TyX6Cr6LHJUqOC9yR1iGE
1AF8cAipWw2pG3g0rfMOUmfwMtqXaNIX8A+9+wi+hPa9j3hP38HfIpKTBpIT
8AU0VxokV+B6NIezSQ7B1WhuJUhuwbu0Sc5Hk5yDj6JzEUPmAryezpEJmSPw
djp3bWTuwNmcbn/NbRbMKZ/5YbnpWwby85HK6uPbhk04xLthLvrbcKzg9UFk
SZrxboEbqvldHOuHmJusMWqTU8pDp7XjmvH7XOa3vcQV3m7LQWbfX68r9X8B
/sjA7kdHRibadWvJolG1KeDzLoiaHvNKQ/0nTvi7wiwd/JzPz6mr3iej9IBN
m5baZIG3eu8zkha8LtgPqP3yrjYH/PeSJ0vw52VDNxoGHXXNA9f7WS4hHXkf
Tf7kee3SlXzwUe2Xpx+QseNuT3S2q3wm9N/p6lPw5/v2czyNpWcKXdH79TB8
3tPxb81NlYJc8DtznM/jz2/5Y4+u/Z6SDa4+6YK1eUEq13lrj2nNkEzw04Zb
W+RWZ3BZRrmLBye8BLfYvU9vw4xsbtyW01J1ORx4xYP+opxeLvdT1OH3W8H5
DPOjgwcYZNTncR9nSfbFn/Mzl94eEr0tIJ8z8VFRMJjlBj6buhRxjvkxuk4a
WQe8im63nmwX3Ibu5yCyn+AX6HGlkOMC30Dr0EbqAB5M65ZA6ga+jta5jdQZ
fGYG6Ysd6Qt4Vu8+gvelfZckfQdvoDkZTnICXk9z5UhyBW5Oc5hLcijcH5pb
MZJb8Ls05wdIzsFd6Vw4krkAN6RzdJPMEbg9nTtjMnfgbE6D9sduF8wpn/n9
v6oD+/QpRCKt3r+9Hhrw4oznJzz4+g/9N7LK5JNHAXLuuB2o5+CPmK+Y8Wmo
oe4rdOubyQn8PTPzC9Li2UHb8tCst94Fgv6AbwucUzvYIxu1P08au07wfp35
ON0nknmyGehgy8I9gvM18LQ0y1YPuVQUNObbcXzczDcpb3d7YvoCGTYWDxj1
MQ8831BKTetVNErcn+Z+M/EV+J+iUvsz1Q/QHmVPa/W0AnDroKuGnPdlbrLV
GbS7Q+j517SS8feSJ6c8/HFSV+i2GWs68Pu14H3F8kGf88GV2xZP7dMnmct4
kvTOJi5XeLxt+xX+qaRxc3wctfF5AvNpJXea8loyuYVZvl0bBO+jmSvpN0rn
Dc3lHMPFhuPPz5kPkE3PsT6Rz7me6TMGfx/NXKH9hU/rqAJufF29Kr6ujLlf
eeQj0/cFnMJWw9/md93B/anX6fQ4x1yRrvO9tmcd8CF0u+fIdsGX0/28SPYT
fDY9LllyXOB7aB2mkzqAr6J1SyF1A79F6+xP6gz+l/bFlPQFXCW4Vx/B79G+
7yV9B4+jOeFITsCX0lwdJ7kCT6A5jCQ5BB9Oc2tCcgu+kea874uenIPb0LlQ
IXMh3H86R2FkjsC/0LlLJnMHzuaUX/ynXTCnfObdsiESOycWoe9iYkPmSx7h
Zb1b0L8l9R8ynVe9JqChEAVp+A6L/hmAmJt37s3vryzwzvwH+PNS5gbfkUmI
xiuUVM7j478jzP/WfzCy3pmL/FY0nbFzTgM/fMzZtD06E+UZnLi4MywLfOxE
d8s9gveNxQa5k7yl88B1Uz+uxueXJ7qWtC7/8Ap8ifVNF/y9y3uR7fdtTArB
55cuMhQ554Pe7JR8daxT6JX9fy1wGXKF0//qOjp3XBG4TdzRl/i6hIrZmptr
UoT//tUZSQv8eU1rsPTqgK4CcGv+LkWcY9vNjgF2D/PBO6+E357mm85prYnS
7jiXA87Pz0s47ZXNFYe0j02NzADv92Z360hBbv5cG31Rel0q+H+HjWd3WBVw
nv10b+H3xczTD/0Tm3KvkNu67+Yj/H0xc6Otpy/OGlbE2Y6ZMhhfR838GPWZ
xDnmGXQdRNYB/0m3a0e2Cz6Y7mcL2U/wdHpc2eS4wPtdJXXQJHUAv0jrZkHq
Bt5E6/yd1Bk8gvalnPQFPGxArz6Cd5X06jv4FJqTJpIT8NU0VxYkV+CiNIdV
JIfgejS3FSS34K0055Ek5+D76FyUkbkAP0nnKIXMEfhxOne1ZO7A2ZxulrQX
Fcwpn/nBA6nTb8sVo37zJ0nIuh7lvU9vuWHt8Q8FyJ6v1P5RhGp03+k36wQh
5rFKVvcleEWoyEiyBX++znzVgBHcNYlCpFNecgufdzAP3rtppstIwfnodnMX
pYp08OvRor83zs9Gm8uKN+1emgOeIXrLbHRQGgr5vksP/71j/knk3in8fkTp
4dPv64wLwdX67L+Hv6ebds86osqiCHzKzY8nj119hGxH958QPLQYfNAqr2OL
jK9yG6Uc2gtkhP6vxcr5ybgIrkRyyW6nAuE6ezerLk7KSuB+mP6XKdct3O69
M9PQbblULpjvfxqdKQB/tnjG/rX/Mjj1knUF+jJ54KPOcJ8uK+VyyvJTBudN
ygI3L1l/Z+vzV5x3foMXzgtz3V23Fy1KKORO+U3yxZ+jMP9+weyuXmAR10/F
eRO+voC5SMMfsfNTijl+mcdJfN09877UDxDnmP+g63xd3rMOuB7drh7ZLrgN
3U93sp/gE+hxKZDjAk+mdUCkDuABtG6+pG7gp2mdv5E6gy9qJX0pJn0Bb+rd
R6HfIH0/Q/oOLktzMp3kBLyI5kqZ5Ar8Oc1hNMkh+GWa290kt+APac7vkZyD
8+hc7CdzAf6EztFXMkfg/nTuxu/umTtwNqdrikImCOaUD//eVb9qrXIJ+j1+
z+MfnYa8L3bZvFUGgvzkuU116ShGKbIPu/B1y8wlHhU69VMpRpfOVgfj73OZ
W44blOs2oAjdNxykgd/nMpd583kjPq8dYC/3q0IiE/y270U9ed8clLxF9bPN
81yhdx8Ux3O+48wDcXX/AnCljYtuHbdNRv6RRrOm7y0C/3VpuCofXxfimBfX
aVkMvui31+zrjr5ogc7cOYfHloA7u7YUS6U7cPVqipM1Fwt9mb/hUnzdW7p6
vFRJmXCdM3M3SuLvA/6E+sjZdAi3O+uYfvtawXnS2yBlpdaAQuF2dQ3+NGhl
cY7fNyRIZOWDuwbs1F+dmcflXPHglZzLBuftmPXNCBVy7ncuzsfnJ8wTmifN
sHlcxDUpHRLHn9szv+Ka/ntNaDH3L12ah69nY24vOvG6tkwJ5z3xl1gn5/k/
rkKcY+5A1/lA1gF/QbdbQLYLvpLupxPZT/C79LiSyXGBq9I6XCJ1AFegdasj
dQP3pHXuIHUGN6d9SSN9Abe61auP4J2/SN8Xkr6DV9GcmJGcgMvQXAWRXIE7
0hzuJzkEv0Zzm0dyCz6V5nwUyTn4KToXoWQuwMfSOfIhcwS+i85dN5k7cDan
nsF9owVzymfe+PLF+H8qpajOK9vj265jPFG+79hDCwU5H5Cv39RRgh7s4BYl
tIcg5kabRsroLSxBb81qWh74JoC/UJI/7vS5CH06eTvavCAVvCV0wvhmuUK0
4EStzFutLPBTnz887B6Sh9avbxYZvyAf3FXafYjgdRtF2vn51wUVgu+pGF83
UTcFpb8pnZu+rhh84J1+XJp9HHoe1a/V9EQJuN/wW7r/7PxQP6+VfkvGl4Jf
UtaTzxjtxKlvrDHJWSr0p2XDW/H1upssxz7XKBWukxEmaoe/x7RYP+Td5i/C
7SZ/0FqC39+9VHTqqr1SBL5xZ2fRwbvZXG5zUg1+H838aEtwnNiGV9xE876b
1CpywG9qTjn1ZWIRFzYmyERwvgnuixwmH30g+Hu6R/v+xBcceMXKIaonA0s4
/f1PB9/aFwPeVL5eccG8Uo7bcDRtp5gX+Afqu4hzzCvpOuvIOuABdLuBZLvg
bnQ/H5H9BD9Jj2skOS7wHbQOL0kdwHNp3ZJJ3cAbaZ3NSJ3BS2lfNpK+gNss
69VHcIPefQf/eJvkJJHkBHwzzVUWyRW4Hc3hE5JD8MM0tztIbsH/oznnkZyD
x9O56CBzAX6UzlFf8545Ar9G566ezJ2wPnROS4zs7wjmlM/8/EenfhuXlqF3
SmOH34ow5rUqPlds+fMX9X1+WL71RylKWjI+RHl5GGKut+LpvMRppch+Q/Ky
n/XPwU93np07MqcYyZj3d8WfrzKf6ThjXuGvQrRIp+A2/rvDfIpn1s55h/NR
W1zrAPd7r8AtYmNKcgXnl1bjitETyyJwDe/mEPy9S6GC9O3CuSXgo7b9lsTX
I4q5lhYU65eCB+3XGr7V0h9VXtE8Ez2yDLyv3iXH2zuuceM/+cx7ryj0jJGS
9vj6+35X2mwu5wjXES1LMcXXJWQGNo/VrBBu9+Ky4Jn4OoPZl2WDL+0vBjda
/8Qa5/hbo/iYRtNC8InHRGzw5yn+7/cr3JyZB349Z+5jnW9F3OFng0fg98XM
88+9+ORlX8IVD4z2wN8XM+eNV4g95VXKKdW9OoWvo2beVlB04bF0GXdp5pXn
77fcA/9FfTxxjvkKus5ksg54Id1uOtkuuCvdz91kP8Fn0uPyIscFbkHr8JnU
AdyF1m0GqRv4HFrnNFJn8CbaFxHSF/CBe3r1Efxw776Dt2wlORlJcgK+jOaq
lOQK/AjNoS3JIbg4zW3fZz25BZ9Cc76S5FxYBzoXS8lcgO+icxRI5ghchM5d
36U9cwfO5rTepUlMMKd85uWaZavzZMvRmRtLxDa0mfAu2hVmD0gX5C1ph/3m
hjK0N7fs+LFT4Yj5r3euXskDyxB/YdjmyWMSwc/Wf7yf5VOC5lRM/IQ/X2fu
GJvVER5fhO7Oca3B5x3MZ0hsbJ0R9wrN+dfXDH8OzHxT1bK3+P3FpleRp9V4
xeCZD8/a4O/dSgK9JZsGloK3hCQtxdejrp72V4zTLANXm8V/KLs/AB2PEZ9s
LFIOvvrlRNNhN525CeELxiyUFnrOXbMtxonRXJM4T1oyXrjO7VFFdbyTHHfG
n7dg0HPhdr8ONjmcJ5vBzXSe+uay4HWUudwQzZ+C12duonZXe8LcIvD2Zf8S
Au4UciVbjl7A/Wd+/P4ns3WJxZxurYoD/lyE+f3wwy5PDpVyTTWFrvh6AeY2
WZeGNtmXcaojZDzxdfTM/2lomxlIlHOfT/XxnOh0H7ybui1xjvkZus50sg74
A7rdSrJd8FN0PzeT/QT/S48rixwX+FJah3GkDuAdtG5SpG7gT2mdT5M6g3+m
fXlH+gKundarj+AitO+mpO/gJTQn6iQn4PE0VxUkV+A8mkMdkkPwcTS3SiS3
4HY050Ek5+Cn6VwsJXMB3kLnqJ7MEfgEOneBZO7A2ZyuDZccKZhTPvPI4atm
jx9TgUbc6bTzUDDl5Wi3jYxxEuQtelw/j8xyxIVLbcr3jkDM73Lvvw15V4am
jZsThK9bZq6/Kumurmkpcs6Vl15plg7+Y9GVPvJmxai/zPA+toL3ucxd9dR/
6ArmNsyscsB//oXgmze/fKW7NAf59n9rtvpfMfi4n8+7Lma/RFVp4dmhlaXg
w2vt+uD7H7R2N3SUCI6P+e7gn+3TVgai1bsUXfp9FPqgxKfTAhNduNBrkg4b
RlSARz93yML3g92tvjo6+r7w33vaj7iAr5Obe/zVCBn3MvCgavX1+PsDfQm3
w9f/lICfalNuGCc4r8p5VOZtWl8E7lUQ0aK2pojbJtkvxk1wvsE8w8UzwOJi
CRfdIboEfw7PfNfdZn3t5WXcxLZC7Z7r06gPMY05Z3i0nLsrO3osvm8L+vVd
NOK/PhXclj1HEyzivME7qNfo9TjHfChd5yxZB1yPbncY2S54Dt3PALKf4A/p
cWmS4wI/S+uQTuoAHkvrtofUDTyE1nkOqTN4Ke2LJ+kL+PSkXn0EH0v7rkb6
Dv7lDcmJNskJ+ECaq1qSK/AVNIdBJIfgl2lun5Dcgn+mORcnOQffQ+fCm8wF
+G06R2pkjsB/07kTjeiZO3A2p0WPW+0Fc8pnbl3Q/CqvpQJFiPFTLOaf4Jk/
f7ti9CbBvA+pG2LgX4E8PiT/epsYiZgHyg7UVIkvR6N8prh0beeDT27y2X1i
cRkSS/i7XH51BrhG5fCCAdIlSLVvivfqzDxwBVdRF8HrNhq9qkNUfU0R+NB/
Dk6XlXLR+NNbLPbFlYAblxlN1XJMQzGpSWMz/crAn6/fEfQu6DkyXBt7OVak
Ajwyzv5xpUQQ2tLgFjA+U+jBBQ/ymmqucymlnkkl/wld7GvEUXwf68Uh43Y1
WAl9t2lsLL6+V9VGaco2g3Lw3/Earfh7T8vDQ/av55eCl7z3TMLvBxO913TE
uxSDz3Ip+PDsaxGntjh1E/4+mvmLwccOOfJKOZNfk2+c9soGN/idpiE1pJxz
uyLS/DkjFdx0omX3g5UVnL7IGXn+1zjwYxFnH36qq+A66/sdsSl/IKwb9YvE
Oean6DpqZB3wo3S79mS74Hy6n/pkP8Fl6XEtJccFXkfr8IzUAXxAAqnbKVI3
cGNa52WkzuALaV8ukL6A5xf26iO4Ae27Nuk7uCfNyTGSE3A9mqtnJFfgnX9J
DieTHILL0NxOIrkFX01zvoHkHFyCzsU0MhfgfnSOlMgcgZfSuWskcwfO5vTX
47RUwZzymWf/dtp+M/s1MpilvrKZO8Eb9uM/ezTiLzL5e+jjQavXaMmJZ4qL
Cx4j5oOf2zt3X6pA1xwzdiQbcOAbi5b6PvtZhiaIjSzD1x0xH7r9+PRPhSXo
7CfxiROy8sHD5JbU4vNLWZeLOfjvFPOtkySd8fcuByuXDd1wuBS86OzzFfh6
xFchTmM/HCoHj/jZnJfl8QKlP51oOaigAryVt0uhqykIaUzfKb/h3mvwpH9R
Kdu/3+Bsp0Y2GqUJfWO6ah2+z3yQIWrR1hD6mf7B8/D199FPnS8ukhOub2Ol
fBZfl9D+VmnHMasycP8pfwed0i3gikv6jt+kWAJ+yPGBWIIgx88/eY3E74uZ
V6lfl1vcUsrZ7P+nhr8vZr49MqAgO7+cU5q1+jy+jpp598frevNGveZOLTFr
3/v8GXjOLYeYP7GvubVqdwZHf3wInks9e3WPc8xFPpF1dMg64LvodmeT7YLX
0v08TvYT3JAeVyw5LvAoWod8UgdwB1q3NlI38Ou0zpGkzuCnaF8Gkr6Af+nu
1UfwENp3TdJ3cEeakyySE/Bkmqtikivw1TSHR0kOwf1pbheS3IIPoDl3JjkH
16BzIUvmQvjv6Rw9IXMEfozOnQOZO3A2p47/bV0lmFM+c50R0l2DPSrR0uVv
1Q9rnOTZHvL8teXVHyQ9oLn/shWVKNXgoJiMURRi3ng4x7579Wt0x31lHr5f
irmq+/qyhsBy5P/51snOjEzw5aof+7ublaLUcyEF+PN15h+y9n/D7xd+/nZZ
gc87mM+KWNrlPDIfucn9nJM8vAx8i/wGdXx96e7Nv+48n1wB/mmLTchS60Qk
xS1xtrr1GrxdPLdxflgwaoiXFdUwqAS/13W5cKXtTW5gQJZGwg2h/zO1nv3B
KpZLWaj8KXKk0KfJO7T6zUzlJsw3XW7+WbjdvWPFZwzxyOZW3jli8mh2Objb
zBmqzXKF3LH1jxfjfjLvevv4t+D1mZsbKqqMP+dgXvmX3yX3UHCerL/DCn//
z/z60ArNTocKDrmvtsPXxTMPsVA/8qL8NWfnNdYW3y/O3HLBa9O885Xc3s4r
YSVWPuBW1CWJc8zD6DqHyDrgrnS7CmS74G/ofg4n+wnep5Ec1yxyXOB3aR0O
kzqAG9O6qZK6gSvSOo8jdQafeYL0hSN9AV/yp1cfhcfVu+/g6TQnM0hOwFfQ
XO0juQIfTXPoSXIIXk9z20lyC76I5ryY5Bx8KZ2LODIXwnXoHIWROQKfRefu
M5k7cDanu190rhHMKR+2O74Avd1Whdx2Lo6Pyz3JC/WMcjC49gd97eP+2+1f
Jaqf98a36X0UYr5Sp5/4l87XqMtKY1ZDRDL4mNpDs/y3VCCrnLtO+Lpl5uP6
Gn3mBHNYKxe7HH+fy3zj0CBl/PnUqu8a5/D7XOajN9+vCvycj3Q7ldZYhpeB
T/tRmHjQPQNtit65ri2nAvzA0wal8k1JKMJ9tE/M+krw99vQFmmDEJTtVrLr
+cwqcM2il2su/L7J/fl29bKRltDdv/cJxs9JGRWraOmbL1xnhV/jNHz/WPc6
mw3pD1+DfxjRfBRfVyd+1MjK/1U5+LaRU+7h7xsy5Y83rhecPzCPW+xogM/D
eLtHTsSfqzN/Ourk4XmryrlqG+3y+9J54OPHKIgYLHvNXTM7EI/vw2Ke2y43
vtO1knNaXlaWvDgB/Ow2f+8BK6o4iwm/1fFzO/+vKxLnmOfTdYzIOuCT6HZt
yXbBE+h+5pP9BE+kx7WEHBe4Hq1DKqkD+C9aNzFSN3AdWuc/pM7gL2hfRpC+
gH/u3Ufw27TvOaTv4Co0J49JTsDFaK60Sa7ARWgO95Mcgq+huV1Pcgs+gub8
P5JzodO5cCJzAc6jczTSumeOwL/QuRsq1zN34GxOVSdtTxDMKR/qcytzZN7Q
anQ/rNHWb80pXqGm7MDbawR/R1qlnk1/UoX2acW1PdSNRswdHpmqnA6qRP0S
uPPjpVLAF+e/D332swLtrk94smFGNrhunmuR4HUb2TUNHnMMFYLfPrBXbV1i
MbpRqvrS4mIJuErR5/lbn79CEy6OPiPIC/i1vMnduxUy0Yu3Cq82mb4Gn/PN
fQe+n1azZWPm8c5K8E9lrStcx4SiOZeGPtSqrAKfIntuXoyxK+fsnX9TfmA1
eNvb/zbh5ztFv06Qqjsv/PdeuyZ9wPe9Xp45rqxGQ7j+CZM/y/D1wIvf/Zw0
37gC3Fb1tzX+njTGeegEwfkm+HeRxiP4/WNTbcldnW9F4J3KltyX6nJubtDk
7JEf88AdG3euTW54za3IWrAzVzEdvOOAcrjXqiquf4CY/rvGBPBf34OO7Wyr
4qZ/WZkpbvjof7z2c49zzLvoOo3+PeuAO9PtKpDtgv+j+ylJ9hP8Fz2uOnJc
4JdoHSJJHcAv0LotIHUDj6B1vkDqDC7ZSPrymPQF/GXvPoJ70r7LkL6Di9Cc
bCQ5AT9Nc8WRXIHL0BxOJTkEv05ze4fkFlyH5vwayTm4Ap2L42QuwC/TOZIg
cwR+i87dNTJ34GxOm5YOOyuYUz7zkz3XkVcj1TMjrnQknOJZnr8h0qfPH1Tw
OyT2nm41Sj2pfGNmVjRivvd68959GlXo3Uvv/gtcUsC9xlraVTq+RhIvfsTi
+3GYl1ls2IrPL70/PTLE1ykxD7gjkYi/d5nVouGBP79lHjPTQgZfj3hp2jIf
/HeNuf7v4HX4Pr0de+d/vjSkEnzwmtCuZRV8NGS5mPn+B1XgA9TH1sxOCEVH
Np17k3ypGlzT0K4ipMqVU370qzUhSuhDJAzD8fPUZDarf5o4W+h3TX/H4vvM
lQNcFpl/FG7Xp/nPCNu4XG73AIPv3d0V4MZT346su1LEvfzI18Hvi5l7T3U2
x5/XqLpueYS/L2Y+z0RiPs7xqtUnXPF11MyHRus/zDhXyem3XZmL7y9m/lbm
3yud5ipurcqb/LVXn4OXhqvfOP2wmkt6vuPGz/JH/+NWxDnm7+g60mQd8BF0
u1pku+AKdD8Xkf0E96PHpUSOC9yM1oFP6gD+mNZtO6kbeAStsxKpM/hC2pfZ
pC/grb37CB6tRvp+lPQdvEGd5GQoyQn4JporPZIrcB+aQweSQ3Bvmls5klvw
VzTnASTn4O50LuaRuQDXpXPUSeZIuA6du29k7sDZnPbdha4K5pTPvKRIpiZo
Ww0a/tvxp8MsM94L9Zk5yc+60OQEz67439WoLiiybY38E8TcJPaR4G9sleD9
8bdC/FwQ5j4vs7/mjKtECiqF0fi+Ieb3gxtz8Pm/daXYUPcBReAvBu1zwN+L
1ZqoV+DP15l/OvXRB18v2m1dthefdzDfomRdNm99lqAPzne23K0El1VJXo2f
L9T+YYab2pJq8Jd9WnMCtMNQQtTXhLRpNeAGS/kPlFbe4q6ihfXpm4WuJ8If
Gh4WxymndOwd+VK4zs2092v2SKRxV2YdkNY4VwW++7j+4OBtedze//654f4w
H/Nx9E2nz0Xclm+WEfhzC+ZmHxrPnVhcxo0okV6Av89nPlH7/ivB6zO3THRy
z3XuzD9keJcpjRLkbMsoP3z/N3Mn83mP6wW5PHFbSg0/F4359D25B6fzajgz
Ef9/hqq+4DOozyPOMXeh62wi64B/ots1INsFn0r3cy7ZT/DT9LgGkeMCn0Tr
sIHUAfwYrZsuqRu4P62zHakz+FXalyWkL+CjlXv1EdyE9v056Tu4CM1JF8kJ
OI/m6j3JFXg9zeGA0z05BI+huf1AcgvuQXN+geQc/B6dCzUyF+CGdI5UyRwJ
60bnbnhwz9yBszmdEZDcIphTPvOwlYm1Iz/WoCl948bPcjTj9ZF8se+XSRc6
G/9ik7JjDZpkr5pc4/wEMT86dbScvHE1er3NfPCezangbeJRB/Fcbah6tex9
bQ74iVj7vfjzpr8rbq7G1y0z32Y7tv79wFJ033tJLf4+l7lSTUQUvj/h2/1k
bfw+l3nEEu3OG9lZaF6O9+TzU6rAXStqCxePS0aZHzWDq9OqwTMqj2/JrQ9D
BnOP3pkYUwN+YansV3mfW9z8xI9rRzYKfdqFb074+aH6e2ySzukI/XbfykT8
XJX2iII3koOF66s1Vw7F95sd2rctG58PMP+xar8Mvg7vilRAS9OhcnBT7Ybh
+PsJpzdjLfD1Y8wHJU5LwedtOgrWT/F9VcznnIybVOpZxV2ZYfzf95AMcKfO
adNExGu4JRoR5/BzOJlr7ckcNKqohlOe3+2w6b7v//h3+R7nmLvQdUaTdcDn
0u1akO2CD6X7qU72E9yCHpcdOS7wDlqHC6QO4Nto3faTuoGH0Tq3kTqDb6B9
2U/6Ar5AuVcfwY/Tvh8mfQc/S3OSQ3ICfpfmagHJFfg8msM2kkPwjTS3ASS3
4IY05wNX9uQc/DudC30yF+CH6Bz9R+YI3JbOnSaZO2F96Jza9WmREMwpn/kL
6YI46xNvUGbl6Lv+7wR/f0VXHOamC17HZHeurhd7g7oWOwbzGwV/f6lL3RGR
ePClGl2KH/BhSkAqePrV/U8Er9uoI6/kGKeXC35xu9K0TocK9GD18402j4vA
M2ec1XtyqBRdnTXDXnt5GXiFRvA/xYRCpMiTnGyw7DX4QbP1KsGq2Sgq2k9O
kC/w2XqRXS76ychG0qH505oacHdxA8M9B8PRlcdXn9grvwGfa31J59jvW9z4
K/P66RkJPVwrWKHV5Rl3PT5/mOxr4TouplwEfh5UyCrLqQlXqsHvTUp+h++T
5TQlrgvON8G5dHdpfP3wvlkXErPzy8E3f/LWwt+rBqYvLfeyLwHn1xRq4veb
928k/mm3KgC/HvBJ6vDYam6ime8ofH80c7HnTjGnPWq4+fYO7/XlE8HtAg9a
D975hosw2ZVp3eILfpn6QeIc81F0naFkHfBbdLuDyXbBU+l+Xif7Cb6NHtdD
clzgGbQOuqQO4GG0bs9J3cD9aJ0DSZ3BX9O+OJO+gNf37iP4ctr3q6Tv4OI0
J2dJTsA301w9JbkCz6M5XEZyCM7R3N4kuQW3oTkPIjkX/ns6F2L5PXMBPoXO
0V0yR+DH6NzNVeqZO3A2p5X+270Ec8pnvndQkWzQ5zdIPNXEumGJOc/euVti
eXknOrh6pa6lwxs04mi3V9bCGMRcX8crzEK/Bi2aH1aIn8fIvGnhn5H4/HLA
taK+qgW54It3TJPE37uY7044gO/fYW5XVSCKr0dsOauL8HVNzCPs93rh+/Qm
WfMs8Oe9zD9k3ziMn1+TFJ30D/8dZL6+QLlSIjAZdf66pa2SVANu46lcPasq
HHUmhC97FfMGPHH7I8/MNW7c2HNj3514L/Slra597L4/44zfqClVawl99glH
ZXy9bukDyV1NHcLtdipd2oXvK+sfPnYBfl/M3Lu/czu+/j4jNcYGf1/MXLGf
3gJ8XULYtJqh+Dpq5gVO+5rw5zX7ns2VwfcXM09oPiGPc7wgcVJHkHkmeIOZ
RPHo4W+4qJtrAvHzqJl/Wf0itLD4Ddc2abxD2io/8K/UQ4lzzN/Rda6RdcCT
6Hanku2Cl9L91CL7Cb6MHpc/OS5wf1qHFFIH8KFLSN26w3rqBq5C61xI6gxu
QPtiRPoCbrajVx/Bp/buO/himpO/JCfgxTRXqSRX4L40h1Ikh+C2NLd/SW7B
5WjOz5Kcg9fTuZhI5gJ8L52jDWSOwPXp3K0gcyf893ROc0qenhbMKZ/5Hhvv
MYa6tWhe2INZCZfMeY2RkaqODp1o4sXGcdltb9BTxZL0ytMxiHnlWM+Dl3Nq
kEOXwX78PA3muVnKi/H5/Mm80xbySnngUtfRSfw91+28nVn4finm3trGZ/D1
n3a622VE35WBa+eds8D3Rc67UqeOP19nfqfs8AP8vKD7o/rp4vMO5s7DrVsS
GpOR9ZJV6Q9mvwGX1di+tUUtAj08PtcwRaoWXGvwtazp1924z3lTCiZtFfqy
oL5iUhrx3MaFuyfvTxKu07QifkLVlXTu/AXHZ7jezPUudq021H3F3T578jD+
HIK5mM0Pdb2FJVxfS8sb+Pt55gt39jmiEl/OrdbslMXXrTO/EJW683RQJbc8
t18mvp+b+fgXPxYKXp85xZUfr+HnnDHfFzmj2Nv6DTd9yL4cbbEkcCWfqX5K
K2u5HQskakc6+YEvoS5KnGN+gK7zd3DPOuCT6HalyHbB7el+LiL7Ca5Mj0uF
HBf4OFqHPxY9dQA3oXVzJXUD/0PrbEvqDH6U9mU96Qu46JBefQR/tY703Yf0
HdyS5sSW5AT8Es3VI5Ir8LU0h4okh+AeNLcuJLfgE2jOH5Kcg2fQubhK5gK8
jM6RD5kjcAk6d01k7sDZnGrZfpYWzCmf+Vb155Y3E2tR6fIvzsPSzXmrw5TH
5yh3Iun9y8eEba9FGwq9A0vjYxDzBdZHffCc1M30t8DPW2ae1qZ4GH9+tGt4
V39D1zxwJefdO/F1FaUtaW/w/bnMd9o7l/E1y1Dw14ESpbLl4P6m303xffim
Jg9i8fe5zN88MLTAz6c7WvbkCX6fy9x4tGrMjokp6P3+n6Ob7N+AT/8SaHvX
LwLJievfXmBXCx5hO3nVvnw3LsdTt1A+Tujxvl3O+Hc1xsfZP74mKXTxAcej
8PNGs8y2LcN/35m7W0cH4u/pjx0R1cWfezNXVYpqx/enzRb7q4uvB2O+Mvt3
z3V7ZrVasfg+KeYN0dIv8fcZddHTL+LnhzC39R1Vj8/zDPSNE/FzNZmHl20e
9rniDTfF79J6/HsTzPf2VXMa5lfLDdE8JI9/h5H5PuovNHqcY/6YrtPh27MO
+Hm6XW2yXfAmup8VZD/B19HjOkaOC1yd1mE6qQN4IK3bEVI3cBla5zRSZ+F2
aV/Gkr6AG57p1Ufw9M+k7/Kk7+DbaU6aSU7As2iuTEiuwO/SHFqSHIJr0dxG
k9yCy9Oc15Kcg/PpXJiSuQCXo3P0m8wR+Cw6d+fI3IGzOV24QvW6YE75zMsk
TtxoHVWHFm34b0byP3Ne8NW9O6d86kCa2ZHjW0Nr0VKjh+MefotBzMNGaiQI
XrdRa+TOFVcjXoIfn6btUn+pGh3cl1yQUZ8Hrli3XvVF+Wt0aVb/2WtDi8FT
VS9UvbcvQ6si7gYaHi0Hr2kNP6AXWISmbo9R6nStBNeY8bbjrl8OarE2VxIR
rwE3W1FlVK2Rgr6YvJEQ5BHcZ2+//j/aIpCRVMiGXxW14EYtO18e6O/OOeRc
lb84tA58gdeJBvx7QCO/N/dROin899s+tY8dOCSDy6stSBecb4I/cPnC4edH
ldj1S9ZprgL3fT5QE99XG2Onvn7eqNfgzj6XhjxcWcFpXBd9dMqrFPzdNvEY
/D3sgzDbTsl7heBqMX2f4fenbUM239m7Owt8wscx/5XI1nKD2t/Ows8ZY+5t
uiZZpr2Wq4qyUFnax1+4n9SvEeeYT6brNPzuWQd8Hd1uI9ku+Ee6n7fJfoK7
0eNaSY4LPJTWIZLUAfwxrdsrUjfwY7TOWaTO4PtoX8RIX8DntPbqI/gq2vdj
pO/ge2hOvpGcgC+iuWonuQIvojmUJjkET6C5XU9yCz6X5tyZ5Bz8KJ0LGzIX
4EF0joY97pkjYf3p3BmRuQNnc1rdvmqWYE75zC/8ift4UrcOWVr8a30x34L3
Ye2EcUF3O9C3AylSF3/WIvn+97ZNnxKLmH/6sHUYPr+cYxuz/kT1S/AudzV1
/L1L37nzGvDzG5m73Tmfia9HrNwptQM/14L5cvXDXZPjy9CR+ohV+H4f5pJy
e2Tw82vkR9R64+ugmK9q3Jie3JCDEkf61uDPh5l3D3Pch3/vJEJBLx3/3WSe
veFiYsXySBQkLbvry9Q68EdKW8zHKbpzsr86bb/pCP2HZHE4fl4bl/9VWyVe
uI5NSslMU5UMTuld3kL8vph5yk3/ifj6XlU940b8fTFz9e5l+fg+889vF37E
11EzzzfdZ4Svv1ce3m6C7y9mnnwuVgFflyD1Jhrh524x9984bgL+vGa7aJYW
fh4189S+8qI4x2NyDI7i32li3iF6/avRijquXXPKYvz7xcw7qQcT55in03W+
ZvesAx5Mt7uabFf47+l+TiD7CV5Kj2sBOS7wDbQO70kdwItp3ZaSuoHfpHVe
SOoMPm0K6UsS6Qu4/pJefQQ3on0PJn0Hb6Y5iSI5AZ9Hc5VCcgUuTnO4mOQQ
fCHN7UmSW3BnmvNGknPwNjoXE8hcgDfROVpB5gj8K507fTJ34GxOf6hs/yWY
Uz7M3cFvxz551CGzX7Ihn3dY8Cp0PiTYr+tAkyrun1kkV4dcGtaNXq8Wi5if
9rAdhs/PpfXNr+LfeWCuWz/8A/7e6vLOtchkdz74q1OpTcorKpH6kf678HNB
mMdr79uL73NsfPdTCd8vxfyCZlwofv7P9Ba7me7/KsHrTP8Oxs/FTbfyMMOf
rzPP07hftM4tBal5iirg8w7m66IDHyhYRKJwHbOqNsFxM1cofvj98C53wXnp
1oDdN4R+eVVZ5U31BG6hc+RsXD/mR0aOv3z/cAa318lID3+uwDwsQ9n7k0cB
N2OwSAz+vh2Od/4n66aOEs7xdWsjvg4d6rm6cKqBfwWncFxnFr4/G/YnZVvu
9CdVHPd+/zL83DLmnXfWbasXe8O5Zc/Sws/zZv6y6Z204PWZ8+2ftKrnd66o
m/+wGvXEto7LqhOJl93mD25B3Zo4xzyDrmNL1gH/R7d7kWwXfDHdz3iyn+DT
6XHNIccFXk7rYEfqAJ5E6zaF1A38HK2zLqkzeCztiwLpC/jP3n0Eb44ifY8g
fQd/SnOyluQEPJvmKofkCtyS5lCG5BD8Mc3tV5JbYT1pzjeTnINvpXNxj8wF
uAWdIx6ZI/AJdO5SyNyBszntq2kfKphTPvPEAv1D6ml16G1u8E2elQXvdsaH
lupf7WjwgCNZOPdmLruthhyIRcztlPQ24s+Dgh+WbbackgZ+6sdoD3ydxPKF
+37h5y0zj8hY9madQSXapdi6HT+HivnlC0rNx0TKUeDLubH4/lzmt6zd6oKG
FqPp0h1W+Lpl5gNf5HqeUclFMv1bwvD3ucx1Lpn3w79PVvA3ywe/z2U+Xsmq
qvFRJFr/6t2GToc6cEkby81qVu7c2GF//4YnCf1bsFkg/r3JBY8Xb8R/r5nv
XLs9Cv8OxzXT5Ln4c2zmmo6tHvh+Oafpf3Px9V3M7636Homf27JzZtxEfN8T
88cebRH4frazb4ccwc8DYf70cbMfvs6v61fOM/ycTOZHxiXH4O8/Ml29lPHv
RzDfHLpIE58X3nmwZxT+XUXmiTZ515tC6jiN/Ed1Imb+4EnUO/J6nGOuTdc5
SdYBP0a3+5RsF/w53c8Wsp/gcfS4LMhxgfvROuiQOoDr0brZk7qBm9I6XyV1
Bp8aQvoyn/QFvL53H8GfLSZ930D6Dq5Cc1JMcgL+4znJlTzJFfhVmkMZkkNw
W5rbKJJb8ACa84Mk5+DGdC60yVyAn6dzlELmCHwgnbsgMnfgbE6fTRpwSzCn
fOby2efdTN/XoR02KSFBLha8SMPa8Fz/diTevX+A4HUbycmOmbPFKhYxv63d
7ay0shb93S1qbqWYBi5xdJHadF4N+jvPZfr2gHzwyEH31+adr0Tb73LJ2jIl
4GuibFcbSJQjie3ur//rUwF+c0D263NTipFI8/fkASuqwDPjmls+78xFu8W/
So0qqgHPerAIOXAp6O0ZD69hfrXg9hY76mtTItF/Dm/cBfkF36GoLOvr7M7p
XzPQLKwVekXy1HD8O7lp3x0/CM43wWcde9+378MMbtkCy0eFxW/A+6itScfP
VeaP/3vp9MNq8PtS71bh5029+OLi/yf2NfhiadtwfB9uqKGD6WPpMnBxq1gL
fH2yea7O8VnDisCP31U5j7+3nbl/za/ZItngxUf5L/H72TlHtI5YOfDBFz75
vbgtp44rK/q1dreDP7gi9cvEOeZldB0Rsg74KbrdUWS74OPpfhqT/QRXocfl
S44L3J/W4SmpA7g4rVsCqZtwHVpnJVJn8EEppC+ppC/gkxb16iP4TNr3b6Tv
4NE0J+9JToROc7Wf5ArcnuZwMMkhuCrN7XSSW/BAmvN9JOfC46VzMUauZy7A
b9E5GqfXM0fgI+nc6ZO5A2dzWrh4aphgTvnw79sbFHd31KHTIcqBkvcseGPn
Tm231Bb8/X2Ucw+fX7ptPLh5wuVYxNzR/9gL/L1L09lNy8euSAP33PA6FV+P
WPZo5m/8uwbM+9o5zcD36Vl6OWnh5z0yl/s0rGmBdDka/cn/KX4OBvMF0ZEv
8XNdh54eFYrvD2Ku4x2zHv/eydTrZw7h66aYzzmyqNo7JwUdW6HciD9PZr6o
T+rRMWWRqM44dGCE4O8sc6ur/o+s7rpz2pZ9s579FPqhGpkm/DvQv/5cssbv
i5m7zr/8DP8+1txrKm/w98XMhzlmGuDnp0hO+vQJX0fN/FbMrPP4eWrRgVHl
+P5i5oU2bnn4PvMDDwdL4uduMfdbOM4bX38fq5Qhgp9HzTzH8+QwfF2CZKPN
c/w7TcyT3l1bhD+vOR3yeiz+/WJYP7vPRpxjJ7nbo+U9/MGLqCsT55gn03W0
yTrgr+h2Rcl2wYPpfoaT/QSvoMelS44L3IvWIYzUAXwKrZsEqZtwfVrn2aTO
4O60L62kL+DLHXr1EbykO6Wn7/Wk7+CjaE6Ok5yAq9JczSS5ApemORQnOQSf
SXMrSXIL3nmJ5PwCyTn4LToXX8hcgNvTOeomcwQ+kM5dJpk7cDane5BnkGBO
+cwvd+P/6tA2bflvXg8teIlNRwb06dOOdK2v6uPz7bka7g/0HGIR83uPxPvg
76Fe5tsf1VRLAz+D+vPx9Zm8g/3S8O88MP/hL1eK71u8maYqtk65BDzKaNhY
/Dyft90LtuLngjDfztv31UOuGJ0pDz6E75divniIrwP+/Zec09c68XVkzP3E
5qvi30Vtd8twwJ+vM//WmnP6THUkEr2maIzPO5gveHhGn/N2536K9+upB/Op
x3XiTnolcJYJB9/jzwmY959t/P11dAZXPlp6Bv7+nPnW378l+vQp5LTef63E
15UzPxRuO+efSim3pU/tOny/NfMcT/Qmr6WCG2C+u2XD0jJwD9ntk/OGVnNJ
Vw8MxM/nZv7myzrO+sQb7sGwJaL4d6uYj6i+7946qo5rPv11Af49Z+Z9l6p6
CF6fOfP2fd/M7/qD96M+gzjHXJyuk0LWAW+g271GtgvuRffzKdlP8CJ6XH/N
eo4L3JjWYT2pA/geWrf1pG7gk2idi0mdwTfTvpiTvoC39e4j+HXa96Gk7+DO
NCddJCfgU2muCkiuwNfTHNqRHIIH0dx+IbkF/0hz7kVyDm5J52IbmQvwO3SO
asgcge+kc7ePzB04m1PxBS7fBXPKhzyHFq+LcbmM+k2qfbjJWRPpFJlEeXR3
I+MtXw4XPbiM/lx4lzazdhKPOfv3B8m/5/7vv1d4Epwh+Pd85n/f9InObBS8
H//OvTXw9Ef+r/N9VWUEr9tqz1K2/6tD6ku3e9g+sOAx/0P//bAfPf+eYy5+
bu11fP4Q+nWM4HVXmMP688sCg1y28dbGrnf9WD6J96/nOLvBw4nzmY+m6+wj
60DO2f7k9X96W7A/fLZd6dc67oVe5khK47DowluyaOb25mPvBeswP0ycY56g
0vHre3sdOiB25fZZb3c01MFb4uGYdnBP4hzzx6L4/5ijV7N+9LWvHcpj62x9
ZeEveW8bL2jqk3FxNUNh/yPXqi/Arzv9ttaPSRWsz/Z/ws5Hjz0E/f3a6TxB
R9Bftj5bZy9ZB+rDtjtpz9P+gu3y2XbZOvxp8hKCdXhsHbZdZbJdqP//A6iM
LC0=
     "], {
      {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[2], EdgeForm[
       None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[
         TagBox[Polygon3DBox[CompressedData["
1:eJxFnXnclVP3h8+57/sc42ue53lokKRJkaQyVUplaEBShjJFRCKJiFLGTBma
RJKSKYlMJTIn8xQyz5n97uu3rvO5/9if9ey19l5773WtzpPe5/m+2/c5vctp
SalUStYuldLctq7mX+e2Tj72yEclH7mrVLcUftbU02b52D8fm+Zjs3zU18ee
RvlYMx9r5aOBOVbLR8N8rJ6PNfKxl5Z1exontrf78iuVWuZjw3xslI998rF+
PjbIR9N8rJOPdfPRTLtePprk43/GmutjT2PzEWthDvLua+6N87GfdpN8XJmP
4/PRJx+t9PHOo3wP922Xj63zsU0+2uRji3xsmY8DtVvl44B8bG6srT72HJqP
HfKxYz7am2PbfBycj+3ysX0+DtGyrrU1Jtdh7tspH93kQe2PkBusOuVjl3zs
mo+OefEPzEebfHTM5zsb65KP3d3TwXzEupqDvN3NTS8cqeX9B3lf7nq09YDt
+fnobO5j5QGrnqXoCdj20sLkTHPx7t762NNXTvA/zhzN5AFXeuEEbQtZNTN2
ovtgO1Ae1P5UecDqJLnun4+TtdS4fyn6gNgp+tjTz3zEBpiDvKeZm144XQvP
HqXob958hj7eeYx1InZuKXjA6uxS9ARsz9HCZFAp+oDYYH3suVBO8D/PHIfn
4wJrTy8M1bLuLGtMrmHug+1l8qD2l3pvWA0vRa/D9hItd7+4FH1AbIQ+9lxk
PmIjzUHey81NL4zSwvObfCzMxzP5uEIfDL/Ox9PGrpEHrK4uRU/AdowWJneX
oud491h97LleTvAfZw44XytXeuE6LevGGyd2g/tge7s8qP2t8oDVBLnSvzdr
qfFNpegDYrfoY8+N5iN2mznIO9Hc9MIdWnheVYr+5s135WOI73zM93Dfe+QB
qyml6AnYTtXCZHIp+oDYNH3suV9O8J9uDjjfJ1d6YYaWdZOsMblmug+2D8uD
2j/kvWH1oFz5HJ2tHZ2PWaXoA2Jz9LHnAfMRm2sO8j5ibnrhUe049/WxRo9b
D9i+53nkfkoesJpfip6A7ZNamLyRj3t99wJ97HlOTvB/2hxwfkau9MKzWtYt
NE7seffB9hV5UPuX5QGrF+VK/y7RUuPF+bjT2Ev62POC+e7Ix1JzkPdVc9ML
r2nh+UQp+ps3v66Pd86zTsTekQeslpWiJ2D7thYmb5WiD4gt18eeD+UE/3fN
Qd3ft/b0wgda1r1pjcn1kftg+6U8qP3n3htWn5ai12H7mZa7f1KKPiC2Qh97
PjYfsS/MQd6V5qYXvtI+bS3od3r9W7nC88xy/jmdj4Pz8bM8YPV9KXoCtj9o
YVIpR8/x7p/yscg9v8sJ/r+YA86/yZVeWKVl3a/Gif3hPtiWy8GD2v8nD1j9
LVf69x8tNf7LPiD2rz72/Gk+YqVy5CBvUo7c9EJaDgvPbcpxJ+6blcPHO7cu
x3uIrVUOHrBavRw9Ads1ymFhslo5+oDYmuXwsWe9cnCC/9rlyAHndcrBlV5Y
txyWddVy1Jhc65djH2y3yL/+0dpvmn/9naw2Ksf3Er7PbFwOC+cNy9EHxDYp
h489G5QjH7HNypEDzluWIze9sJU9wfv/V477ctdty1EneLYqR17uslM5eMBq
+3L0BGx3KIeFSZ1yMIbDjuXwsWf3cnAitnM5csB513JwpRd2K4dl3S7liBOr
az54NipH3WFVvxws6dk9tNS1gRZW9dzHuj31wXavcnAlV0N9zPc2Nwwba6nN
duWoB29uog+2zcrBFf77loMTfPYpB1c4tNDCqrlribXUx5425WAPn/3MQd33
t/YwPCAfm7uuqedz9oHug+dh1h1Wh5SDE3zal+PPAGwP0vKmduX4M0DsYH3s
aWs+Yoeag7wdzA3DjlpY0XN83vCZ0kkfbDuXgyv8u8sMVkeUo1dg21ULq5PK
0XO8u5s+9vSQGfyPNAecj5YrDI/Rsu4o48R6ug+2feVB7fvIA1bHloMrdT1O
C9ve9gGx4/Wxp5f5iJ1gDvKeaG56oZ8Wnl2sAW/ur493Xux7uO/p8oDVgHL0
BGwHamFyqn1A7DR97DlbTvA/wxxwPkuu9MIgLetOyUdrc53jPtheKA9qf4H3
htV55eB6eD6GaGF7rn1A7Hx97BlsPmJDzUHeYeamFy7SHmk++oVeGW49YHuX
55H7cnnA6tJy9ARsR2phcnM5vufx7sv0secqOcF/lDngfKVc6YXRWtZdYZzY
1e6D7Q3yoPbXyQNW18iV/h2fj5Ot8dhy9AGxa/WxZ4z5iF1vDvLeaG564SYt
PEeUo7958wR9vPMS60TsDnnA6rZy9ARsb9fC5NZy9AGxifrYM1lO8L/THNT9
bmtPL0zSsu4Wa0yuKe6D7f3yoPb3eW9Y3VOOXoftdC13n1aOPiB2rz72TDUf
sRnmIO9Mc9MLD2jh2SLNP2PzsWE+ZumD4WwZw/YRecDqoXL0BGznamHyYjl6
jnc/rI898+UE/8fyMU7O8+RKLzyhZd3jxok96T7YPi8Pav+sPGD1tFzp34Va
avyUfUDsGX3sWWA+Ys+Zg7wvmJteWKSF58ZJ/neG3H6bj8X6eOenvof7vioP
WL1cjp6A7VItTF6yD4i9oo89b8kJ/q+ZA85vyJVeeFPLuiXWmFzL3AfbD+VB
7d/PxxxZvVMOrg/m410tbJfbB8Te08eet81H7ANzkPcjc9MLn+TjUd//uvfl
rp9ZD9hmSZxH7q/kAasvytETsP1SC5O/zcW7V+pjz/dygv/X5lgoD7jSC99p
WfeNcWI/uA+2v8uD2v8mD1j9LFf69xctNf7JPiD2qz72/Gg+YqvMQd4/zE0v
/KmF5+fl6G/e/Jc+3rnCOhFLkuABq//K0ROw5R9al8nkX/uAWDkJH3tWS4IT
/NMkclD3ShK1pxeqSVjW/WONybV6Evtgu34SPKj9ukncG1ZrJ9HrsP1fEpa7
r5VEHxBbJwkfe9bMv/7YHlkviRzk3SCJ3PTChklYeNJzfMbwmbJREj4YDs6/
7pCPjvnYMgkesNosiZ6A7eZJWJjUT6LnePcWSfjYs10SnOC/VRI54LxNElzp
hW2TsKzbOok4se2T2Afb3ZPgQe13TYIHrHZKgiv9u3MSlhrvmEQfENslCR97
dkgiH7HdkshB3jrmphfqauG5aRL9zZvr6eOdbZN4D/fdOwkesNoziZ6A7V75
WCMJJg2S6ANijfSxp3kSnODf2BxwbpoEV3qhmZZ1e1hjcu3jPtgekAQPar+/
94bVvklw5XN0P+0m+WiZRB8Qa6WPPS3MR6y1Ocjbxtz0woHardzHZwE1amc9
YNvf88h9WBI8YHVwEj0B20O0MDk2H01896H62NM5CU6724/kgHOnJLjSC4dr
WdfROLEu7oNtD3lQ+6PkAatuSXClf7trqXFX+4DYkfrYc4T5iB2Tj4bm7Wlu
eqGXFp4HJdHfvLm3Pt7Z3joRO1EesOqTRE/A9gQtTI63D4j11ceeU+QE/37m
oO4nWXt64WQt646zxuQ61X2wHSQPan+m94YV/6MUvQ7b07XcfaB9QOwMfewZ
YD5iZ5mDvGebm144RwtPvh/y9x3+rnOu/GD7Vz5ey8fr+bhQHrA6P4megO0F
Wphck0TP8e6h+tgzQk7wH2YOOF8sV3rhknwc7bqLjBO71H2wvUoe1P5KecDq
crnSv6O01Pgy+4DYFfrYM9J8xEabg7xXm5teGKOF5zv5mEWd8jFWH++c6nu4
7w3ygNW1SfQEbK/TwmS8fUDsen3suUVO8L/RHHCeIFd64WYt68ZZY3Ld6j7Y
TpIHtb8rH0NkNTGJ7yWwvUN7Xj5utw+I3amPPbeZj9jd5iDvZHPTC1O0vP8m
78tdp1kP2C7yPHLPlAes7kuiJ2A7QwuTp8zFu+/Xx545coL/A+YYJQ+40guz
taNlNcrYQ+6D7RPyoPaPywNWj8iV/n1US40fTqIPiD2mjz1zzUdsnjnIO9/c
9MKTWnjem0R/8+YF+njn9HwMN/a8PGD1TBI9AdtntTBZmEQfEHtOH3uWyAn+
L5iDui+29vTCi1rWPW2NyfWS+2D7ljyo/RveG1avJNHrsOXz4B7vvjSJPiD2
uj72vGw+Ym+ag7zLzE0vvK2FJz3H9w8+U5brgyH92MnYR/KA1ftJ9ARsP9DC
5Kckeo53f6iPPSvkBP+PzQHnT+VKL3ymZd0nxol97j7YficPav+NPGC1Uq70
71daavxlEn1A7Gt97PnCfMS+NQd5vzc3vfCDFp7vJdHfvPlHfbxzzTTew31/
lwesfk2iJ2D7mxYmvyTRB8RW6WPPv3KC/5/5eFXOf8uVXvhHy7qfrTG5/nMf
bFdLgwe1r6Rxb1glaXDlczRNw76bj3IafUAsS8PHHn6ggnzEqmnkIO/qaeSm
F9ZIw35srget0Vpp1AO29dI4j9zrp8EDVuuk0ROwXTcNC5Od0viex7vXS8PH
nk3S4AR//p1gpZw3SoMrvbBxGpZ1/DvCVzLfNI19sN02DR7Ufus0eMBqizS4
0r9bpmGp8eZp9AGxrdLwsWezNPIR2yaNHOTdLo3c9MIO+dd/yPN/afQ3b94x
DR/vXDuNOhGrkwYPWO2aRk/Adrc0LEx2SaMPiO2eho89DdLgBP+65qDu9a09
vbCHlnU7p1Fjcu3pPtg2S4MHtW+Sxr1h1SiNXoft3lruvlcafUCssT72NDQf
sabmIG9zc9ML+2jh2ama/10jH+3y0dJ/B4Ltfmlwhf8BafCAVSt9sN1fC5Nu
afQc726tjz3t0+AE/zbmgHPbNLjSC+20rDvQOLGD3AfbzmnwoPad5AGrw9Lg
Sv920FLjQ9PoA2Id9bHnkHxsb+xwc5C3i7nphSO08JyYj8H5ODcfXfXxzgG+
h/v2kAesjrInYHu0FiZH2gfEjtHHnuPkBP+e5oBzb7nSC8dqWdfdGpPrePfB
9mR5UPv+8oNV3zT+jQ+2J2r3zccJ9gGxfvrY08d8xE4yB3lPMTe9cKqW9/fy
vtx1oPWA7RjPI/fZ8oDVGWn0BGzPysfBMrnMXLx7kD72DJET/M8xRwd5wJVe
OE97uKw6GDvffbC9RB7U/mJ5wOpCudK/w7TUeGgafUDsIn3sucB8xIabg7wj
zE0vXKqF5+lp9DdvHqmPd55mnYhdJQ9YXZFGT8D2Si1MRqXRB8RG62PPODnB
/2pzUPex1p5euEbLusutMbnGuw+2t8iD2t/kvWF1fRq9DtsbtNz9ujT6gNiN
+thzrfmI3ZyPM817q7nphdu08Cxn+fe63C7Px+36YMgPEC5LIzZZHrC6K42e
gO3dWpg8nEbP8e5J+tgzXU7wn2IOOE+TK71wj5Z1U40Tu9d9sJ0tD2o/Sx6w
ul+u9O9MLTWeYR8Qe0Afe+4zH7EHzUHeOeamFx7SwvPONPqbN8/VxzuX+h7u
+4Q8YPVYGj0B28e1MHnUPiA2Tx97FsoJ/vPNAecFcqUXns7HBNc9Yo3J9Yz7
YLtEHtR+sfeG1fNy5XP0Be0d+XjOPiC2SB97njUfsRfNQd6XzE0vvKyd4r5z
rdEr1gO2P3oeud+SB6xeT6MnYPuGFiZf5uNJ3/2mPva8Kyf4LzMHnJfLlV54
R8u6t40Te899sP1MHtT+E3nA6kO50r8faanxB2n0AbGP9bHnffMR+9Qc5F1h
bnrhcy08X0ujv3nzF/p456vWidj38oDVN2n0BGy/1cLk6zT6gNh3+tjzi5zg
/4M5qPtP1p5e+FnLuq/y8ZS5fnUfbP+RB7X/y3vD6vc0eh22f2i5+6o0+oDY
n/rY85v5iP1tDvL+a2564T/tMmtBv9PrSRZc4Tky/7pnPnrlY7UseMAqy6In
YFvJwsJkiyx6jndXs/CxZ+0sOMF/9SxywHnNLLjSC2tlYVm3RhZxYv/LYh9s
N8mCB7XfKAsesFovC6707wb51yut8bpZ9AGxDbPwsWedLPIR2ziLHOTdNIvc
9MJmWVh47pXFnbjv5ln4eGfDLN5DbLsseMBq6yx6ArbbZGFhslUWfUBs2yx8
7Nk5C07w3z6LHHDeMQuu9MJOWVjWbZlFjcm1Sxb7YLtHFjyofb18pFmw2j2L
7yV8n6mjhfNuWfQBsbr62LNrFvmI1TcHeRuYm17YU8v7d8jivty1kXWCZ1fz
cpdmWfCAVeMsegK2TbQwaZUFYzg01cee/bLgRGyffKyfBeeWWXClF/bVsq6F
cWL7mw+eB2VRd1gdIEt6to2Wuh6ohVVr97GurT7Yts+CK7na6WN+sLlheIiW
2uxtPXjzofpg2yELrvDvIif4dMqCKxwO18Kqo2uJddbHniOzYA+fI8xB3btZ
exh217LuMM/n7KPcB8/jrDusessJPj2y+DMA255a3nRMFn8GiPXSx56jzUfs
WHOQt08+msvwBC2s6Dk+b/hM6asPtv3kCv9TZQark7LoFdierIXVhVn0HO8+
RR97zpAZ/AeYA86nyRWGp2tZN9A4sTPdB9sh8qD258oDVmfLlbqeo4XtIPuA
2GB97DnLfMTOMwd5zzc3vXCBFp79rQFvHqqPd17ve7jvCHnA6uIsegK2w7Uw
ucg+IHaJPvaMkhP8LzUHnC+TK71wuZZ1w6wxua7Mx/GyHS8Pan+N94bV1Vlw
PTEfY7Swvco+IDZWH3tGm4/YOHOQ91pz0wvXaQeYj36hV26wHrB92PPIfas8
YDUhi56A7c1amNyfxfc83n2LPvbcKSf432YOOE+UK71wh5Z1txsndpf7YDtd
HtR+mjxgNVmu9O8ULTWelEUfEJuqjz13m4/YPeYg773mphfu08Lzpiz6mzfP
0Mc7b7ROxB6SB6wezMcVsp2thckDWfQB/TJHH3sekxP855qDuj9i7emFR7Ws
m2mNyfW4+2C7UB7U/invDav5WfQ6bJ/UcvcnsugDYgv0sWee+Yg9bQ7yPmNu
euFZLTyf08LteS1sX9DCdol1h8lLWrgtzqI/4PyilnUvG4fnq/KG1WtaemGp
cdi+omXdh9aR/v1ISy3flCsM37aOMHknH7Pk9pZxevl1z6Ev3jUOzw/kzRlv
GCfve8Zh+76WdcvMx3kfexd4/mC9qNMK6w6Tz7Vw+zSL/oDzZ1rWfWEcnl/J
G1Zfa+mFL43DdqWWdausL/X7xLtwxndyheeP3mtRPn7Swup749z7G8+hL342
DsPfZMwZ3xon7y/G6YVftazbrZL/XSm3/LJfnXyU85Hk40/Zw/wfaw3Df7Ww
+ss4rP7Wsu4/49Q+rQRjGGaVsO953jJ7gfOW2wvrVaK+1G/9Sljqt1ol2NNf
a1aCJfVbqxIWVqtXIk7fVSpxDr2wdiXiMFy3Eow5o1qJOHn/V4k4vbBOJSzr
fpcVPb5BJe4C8+0rEfsjH5tUotYw3LQSFlYbVaInYLVxJSzrNqtEnB7cshKM
YbhVJSysNq9EnF7YohL2J897RTYbVuIunLFtJdjTXztUYh0Md5QlrLarRJx7
b12Jc+iFnSoRh+GulWAMw20qESfvzpWI0wu7VMKybo1K1Bsede0dmJ+ajwPy
0SYfDSpRaxjuqYVV/Ur0BKz20LKuoXFy710JxjBsrIXVXsbphUZa1rWuRH03
93ws9WtWCfb0V4tKsKR+LbWwam6cvmviOfTCvsZhuH8lGHNGU+Pk3c84vdBK
y7p9zLeBteAuMD/CP2/UrH0lag3Dg7SwaluJnoBVOy3rDjZODx5WCcYw7KCF
1SHG6YVDtaw7xvpSvwO9C2ccXgn2fB509V718tFNC6su+djde3f0HHqhu3EY
Hi1jzuhknLxHGqcXjtKybnQ++uTjBM+hd+iJXrKH+XHWGobHa2HV2zisjtU2
NV9za3+ijGHYT7uf5xGnF/pqWXeW9aV+g7TU72TZ018DZEn9BmphdYpx+q6/
59ALpxmH4Zky5oyTjJP3dOP0whla1vWQFT1+tneB+aXGeubjPGsNw/Pz0VlW
gyvRE7A6V8u6C4zTg8NkDMOLtLAaapxeuFDbzfMayeYc78IZl8ie/hrpOhhe
poXVCOPc+2LPoRcuNw7DK2UMw+HGyTvKOL1whZZ1fG/k7zj8PeYqucJzjOxh
Pl5+8BmrDz7XaOEw2Tfz1nH62HOj/OBzrTn4bLvePoD/DVrWXWec2E3ug+cd
MoDV7dYOPrdUoufotVu1cL65Er1C7DZ97JlgPmITzUHeu/IxRP53a+H8XT6e
zcdz+Zikj3fO8z3c9175wWeafQCfe7RwmFqJXiE2XR97HpAffO4zB715v30A
/5la1k2xxuSa5T54PioPav+w/GA1pxKfEbB9SHt1PmZXoleIzdXHngfNR+wR
c5D3MXPTC49ref8M78tdn7AesP3A88i9UB6wWlCJnoDtU1qYvGUu3v20Pva8
ICf4P2OOW+UBV3rhee1EWd1qbHE+7pTta/Kg9q/IA1YvyZX+fVlLjZdUog+I
LdXHnhfNR+xVc5D3dXPTC29o4flkJfqbN7+pj3fOt07E3pMHrJZXoidg+44W
Jm9Xog+IvauPPR/LCf7vm4O6f2jt6YWPtKxbZo3J9Yn7YPuVPKj9l94bVisq
0euw/VzL3T+rRB8Q+0Ifez41H7GV5iDv1+amF77RwvNbLdy+lys86Uc+h/gM
+sW6w+RXLdx+ysciOf+sZd1vxuH5h7xh9aeWXlhlHLa/a1lXrUYd6d/VqmGp
5T9yhSEiHstkUq6Ghdu/xunlvzyHvkiqEYdnpRq8OeNv4+RNqxGHbVYNy7r/
zMd5q1fjLvDctBqfTdRs7WrUHSb/q4aF25rV6A84r1UNy7p1qhGH5/rV4A2r
Daph6YV1qxGH7XrVsKzbthr1pX5rVOMunLFxNbjCc7Nq3OuHfLStBqctcrtJ
NeLce8NqnENfbOkaGG5TDcacsVE14uTdqhpxemHrathfPYN+4XNiu2rcC547
VIM9zHepBj/47FgNH3x2qoaFQ7NqvJm37lwNH3vqVoMffHatRg6Y7F6NPoB/
HS3rdqtGnFg998Fz72owgNVe1agdfBpUo+fotT21cN6jGr1CrKE+9tQ3H7FG
5iBvY3PDv4kWzk21vK2574P59tWoEzXatxq1huF+Wli1qEZPwKqllnWtjNOD
/HgQGil1SoUmDvPD8lj7avTCAdXQ00FjZR/PJy//GVvfPZQTPRV0VdDBQS8E
bRC0cPY0hiZOQ+c13RzmaOTs7Z6KOciLzk1jY+jdNHGOJk5T5/wsOD/v//8/
618K7RRi6OU0d45uzj7O0b9BEwX9E3Rz0FdBdwXtnH2d8060R9B/qenpEKtp
4rQphYbO/uZCy+aAUmisbGGc+Wb6WIdeTlv371QK/RO0UXYohSYKeibo0KCt
gsbKdqXQOWG+jb52pUJPh9jW+si7o/nItXMptFU4Y5dSaKowR8MDXQf0HdDQ
wb9rqdCOOUlOaKIcKVf0VbrKo7vzuvqOKBV6Ot1LhSZOTxkfbS44o61yjIx7
Oq9jji5y7e1+at2vFNoosOlbCn0MWB5fCo0VWPZx3lTfsaVCT4dYE3295Xqi
ueDZ3zNa+W7mDb3j0XI7xbqQC52OK+WAJsrpskRfZYAMTnNOjhGl0GVo59rT
SoUmztlyPdNc8Bwkn0OND5LxWa6D5WD3U2v0T4bJAU0U9EzoV7RVhljTC5zD
GS2Wc0uFng6xjvoGy3WYueB5sWfAb7jzNr711FKhp0PsAH2nyAFNlFGyvKwU
uiswuNx5T32Xlgo9nctLhSbO1XK90lzwvEoGfY0z72GOEbIc635qjf7JDd4X
7ZDrZIm+yjjveq3zk/RdUyr0dIj11zdWrjeYC543eQb8Jjiv/Q4nv+NX09Mh
VtO2+Fs2d5VCGwWW6KvcJoOJznkn2iOzS4WezsRSoYkzRa53mwuek0uhsXKh
8ckynuQ6WE5zP7VG/2SmHNBEmSFP9ESmW9P7nA/Xd0+p0NMhdrG+aXKdaS54
zvIM+D3o/Gzfemup0NN5sFRox7woBzRRHpUl+ipzZfCI86v1PVQq9HQeKRWa
OPPl+ri54Im2yjz5zXd+lTnmyHKB+6k1mijPe9/nSqFxAM+FpdBd4XP0GecT
9D1VKvR0iN2kb4FcnzcX7NFWWSS/F50Pcv8tcnvJupALfY9v5IAmymuyRF9l
qQxedc47V5RC16Omp/NqqdDEWSbXN8wFT7RV3pTfMuf36XtDlsvdT60/LoU2
ChzQRPlAnmirvGtN33f+oL53SoWeDrFZ+pbL9SNzwfMTz4Dfp86n+NaXS4We
DrHJ+l6SA5ooX8kSfZUvZLDS+Xx9n5cKPZ2VpUIT53u5fmMueH4ng+eMM3/C
HCtkib7Kj9Ya/ZM/vC/aIatkid7ML971N+cv6vu5VOjpEFus7ye5/mEueP7l
GfD72zmfWfOsDdzQUOFzB00Ffu+e37WHA5ooaKPAEl0WdFdggNYKc96JBgla
JDU9HWLwQSsFzRS4ortCLniir4L2CvyIM4cxPtbBEs0V9lNrdFHQQoEDuijo
mcATfRW0V6gpOifMYYwPfRbqzVpi9AQ+8sKVfOSCJ/oqnAE/dFaY1zQ+0ICo
6elsVC50ZNAbgQPaJ2igwBLNFbRXYIDWCnP4o8uCPktNT4dYTRMHHRW4oq1C
Lniir4L2CvyIM6eHyEGtYYnOyg7WGl2UOrJBPwR9DFiir4L2CmzRzWAOf3zo
s9T0dIjRE/h2lGsdc8Gznmdkvps5PccdtykXejp7mAudjk7lQh9nb1miudJQ
Bo2c17Rm2stsb2PwQS+luVybmAuezeSznvFmMm7qupqezj7WGl2UNrJBywRN
E3iir7KvNW3lfCN9LWW2v7EN9bWQaxtzwbOtZ8CvnfPVfeue1qi9sdX0NSgX
+jgdZInmyiEyOMz59voOllkHY/BBL6WLXDuZC56dZbC7cebbmeOgcqGnc4S1
RhelR7nQxzlalmiudPeuRzmvr6+b7zjaWD19XeXaw1zw7OUZ8OvtnO8b9Cs9
CLNjjfG95D8/j2r6OCfKEs2VPjLo67ymNXOefE40Bh/0Uk6Va39zwR59lZPl
d6pzGJ/kupqezgBrjS7K2eVCH+cseaKvcro1PdN5O32nWe+zjLXVN1CuZ5sL
noM9A37nOm/uW4+X7XnGuB/aJGPLhT7OMFmiuXKBDC503kXf+fIZZgw+6KWM
kOvF5oIn+irD5TfCeWdzDCkXejqXWmt0Ua4qF/o4V8oTfRW0V/gcvcJ5b32X
+bYrjfXSN1KuV5kLnmM8o5/vZt7M/cfJEh2Vcebi95xnlQt9nBtliebKdTK4
wXlNa+Ye+dxoDD7opdwq1wnmgif6KjfL71bnZ+qbUC70dG6z1uiiTC4X+jh3
yxN9lTus6V3Oz9U30XrfbWywvtvlOtlc8JzqGfCb5vxU33qtbO8xdoq+8eVC
H2emLNFcuU8G9zsfoe9e+cw0Bh/0UubIdZa54DlbBqONM7/EHNPLhZ7OQ9Ya
XZT55UIfZ54s0Vx51Ls+7hz+6LI87DvmGRujb65c55sLngs8A35POYfT087h
h4YK/z3G71Dxezf8Pg71Rv/k+XKhlfOCXNFfeVYezzuH32LXwQYNlSWyetk5
LF903d3GX7R+6JksLxf6Ne/IDH2VV6wfeiavlwutnDdk+5rralo8L8vvLdc9
YG60VKaab6ksl7lupvFlcnrdvPB7zztRIzRLvrbe6Kl8KCd0UD6WK/or78vj
Q+fw+9R1sEFDZYWsvnAOy89cN8/4Z9YLPRN0TuaY+z35oa+yUobfer+aVs63
cv7adTUtni9k9r3rFpkbLZUF5vtStj+47gXjzNE6QR8D3YyaHgpzGKOv8qs1
Rv/k93KhlfOHbFa5bqnxVdb6L9fBDA2Vf2Tzn3OY/O26N4z/bb3QM0HnpKZf
wxzm6Kugt0K90DNBU6WmlcOcPkNrhXU1LZ7/ZIaGCutgRm60VOgR8rEOtuiv
sA72xNFhqWkM/SzDdfy3V3zolqBnQo3RP0FXpaaVwxw26K+gwwID4sxhiIYK
62CGhgqaKLBBO4U57NFdYR3siTNfIpNf7LN1/XdgmKOvgt4KcXRCuF9NK4c5
b+C+rKtp8XAezNAaYR3M6AW0VOgR8rEOtuiusA72xJnzZwkO1B2GaKjQQ+iJ
oDnRT2bon+yeFFo5dWSD/squMiC+m7nquQ5maKjsIZs9nXNmfddVjNe3XuiZ
tEwK/Zp97Sf0VRpZL/RMmiSFVk5T+6yx62CPRktDmTV33YbmbmEPNXIdbPdx
3QbG97FXmpgXhq28EzVCt6SDzNA/OSAptHLayAb9lf1lcIBzGLZ1HczQUGkv
m4Odw76d67Yx3s56oWeCzsmm5uZOMEdfBb0VGHbyfjWtHOY7ed/DkkKL52CZ
dXZdXXOjpbKD+Q6RbRfX1THOHK0T9DHQzeBzYVfPhzE6K0daY/RPeiSFVk5P
2aC/crQMejhvbN5eMkND5TjZ9HEOk2Nd19T4sdYLPZOBSaFfc5rM0Vfpa73Q
M+mfFFo5zOmzfq6rafH0kdkprjvQ3GiptDDfCbI91XVtjDOvaQx1k+EZ3gkf
uiXDrDH6J4OSQivnbNmgv3KmDAY5h+Fg18EMPYvzZHO+c9if67pOxpnvIRPO
P8jcZ8gcfZWhxi/2frBBL2S4bxjmupoWz/kyG+E6mNELaKkcYb4LZHup63oa
Z36r3yP5nlnT07lcxuirXJEU+jhXy2O0Mep+lfOa1sxEmVxtDB7opYyX7Vhz
wRt9lWvkOt55f31jk0JP51prjy7KLUmhj4OmCb2FvsoNcr3J+UB911vfCcYG
6LtOlreYC963eQZcb3de0/hYKcuJxrgfuiIPJ4U+zmR5oLlyl3Wf5HyIvjtl
MtkYPNBLuVe2U80Fb/RV7pHrvc7PM8cdSaGnc5+1RhdlTlLo4zwoS/RVZsp2
lvPL9N0v4weNjdQ3Q65zzAXPuZ4xxnczp0enee+ans4j5kL3Y3lS6OPMlyWa
K4/L4AnnvBMNklflM98YfNBLWSjXBeaC59Pyudn40zJ+ynU1PZ1nrDW6KEuS
Qh9nsTzRV3nemi5yfru+56z3YmO36XtWrkvMBc+XPQN+S52P962PWaNXjI3T
92hS6OMskyWaK2/I4C3n9+p7XT7LjMEHvZT35LrcXPB8VwazjTOfbo7XkkJP
531rjS7KiqTQx/lUlmiufORdP3H+sL4Pfcenxubq+0CuK8wFzy88A35fOofT
SufwQ0OFP298P6EvR1lv9E++SwqtnO/liv7KN/L4zjn8fnQdbNBQ+VlWvzqH
5U+uW2z8J+uHngk6JzX9GuYwQ2dllfVDz+SvpNDKYU7vorXyR1Jo8fwqv39d
Bxty84MTL5vvN1n+5zrYEv9PTn+ZF37oq3AnaoRuCXom1Bv9E3RValo5zOGK
/go6LPAgzhx+aKiwDjZoqKClAiu0U5jDEt0V1sGWOHPqhZ4JOif0FLm5E/zQ
V0FvBYboqXC/mlYOczhzX9bVtHg4D2boq7AOZuRGS4X+IB/rYIvuCutgT5z5
Qvl/nRR6OtwPxuiroKkCD7RP0ECBB5orxKg7WivbpIXWDFokMEF/hRg80EtB
RwUG/LsAueCNvgraK3AlzhxW+HZMCz2dXWWDLkqDtNDHqW9voa9SR671nJf1
7W596xsr6dtNlg3MBe+GngHXvZyv6Zv2knFj30m/U5stZYb+SbO00MppLhv0
V5rIoJlzGLZwHczQUNlXNq2cw76l6zYy3tLeauI9ano6rewn9FVap4U+TltZ
tjHGXQ90vpXxA+XX3j2bmWN/+R1kDPboqxwsv0Od1zR0DvOOG/kmWHY0xs+S
8/PX/Bw2LNFc6SSDzs5rWjN900IH56i00NbpIteuznfX11l+6Kx0l+dRzuvr
6yY/9FWOkQ1aKMfLtqcxuPZyXtPmuF9urD0uLbR1esvyOOeN9fWS6wme0dAz
j04LvRj0ROo572rd+vl+WKK50l8GJzvfT18/GaCPcmZaaOucItcBzlvrO1mu
6KycJssznLew3ifIE32VQdYVLZTz5XqOMVgOdt7VdwyVAWuHpIW2zrlyHeK8
o77B8hvqGYd4Ju9p6x0Hyg99lYvch2bHRNkON0ZNL3Fe05q5Pi10cK5IC22d
EXId6fwYfZfID52Vy+V5hfPe+i6zRuirjLauaKGMt35XG4PfGOdoKvA79fzu
/cmuHZcW2jpj5TrOeT99Y+R3nWf08cwrrR01QP+kl/caac1u9P30BJorE6zp
Lc7hfZPrajo4d6WFts6tcr3d+SB9t8jvThkMcR/zAdb7OnmirzLJuqKFgk4K
PTLFGL0/1Xl32Q6TAWunp4W2zjS5Tnd+kb6p8pvhGRd4Ju9BrwINA+rO59pA
7whDtFVmyhbNlVnWdLbzmtbM82mhg/NYWmjrzJHrXOej9c2WHzorj8jzMedj
9T1sjdBXmWdd0UJ5xvrNNwa/J52P8o4PyIC1C+WKDspTcl3oHK4L3A+/5zzj
Ws98PC30YtATGeN8rlwX+X7Yormy2JoucX6nvkVpoYPzelpo67wk16XOJ+lb
Ij90Vl6V5+vOb7fez8kTfZU3rStaKOik8Pm7zBj83nY+13d8IAPWvpsW2jrL
5fqu8wf0vS2/DzzjPs/kPSM9b4b80Ff52H1ofaADAttPjVHTz5zXtGZ+Twsd
nG/SQltnhVy/cD5P32fyQ2flK3l+4/wpfSutEfoq31lXtFB+tX4/GIPfj845
B+0Q9ECWuPaXtNDW+UmuvzhfpO9H+a3yjGc981trRw34IWT67EvPgeufvh+2
aK78ZU3/cf6avj/TQgcHnZSats6/ciX3fzL51/3wQ/MCBvBkH/Ol1nuVPNFX
QW+FuqKFgk4KPYLmCjF6H+0Z5o/I9iMZsBa9kZq2DposcMXHnLX42A8/6soZ
9BBn8p5p1uIV+aGvwucRmgH8rj2/hw9bNFeIUVM0WjbOCq0Z9ElqOjjopNS0
ddBkgSvaKsxhgo/98ENrBR0WeLKPOTzxodVCjdBaQYOFuqKRgi4K9UN3hRj8
0FrZPit0XtADgQFr0VKpaeughwJXfMzhim8H+aG1whn0EGdukxV6MeSlzzhj
c7nW9f2wRXelnjXdw3mqr25W6OA0zgptnQZybei8qm8P+aG10kjGjZ2XrPdu
/jlBx6WptUYjBf0Qvn+ju4IOC99XWjjf3Nq0lgFr98sKbZ2Wct3P+Yb6Wsiv
tWes45m8Z03vuJf82lov9qP1caI90c4YNW3vHD7oonTMCh2cTnJFO+WgrNDZ
Odg+OMj98ENr5TAZd3S+o75DrVFn81JftFCOkhn6Kl1k09U5/x+5/Bw5Pxve
wLVHWu8u5qrp7NR0d7q5H4bHeMYe7utu/agB+ic7eK9DskJnp4d1RHOlt3U9
znljfb2yQgfnpKzQ1ukjm77Om+s7Xob9ZdDKff3l1MO70gvoq5xifdFCQSeF
Xh9gDJYDne/tXXrKgbVnZIW2zmmyOcN5W30DffMgz2jtmScb4zMGfY81vF/D
rNDZQYeFnkBz5VxZDnFe05q5Oit0cC7OCm2d8+U61HlnfUNkg87KMFld7Lyb
vgutEfoql1hXtFCutH6XGqMWI5139I6DZcDaK7JCW+cyuY5y3kvfSPld5RlH
e+bwrNCLQWekq/Ohch3r+2GL5so11nS88/76xmaFDs6ErNDWuVau1zs/Rd94
+aGzcqM8Jzjva72vkif6KrdYVzRR7pLZbcZgeLvzob5jkgxYe2dWaOtMlOud
zgfru11+kzzjLM/kPYd63iD5oa0yNSu0XZ6X7T3GqOl05zWtmflZoYPzYFZo
69wr1xnOL9E3XX7ossyUMftmyRPf/dYIbZU51hVNlMet31xj8HvYeQfffI4M
WPtYVmjrPCLXx5yP1few/J7wjNGeOTsr9G7QQxnpvWbIdYHvhy16LE9Z04XO
b9K3ICu0bxZnhbbOM1mhrfOsTJ5xP/wWyeBO9zG/3no/kRU6O0usK5ooaKPQ
Iy8bo/eXOh8m2ykyYO1rckXn45Ws0N95NSs0d5bK703PuNszec9U/+7D38uo
y1uuo07LnMMJ7ZP35Yw2yzvW9z3n1Bgdku+zQlvnPVmhqfKJjD80F9zQAvlI
lp84r+kBfZgVejqfWlN0Ub6WCXomK60lGi2fy/JL5zWNnhVZoa1DbJ6+z7JC
i+cruX3rGbD8zjmaHOg/oBPxnO/7zvuhPYJGCZzQPvlVzmiz/GR9f3Fe0+j5
MSu0dX6RFZoqf8p4lbnghjbL77L80/kL5vghK/R0/rLW6KKgiQEb9DHQWIEf
Gi3/ypNfHPwvKzR60GdBU4e1aPq8oe/vrNDiIRc80VzhDPjxbuZLveMquaG1
srq50P9ABwQOaJ+ggQJLtFnQYIEB2inMyYEOCXolNW0dYvBBUwXtFbiiu0Iu
eKKVAh/4EWde0wNiXU1Ph/3UGl0UNEzggJ4JGivwRKMFDRZqig4M85pGD/os
NW0dYvQEPvLWtHjIBU80VzgDfmizMK9pD6E7Q414HzF6HR/1ggPaJ2igwBJt
FjRYYIB2CvOaRg/6LDVtnZ3ljaZKPbmiy7Kr7OvKIDXOnB4ix/aVQk+nvrVG
F6WxbNDtaCRLNFr29K57Oa9p9DSoFNo6e9kTDcxb0+LZW/ZNPQN+zZzzPeMd
e3A9/5wRQ88CDYSbZYP2SStZos3SUgb7Oeed6JB0qRTaOvvJG02VA+Xa2lzw
RJvlAPkd6LymB9S6UujptLXW6KJ0kA16JmiswBONloOs6SHOaxo97SuFts4h
9kR789a0eA6TfSfPgN/hzmvaQ+jO7O77Ons/NEZOlgPaJ0fJEm2WbjI40nlN
o6drpdDWOVI+aKr0kusx5oIn2iw95NfLeV1zHFEp9HR6W2s0Uvp5X/QM+soT
jRY0WPgcPcF5TaPnuEqhrUOsqb5jK4UWz4nyPMkz9vfdzDdw/z5yO9W6kAsN
kNFyQAflDFmivzJQBqc7553oe4yoFNo6p8sH7ZRz5HqWueCJ1sog+Z3jvKYH
dFal0NMZbK3RSLlIDuiaXChPtFbOt6ZDnXfWN6RSaOsQoyfOM29Ni2eYPId7
BvwucV7THhog2xHG2ug7VQ7ooFwhS/RXLpPBKOc1jZ6RlUJbZ5R80E4ZI9fR
5oLn1TI40Tjznua4tFJo64y11mik3FgptHKulyX6K+O963XOT9Y3zndcb+wk
fdfI9UZzwXOCZ8DvZuc1PZ1bZIi+Cpoq6Cugs4AOBPwmGqPudzivac3MqRQ6
ONMqhbbOXbKc5HyIvjtlhs7KFBlOc36hvslyQl9luvVGC2WWDO8zRh1nOEc/
A02Gf2XD2gcqhbbO/bJ8wPlIfTNkNtszhnvmPZVCLwadkaHOJ8lyru+HH5or
D1v3R52P0Te3UujgLKgU2jqPyXKe83H6HpUZOivzZbjA+WjrPVuG6Ks8bV3R
RFksy2eMwfZZ55N8xxIZsHZRpdDWeU6uLzi/Td+z8lviGRM8k/dc7x2fkB/a
KkvdhzbId7J91Rg1fc15TWtmRaXQwVleKbR1Xpfrm86n63tNfuixLJPncuf3
63vLGqGt8q51RRPlE+v3vjH4feCc/257278nPurajyuFts6Hcv3Y+Vx9H8jv
M8940DPfsXbUAD2UGd7rTWv2he+HLXosX1rTr5w/qe+LSqF981Ol0Nb5ulJo
63wjk6/dD78fZLDIfT9WotdWeNeazs4v1hUtFHRS6JHfjNH7q5xPke3LMmDt
n3JFX+T3SqG/80el0NxZJb9/PONFz+Q919kH86zLv66DYUmNFThV1EOBc6IO
C/VN1WOhxpuqV1LT1iEGqzXVVIFxVU0VuK2uDgss11B7paYHxLqang77qemG
6pnAZH01VqjlOuqwwHJddVhqGj1otdS0dYjRH2ur5VLT4iEX3DZSewWWG6vB
UtMeohZw3kTdlqqaMujHwAk9HfRy4IzODjo81Bc9Heb8/x/x/32ETk9NW4cY
rNDKQUcHxnzeb6NmDNoxfA+A5Q5qydBPm6kJU9PW2dFao4NTt1po5aCdA0/0
dHaRJbo5zGGMb2ffxlpi9Ae+neRa11zwrO8ZFd9dv1ro6TSQMZo76Oh0zcfh
1dCngV8jY9R9b+eHWo8tqoX2TYtqoa3TuFpo6zSRZWP3wwyNm+b2RAvn6+lr
Vi10dtDdQVsDLZXDS8GwlbH2fk09+fsTn7l8Zh9SjfXorqAzg64OOiidc9uh
Glo72IOrEWPtgebfyDNb2nPNfAO9wXt/1Lbz6y657ViNM6nZQd6rvV9zv82c
b+p5nMuPrHV3727510dUo8+oazfvx6+U1O7a2jM6et9DXd/Wc2G2v8wO97yj
/Br/6rLd0xxdPJfcnT2LfNxjc8/s5l1Z390aHem5rOFnuPj5D37W43DP483/
B9BGDTo=
           "]],
          Annotation[#, "Charting`Private`Tag$66438#1"]& ]],
        Lighting->{{"Ambient", 
           RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, {
          "Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{0, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}},
     VertexNormals->CompressedData["
1:eJxEnHc8lt0fx+1ICQ3CoyFaRiSRchqUSoiKqIyQVciKtFSiKCoKFdkVipQR
9yF7ZGTvvRIpihR+55zr0u/553k979d5vuecz/fzue9rnNsqUzsdcxYmJiZ9
DiYmVvRv21n8jx1DcdnPJP+EeVmj5L+/wd6FjsZfAu0Ys8lr0094qzLm+OYq
11lLg3OM1zvFbQ+oHvnHjU45Z8YetWVEnB4r5mCc/Md/PvAu5wy0Ykh8yl6q
rnT6H18usn5J2QYLxpsjC44KLDnzj6sO5g0ESpkyrkrXnek6av2PN7qmXUm2
M2QUFMX95R20/cdFq1fIa5cfZvx1WXbbP/PcP26o4m3g0azCCGROsFXLs/vH
reTX3oNP16gse94rZ/j7/1x1w4Uah5D9KiMdjd0OBv/nHe/K/jQkHVN5VDS9
Mnbo7D8eXfFalInJWMWPEV7n/t7mH+97KiQ9s91MpVNsn6p/seU/LnFweVfZ
2BmVeW2dwxqK5v/47cdcq8q4bVQsnMdm9IRM/vEK6ZV5F+zPqlz7eGlsaunx
fzzt3rFH43x2Knovktl7n2v+49KHlILseu1U/qwq9XMKlv/HmZl3PsRcbdbs
sHOwvMocX3v9VACuE1Hlb4Hq/OOhD8rS8bxjhybE/iw9/o/rXjNcgtcZmsW0
WF/I5B9/KTq/Gu/L17lzBu3rH/+VJSCMdVj1uUwX6fCPj63JnI91Oxwn3oV0
+8cPt0V+wjo7+THWI53/8TDVWza4L4HMWwZRX/7x1IMqexm4jynpm1Ef/3H1
21k8l1DfI8tHrVDf//EbLtdOY5/05ildRz75xzd9kk7EvmJURXxHvvrHX88/
Mot92NK7Rx/58B9fPDZPHPs2YV6DKvLtP35l4+pO7HPjvUzT+5RO/+OtZxuL
cC5UEj+EoFz841tMPs2zQjnKjNu6DeXoHz8eqGeOcwdUPuxEufvHC+icnnzD
Ym/9bGb7HA9YvpyJ8TQKGnz6ND47u4Nxc6QP6fENZn5O8zU/HgULnvu873Ry
hwqTFB++OWS96m4kzA67U7fxv9vQdIDi56rWHt6yKwLa51WuM1n/AK4bpfjT
IefgnRfD4WF2SZeV+Y/hpV8U//BSbv98/yfQ90/2iajMp9B+guJvh7Tvydk+
glxx73ZcmQiHm8YobmK30J0nIQDGLXXOkQqPgDqdFP9lqLTW/rsXtNkzNXXy
UyQUm6G4sucLxv5OR7glS+bXbtcouHKI4nXTRnb2/gZgN3c/cAmOgmx0ncTf
WX2Zl68Ce/5Dy5ZujoI+UxRfdfZa10IVP7B15vC+gr2RsKqH4oOp3hsYTx+C
venBoXFNzyFvH63b3eN38xaHgDr7bzeOjIZBo2GKL9UPqO1peQZqN/k/eqgX
Ck/T64GDkQuSbZ+Do7FNgXe4gqATvd8tsGSZ9UQE0FjKEmm+3h8KfaF4hY6z
gwlbFIjnntaSybwObVsp/pPNtzTcNwrkvtGRHLhtDeX/UpxP5kQJ5u53/AQG
b1uDOW5V43kW10mV3uKP6oDaZooXHBTmxfMOD5/+iOYFy+l5ee6sZ8PrFPv7
8g1aJ5hb5wm3sWy8rya3+ES0LyA3TvHNQWpOWIeBzdtCkA5gToe13YI8WDeN
Y7mRSDeQ8pXi7/l/R2Cdk3PlDiGdwaE/FJ/RiI/GfbnhULQc9QV4dlC81dfT
/Rzq4w5X752oj2Ah3ccGC2XVA6jvPcbrx1HfQQa9/jecpqexTy4vCPuFfAJW
0z45sswkGPtq6+bWdOQroPub4ivn6cZjHz5LS96MfAhk6f3y/zdxEvtWbP4v
deRbsJ3OS3P0uWjs89WbtY4hn4M5n7Nrah/HudBUyOBCuQBzuZD8VWqPc/TT
jvsuyhF4zdpPeHL9vXs4dxZnszag3IGtdO5K6JxO7WzfkGG9WWUup1KLr151
Dk6BPCY7GmZnDzEytAse2PV+g+bR2js3Hk2BJkXjT03tbsPqxHzCGUa6Bny3
38L1ZQvaGQIhUIC/kPA4A11r6x3JsGSnxDwL8Uho0kuNV75Tylrj+gaerQzn
+APjIG82Vf9bn76Y8O14aLOuPt/lfQKUvkjx9g/T5UfOxEKxumV1k2Nv4Ec1
ipdOph43ffEc7ottXqH1JBnOGlI8tnm699XXILhJvCl/Z/FbaNdPcZ3R9jPr
Wq/DngobZxbHFPj5HbWek/HtT4aQj5kqyyKlA1NgEz2v9sb+YK2L/sDT5BLs
kk6BXbsoPhZt9Ghq61PwrfwTZ/7ut9BPi+J+87ReOSPfsM5fzDpWlwTLRSmu
HOIffJznJYhfvb0qafA1vKFHcYVnqccv1iWCUHnmU32HX8F7dyh+8dI9jcVW
SeDsK2XPCbYYeLGVWqdOX9sRt7FksLFv/qL5EuFQNYka//WdRLkiUwo4Lln+
emnaA7gijeJnXRKbDL1TQIH1BlOzm+5Qx4eqc7R3eSPmf1LcDM1vuoPWk9R4
US6zElzHdMvaYVQHzU/x75W1mnhehk6nJJoXLB6h6vzMPquK1/kjfiwUrRPM
rfNxzCs1vK/W2edOaF/gLr2v0MslV7EOSiY3e5EOwF6d4g67mO9i3b7023Mj
3UCjLsXtbb/oY50nZpN4kM7ghCnFt7pyHsF9KdzHk4v6Ajrpvsw8cIrAn0ci
v+2iUB+BqAfF2ZMu9uG+v5mWdkR9Byo3Kc6y4dKqeOSTfuP6HOQTYLGB4gU7
Q9ywr76tPCiIfAVmaF91bG8bwD6c8lv3CfkQ5NI+bN3qpIR9u3bzlzfItyBZ
luKcPJU82OepU4cGp2AcmPP5/YYP53Eu7EqF+83FI8FcLpjfXjHCORq5PBiF
cgTqaH30Z0Z349zJ9XUsQLkDO69S3ILO6c9zpoIZ1ntU0umcXuwtu3q5mQFt
sjPQZfUxhtCojpla3jeokeX/UM6ZAU/lTOxOKHsANzdR/Puiog0/VbOgiUPz
fq47kTDmL8XvrVB1jdX5ADNenHVclxgPD305TPj48wB92VdpcPHXc4/u+STD
P5y6hA8FmjVtNH4Hx/Iuhaze9R6yBVJ1VrcPn7K9lQQvGqusWWeeDjcvocYP
PmxRHHB6CTv1/+751PEB/jSjxhuzBnj5bXwO/2anXguNzIInzKh5dw+kB9rm
+ME83wV9vc8ZULuVGl+Z3dus0ekImmeMzy2rZUCn2xQ/nD88aPnmMUj1lX7b
qMyAxr7UvKJS1gcsuqJBz/jL92ubMuH5hRQvz+vJvtycCFjGc++uT8+AyuJU
nb9C79Nnr78F+xc+ff23LxVKiFHj3cdS9jULpoIX+521jrqkwHpjavy7DYMc
D5ZkAI2FlyxYLr+Blwsp3iF7UtfodCZQnp5ui98UBzMaKF6hvpJt7GcWkOl/
ndPt8xT+fkXtl3FCZqAjhwFk9o58xf5tUabm3bn7dB/mgte5wta3XgdzvFGC
deYHqiPS0b+mx+cpmKuT9jhnP553xY6n3Amb4gCnAjX+t/HCP/fROocPprmh
dQKuYmq8XV3LVrwvpg2txmhfwO8JNf7Ms7IYrEMF93mIdAALf1HjuU8YPsS6
FewKC0W6gW20bi/XHBHFOovzz4NIZ+BA6xznVXkT9yWsVTsN9QUEOFG8+Jn7
6YOoj2Vvde1QH8FcHzVcy0+eRX3fsI+5G/UdXOqhuI1e8nvsE7U8VXfkExAr
RdVJV3azwr5ShccUka8Acyk13lLuhQv24Wtn2SXIhyCbneLfgl0HsW/jHfzu
IN+CqjaqzkilrjX2+a+H+64in4NJ2v8WkxPXcS6qBtn3oFyAuVz8vs0tj3M0
eecEP8oRiKVz9F9w7GOcu0/Oh9viyx4AeTp3JXROv6+Mc9AJOaQyl9MVLzKg
oXceNH37ZBMT0ynG42OB1l8CUe74uDYdUM2DOWpjL+2Ph8Ab9o8I95bX7mlw
y4XHEiQ+LGV5CV09KO5TGiayV/ojPL5ffOW1pW9Rjh4Qrtp/cuc662z47Nvz
bXZof9xuFLdNlp62Op8J4zTl95U9zYLPDlDzJs67I9Cvmwr12qM4+nqz4bZn
/oRH8V4eSQtJgsp3+blbfD/C8HiKp7ZFckQ1xkB2+cmW6rRcWFn+kHAHmZQ/
L9HnjqdKZxinaR4s/BFA+JNlZ392oeuSTS/l7AVv5EHPzPuEB7tKjIafDQcL
wRnXVaJ58MPnIMJ/GN0QSl+RAPYP9ucWyuXClcuo8Y97BQbx95rZjsI8saIc
eCmb2ldC32PFtMl0sIhX7uPmCggTDKl9WcpbfezMZADTb2lmisofoJI+Vf9V
+409YQY5YFJAefr1j3dwXOMx4Rp/d/ZkdX8EtfZeMhGCb6DVLaq+Ua/enmff
ckF6ThlbamwkXCFI1V85yqah7ZoHfDR45I3R9RJHCbXfJR/kDmB+YeeFFSbo
8/yLAVWf/6M2wHXkgrzVUB3AeomqEyvO04rnXftTTxPNC2qCggk/7H5BGa+z
KeT1sjc/3oExep3Hthsn4n3t0T92Ee0LzO3rO9vNFVgHt0vFdUgHUN5N9cXa
U70M68Y4IvgJ6QbmdFP++LMxDelsuMSpGOkMzF9Qvtq3mDkR9yXyUqE76gvI
oPvSbSNb0YH62LWwB/cRzPVRdu8951eo77GR5k9R30G9B7VOOyPxXdgnpkaF
Dcgn4Ppxaj3d+t6L0pGv4CdlVuQrEEb7qlBwngL2oeiJS396e7MB/3xqXjah
Sn5r5FvPA1ybkW+BDwu1fs/wJwexzz05+UWQz8FDR0rP7c2b1uBc1OdqsaJc
gLlcKHXe/YJz1Jik7opyBMw+Uv2KeT8th3PHGFkmhHIHkjUpHY7ROeXqnVi8
NVNXJZjO6XSr3hWHkGK44vXXJUxMpowbInIDDgbfYNtjllB/tWLYJuXp+Pxs
OJy4I0t4QeqbwpX7iyBYeSl5w9Y3sIx/C+FyH/xzXr0qgE2dtQeYy1Lhy0cK
hHv8l9fQ55oHrQS26vDmMmClrzzhnSePsdtm5kCnYYWCJa4foZbHBsJfXOT7
kbQMfY+GJ4Rs5s+HxUybCG8+EKOdOPYOfvQKtX+6qhDyD1Dr3JOvb7rjcjyM
Sr9y5sWjIthbR63nXOOhUos3j6HsyDrXWOtiuOO6FOHefwuZGOh+anFjSOLK
wGK4x0yG8NSBGlZljyiw/KDm+T9Li2HUG4q3Dd8YcFuXDP7c5sv3HC2EHUuo
eXVcmpIcQtKBsfqwvbZkAZThpPYl/Xl9j65sNtig4hQtVJsLvbqoOoGwQpN/
Qy7YG9+saTGVDZcWU/oUK8RIZkfmA4uCAKOdpz5Ax6FthH/nuM457lcI/B0v
lKvwp8BF3FsJbzTOSP7TXATa7LYn6XjGQY4GScKzMgxcN90sBjvHFCM0L/pD
kdjNhGsr1Dpjjr5ZlPB16By/8nt3Aq5jN6U0jeqAH/R6hub9mh1D82pMhf5C
84K5edVZV4jhdfIYpFxC6wRz6/zv5NXdeF9CfLan0L7AE911hMcKVNVgHTQE
9ZOQDqDtBFXfmnWNP9atJiHOHekG5nTr/3s8F+t8pW1PGdIZTO6h+r5uPDFh
G+rL2c63LqgvIIbuS9VXyVZ8X+zdduw16iOY66O6ygXXM6jvwn/uOKG+g7m+
dxnGJ2GfnD7z2BT5BAzv30i4W0m5I/ZVH8PREvkKzHtPzctV9nVJMvJhxkT0
XeRDUEj78EaeJD/27Zj3qnTkW/DuIZWL61IpfdjnNRGiUsjnYM7ntyzlS3Eu
Ts3vlkC5ACYKFJfftbIS50hiU8wNlCMQbkitx2+/xzOcu2Wqk/+h3IFJOnfK
bVROTyy/Y+vlqa8yl9MlFYyrvc/L4ZniA39nZ80ZXLdz7o3zobx0zNzU314O
p0LMd6Shz/mT77MI7zd4MqvD8wm6Mfiy7lq8hQEyuRR3HLSJXVEKNXvLs8Iu
ZMJZZaqOdrhfgPilIjj7eW3kT4uPMFMvj/Dd3qnP1RTzofi1MLfHAgVQ2CuT
8MeHlPakWORAtmdLduRsKYaCP/IJL2a9v8RrTwZkeyHVnRtfCkM1PhJeMf+/
gavcSfBC7bYX6rafoMX6EsI1pNj/60LXl+oZrJZpluXwqSiDcIveV6qymdfB
u43Rp31Cy+FvyWzCpwezTHSRj/lMA99Ys5bDAv8MwtsPfv3jm/4ODMkL9WlE
lUENliJqX4tWQ3x9pmaozqZ+qwTqv00lnOmt5eH7Rrlg2aFHq40yCuGb59R+
eVKLPBjDBaDPXyVATDsPmvyk9PkS2JXc010MssXPvlUyyoY791N6+i5XVzaV
LgNV6Vb5N1nT4Ix9OuH7qq+7cTA+ASOddT+ydRJgKVsB4d/X7kxz9S4HHS0j
wvi+OJiNmldq/Op7zPt9fxfj+9zGNqq+NfjriOt83zdxIEcnARj0UnV2aLps
wvO2JtWNoXkBxwjFBQNvxuB1Tu5eUIDWCQ6tKCU8xfjCWbyvfn6rCLQv0L6F
qi+wZZ0K1sH4gJYc0gHM6fC38PEDrFu6YOwipBtQ4KX0vLG/oxLr7Fkp+w3p
DKo1KP3r/HYy4b6cWXvvHeoLmOvLjxOfyvFztzblIDPURzDXR+/0bS2473sl
l5ujvoONelTfH7drLr2GfBKo8DoC+QTM+eTAIx1V7KuV+o31yFdgzlc2x2f1
sQ91ao9JIx+C/Vso3mfo9Ab79mOqjzXyLViwvJBwV9+459jnJxTS/ZDPwZzP
fT4edMW5WHLm7H2UCzCXiz3DCZy6KEfX67K8UI6AP52jaEu/2zh3G2p3fMLX
RSfo3JnROVVzlYqtVT+pMpfTftOpbO3yKrjYxn0+E5M144LiG2f/zBEYbSt7
aP+DKqizzKA4Gl13fDySTrhqer5ZRncl9NvCHdzj9x52N78lPFT35Xxj7wpo
aJs89s43Gwb1JBFuV/9VQ+lCGQz4kSIEzfLh0pZXhF8Ou/9B61URZLNZMPot
sRiunZ9C+DHAPlq7LQ/GRT1Trtf8BBU0cqg6u+p3uHgzYPAnG32FZZVw13uq
zsdYx1MVlW/hg3jDHfpCVTB86iHhQabibb7ofufojqzbSxKqYPbv94RvubmK
2fG7F2j9vsToWUkVjPl5j/D4x8MxKpfjQdXW4lbZ81Vwx1AY4X9HQjtCdqUD
lquFmstjKmEkM1UnYvpHj3Z5DgA/qsuV68thwsA7wn123ruSf7MAnPn1+Xpx
YCnsD0om/PW8tGu9sSWARfl4isPTQniyJJXwgQyZ/fuXlwNWkzXTXpy5cHM4
ta8txR0X75pUgih4E9R8+QAbOD4QzpI7MtK8vwpEcIxKYj9OhVPzfsnLzvWG
VeBnudwz/DxPjJvql6JM4UfMUy3OGsV/DQJzfGHzqyFcJyev1BjVAVOz1HqO
+Nq54HnLHr12RPOCuDUUX6m2dBteZ8eCn4tvceYCh62UDgn/qTngfZWd+lKA
9gXm9rVg9LQV1kH5xEwQ0gG474gkPL2iuAzr9i60oRXpBq7AKML1ZC++xjpv
eXjtCNIZaI75Ey4nMF8W98UlLb0d9QVUwwLC29/l8DugPp7TTcF9BNF0H2WO
su3F97kyMet9UN8BpPseu2fMH/skYMldReQTcPxTFuGv1qjbYV/dPXFXB/kK
ANpX3N7MXHXIh3K7HDYiHwKjaSoXbziqy7BvmS3d25FvgTjtW65oISPsc/Gt
55mRz4F3LqXDRu9iAZyL+swXzSgX4MDdF4T/Nue3wjn6efOWOcoR6KJztMug
Xgvn7qDDzF6UOzCXu2WnqZx6u42tr2kzVpnL6Yk3Q137VWtgZLDF6OzsWcbP
T0bLrAxGYOGTir/LmWtgtdSZzcvQfe6aVj3CA5ZxVe9TqoaSN5O6Wl6lQ217
F8LdRIr2Mv2ogjZtOu+3132EAvrnCb9QMq2atbkS1kw768QcL4LQ14lwi8Gw
48JLyiBPGOeqp8qfYMQyal7/1Q/5AzgK4d81+yo7EirhonvmhEuluu45YZwD
bfs+RpzQ+gy1Fp0h/EbHjgPd6HPkRvA5lvOu1fCS3iHCjz+pOTzvTiQ0KWav
chatgWq7DxP+4fhOPqn/boOMHwdTluysgUDIi3DLXe4O+DpGZei/fLvmapgt
QM27vVWzdyPMBJza8Rqrxz5Dxa3UfpX3Z3Oj+xRgJG55a5NfFdTrpdY/LeZk
9SyiGATFR9hD8woYY61DOPQ2bZs6Vg7Cq06f/d5RAisrDQgX/2y/XGBVFbjX
xvbt64t8+E70OOEHfSKdRKM/g4zDv8ZvF0DYW6xL+BaLvbleCdWgI9a/zw9d
/zRNWhEul9Q26rK5BvCa9HFmCYRAJjdq3r9JniOYM7pNRxAHy2NuEh7/lAFx
Hbma5hX487+RrqOU7XIWz/s0VEX6TgEE7dOXCH+Q/YAPr7NsrwDX8It8sNfi
IOEJ9k9K8L7YGO+uo32BCnpfXU+HtLAOhQ8v3kQ6gGhahwuT3KP7kW5mH3zv
It2AvNcVwvd0bYzHOoutFtBBOoM5nbtNWeVwX0ZWGBahvgBI9yXq5DIX/N6l
/Gol7iOY6+M8r6tVuO83xLo+ob6DddtuEF4dYemLfdLMHDXt4FoNPGifXPXU
N8W+mnWxC0W+AnO+qm04JY19+CPhdQHyIeChfWj08b4d9u2bkllu5Ftw0fAU
4XuDBrSxzwsAQw75HMz5XICtVBPnQphLMhTlAsxUaFN+q1JrwjnSGX8QinIE
XON3ES7C+W4W565nRV0Uvi8Wo3MXSOe0I4l9XYb1aZVxOqcND2+2NiTVwR9N
0ouYmOwZVo8+SMQODcNXV9SsnljUQfmGWOWMFQnwQOEnwsHdrZONXrUw3WbW
XRJmQqakbsJf5y1acVKwBsZuZjnyXSAfasW/Jfy0XFlB5JrP6P9XOe6gWgpP
db8k/IoEl5eKQwV8Ex4RsPgUyunxKMJ1LlqWZBYVw40rV8lYJXyG7zckEq62
Z8Jtr3MuXHVAKWfgag3c4ZhJ+P6GifHgXelQvXnilUtZLZT/L5fwlMSZF2Zd
0fCN8L5Ij1t1sPBNNuFZex9v41XxAzLK8VGrE+rgg9L7hO9YfWKeO7r/6s1l
4rHbXge3uZURvv716DsLwWyQuNJm5SHFWrhw9D3hqpl1CxuTCgBvflCwW2w1
XHPlFeEv6l/6fU4pA7PCfxYde4i+x5XTCf8jEpfy4W8lYGw7o6i+vBx250YQ
zv89sMtWuhrU6ShuP7K7CLrG5BC+x38kerSjBgiuUBHxLsmBRp8pXvdmnJOD
qw4Y7TC+ia434fC1csLbg359Zw6rAyUiOxf83voUbljIIFzrkf8o5hWlVqvw
+5mNNL8Q5MyG68jfZf+Er1uZTnwm/PrrjWF43pEh+d1oXhD5yIvwxGsNjXid
Xbktemid4N8605Je4H0l50gcRvsCc/sKllxqj3Uo/sUjgnQAczqMqX742oB0
kzgrHol0A2K0brvGZR9inRvC+dYinUHVTYqbCNz/iO+Lze5c50N9AUp0X0RC
Rn7h98W5wmeiUR/BQ7qPt0QmVpujvnMpuzxHfQcOaZDwkszfiuj7HeZ/EItF
PgG1EZQOQx6rnmJfHfHoTEO+AttpXw1usRnBPuS6/nY18iFIoX1YtLThMfZt
dMreW8i34HkhpdtfbefP2OeHNycqIJ8DF8M2Ss9zh9biXLyQ8JNBuQBciV8J
X7qjfxrn6G6mrCLKEZB7TI1/c/u6Lc5d5uYFT/BzU3U6d7yBVE61WXMeiEWb
q5yhc3q84pzKn6WNcOvtIU4mpvMM/03rUy7YD0MHZ0H3qo8N0Kq3RSBS8A3U
CTMhXKEk5dXF0npo0f9cxhd9L6yOViecvTMvzUShDjKpn7nZrV0IuWU2En6r
m/kOM08NHPbySRgUK4cmPVyEX5m65P/CuAoKGtQ/8RX4DMfthAl/zJZ5ZfPV
MjhQas66KboGej5XINzEyGSjiGc+9Jxw3PL9RR2M2buAcL7ni1Oq0fXl+sE7
02cFG+DdeGr8II+S7atNcfAxf7/juv4GmHJ5M+EnD/+QObPeHySv4xnJ522E
9h+ECM9780MT8KcApStaV+QeNsCDOesIr9J/eQ772PNy5ao4p3qYy7KUcElO
Z/ycCyTE+R4KTq+FLOpTbzG3y3BlFf5QAcQ33Hh85Vw1VNOidCjfe1T0a8Fn
EHquN+ZeRCU04ZclfPTOtYDSzbXAauPb8LjKEiiyVoLwnhWBGgJL6sFRCS2H
My9zYexFDsKbJWsrTxk2AGfuO6/wfbGT13zCd/yVkVzH3Agyzphf5JIIh4dZ
txH+cMOzDZh/4zQVxO9z8xSVqL7cHCjBdSyz943j+9yBvmOEi/bcVsXzfhW+
/BjNC9j4Jsi+nnOsuIXXyWFxJwetE8yt0/HZRX68L910tRS0LzC3LzNTm24h
pMMSj+BopANQpXXoquzWxLqdbDI6hnQDyWdUCJc4dG4f1nlPfcVapDP4eO8U
4UzM43/xczTZqsvXUV/AAbova0yMWCxQH50SKnAfwX8jVB8X53+bxX2/uuqF
A+o7mOu7XnwEE74PUY33/Y18AvSje8m+tmve0Ma+MrOJkkS+AlG0r3xsLaOw
D13Csn7JRNeAq7QP3Yw5n2HfTtbU3kO+BWO0b5X9Sh5jny+0cvJCPgceEpQO
HIZjOTgXeSetTVEuwHw6F9Mfc5NxjqSYr7Xg65we691UX8YWXMG5q2SxzMHP
/92nFhP+iM6psOLGEC5ZS5W7dE5116Qzv7VrhhqHqlmYmJwYnxoqW3kHv0LT
o5MujCXNcOVy5cUZIUkQmJYTfur1tRlljiaopc2y+CS67tjB/Z7wbOfFElIH
G+AXjX2qa68Ww4VbgwlPi/S4wv2tFroXPOOxu1gJr1wsIHydJHeMB3M1lEpc
6e5ZXA0bTn8k/NavpsCajRWwrGKHqtnDOhgokEH4Bv0GP1avQpjRa3rVv7gB
an0tIXzbqF6zM7p/cUzmnDpt0ARDk1oJ1xRxHOxzegmH2v8su7S9GdqbL2zD
fHbMQ4s3IQA4GsTmMVk3Qx4nap3GDpHTiWPvQMPDuK05nU1QU+sl4aK/3n5H
n89AzrqyXC22EQYIfyF8Rrdv61u7UrBvyiv67cd6yPvjLeEFoha7hA2qQN8u
1nuPdtZCjp2WhA9sD72t7VMDrPkq++7LfoZCrsPU+MF1Tic21YNiYbXgJt1P
sPP2C8JhaOz7uB2NQPZWghb216LF3wmfx1TiHBLZBET/cGzEz132fhwg/Hbo
1nNf9ZvB5Z3TrSYvnsMfMdOEm9ktItyh4om36Yvn4P2XZ4TX/ZxxwHXud6Rf
Q3XARgs/wjm16hPwvPzTC9zQvGBuXpmTfyzxOhe7hmWidYIOep18ilqX8L40
rT7/RPsCy+l9xcSslsE6sL74+hTpANhpHebfuLEY61a4yv0N0g0ssH1C9ddc
pAzrHK3+vRbpDOZ0npawj8N9eVTEvB31Bcz1Jbnl2G8e1MfUX9fzUR/BArqP
B/RLL/Wjvm+/+GEJ6juwo/sO/4hvxPe5/QFrxpFPAOeOHjKeNUAoGfuq+kWR
K/IVOET7aonJQ4h9qH26fgvyIXhA+3BLYPtb7Ftx/gZb5FtQT/t2nthuf+xz
642HJs9drASXaZ8LsQIZnIvOsM7lKBdA2JyFrEct3IhjO8rRUNaRLnT9DmS/
55Hxlryj7jh34+P3k9JDksAOOndP6ZxqvxX479dya5VSOqc7GwNOcTBaoUiE
BxcTkzPDWzqyIfboV6gyeaPS1rAVzjYWp+H3uUboUhvzK40hTNIKLdDfNvs3
vs9dffsV4czpD5W7jjZBG8ddx2qiSuHecYqzJc+f+F1QD5tWaKjytVXBJ99d
CRf9XXPBJqQG7vkqy77LsRYe7WokvHnCf/Xu3kqYfOj6SUX3BnhK/hLhwT+d
rCTQ50K3lex0T1sTDF6rT/j6dbfl8POyioblqZYBLXBhiDnhQ1n2s+KJ8fBt
tk6wp1crTJZ4Q3iAScF50/UPwEhhlX9jaitUN3xO+P2qV3vw8/2nAuxuEmta
YYuWO+Hu+/vE8HUP3zq3kO0VzVC8KIjwqGc+T/Dz2ysuKZqjOY0wXyeE8B0S
ErecKj6D+Z0LnVu46uEXqweEDxeoMUvvqQMGPpZKnOnV0CO9lNIzMMRGQ6wR
xA7zrmovqYALtSsJd/qvXRieaAYn/nKPdKHrGWF1PcLPaxc4FnS0gELvgb5n
FzKhW2YN4QsCD+UcjW4Fp3mjOszEI+GbreqEG5q5QczXaSk/xOd/rI7sp3ST
lDmH60izRezCz0Uv0HUKOn7z4nn1JV2X4++LXSxZhBf9zTHG6+zZ90AdrRPM
NJ0nnO/kwLgU2pfsnbYDaF9g9LkM4Rny952wDmfHOjyRDoChT/W3uIvrPNaN
SfK3AdIN5NG66Rp5TI4inVkiUiKQzmANrbNRiWEvE+rLi+Yvl1BfgHaRE+F6
8y6L4vOIjSAxAPURzF9C9dFqZ1yyBOo7z6fwINR3IOORSPhVGXkT7JPbx50T
kU/ALdl2wnlfWT3Gvlqy3HIU+Qo0LMyk5n0sq4h9WLRysSbyIbA3CybccZfW
Lexbw7S2yZ2OtWDDfj/Cv19U4JxCPk+I3bUR+Rwk6lF9DBb8pYZzUb7grTTK
BVClczG9JpsT56jrmWYhvi8WW0DpzAKzanDu2LM6tPH74lN07rzpnNZe0XA0
OmKr4kXn9FRk50Impg74lfXafCYmF0ZryJEO9/dDcO/aix5fAtvhxrT3GSe8
U+DA92OEh1XtWm5l0AbhgIwnfs+8NnIv4b+TP9XEHm2Bv3/79KP+wBApMcLZ
SmX7OQMb4YprVmvU0f36Q18Rwt/yi0qUbaiDZ/y8rdH1Guz8uo/wXy8TJwKl
PkNWhVVX8L4b7p8kfP3B0QfJdqVwrRK3AN9gC/R1UiBc0ubQbu3yHDi5WiPK
P7MNqgt5Eu7Gfv2ER3MivGex30ctrx1yraHW45FxOx0+fQiGx7kOGf5uhzP8
BYTDLUf68XtJEYYf03mDdrhZd7wd88Vc13jxfa6Rq8m22KFWaBR9jozPceCT
ZmKqBLvFzwy7v2+GRccpvtPHYffM9hoQxv5ZH18nKH3gItxWT2aybKwedG+/
NauB7qMfNcgS7js5ubWMuxls3121ED8/fxLoRLhol3PbBftWwDMuy4XfR1d4
raB0nrmfPM7XDl4trBfF58pKmij9k45pJdv1tgOFTBDtFBwFH7LIEX7Vx/QN
5ll7Wc3wucVAmr+NOhSP67Rlhd7A73Pm6gzG9FTjeXMLyrbh69xKel6Nxfc3
4nWeHD+7Cj+/DaXXWfRo2QDeF19IMh++bw2i9xVTfk0K68Ah/MUKf69tpXVg
nL8ogHXjNnWYQrqBOd2meD514/vihlvNu5HO4AStc9Dp6hu4L+45D9lRX4Ac
3ZcDQWyH8TlqVesfuI9gro9lEz+kL6G+80MBL9R3wEn3/fsFyfPYJyz7Tj5F
PgF7aZ8Mt78vwL56pzY7H/kK3KF99cxz96Ig5MNrk03nkA9BLe3DlBAjRezb
z/6z+vg+o532rdvti5PY52n9ZxYin4MA2uf7s2c7cS4KNHa9w59bj+lcuF2T
WI1ztLt3QAM/BxWjcyTP1HgV525GaocWyh3opXN3jc5pd6LMx6K751Sa6JxW
sfOu1BfqhLozpii/FxiH9JYvKOMegpbbUw5Fd3bAiHVs85N+vIMRzT6Er1gV
XMOm1AGjTC5+GH6RDxUPsnBjXjdjceHF/jYYvFG0An+PHB22JuPDZvIdLug3
w5iV+neu+9bAohINwis9drlPJtVDRduE2/qvGqDuoC7hLkvWeJxE942VWqVr
n0q0wBqXOMIfFZzZg68vTbkt2Lb3t0GFTbKE3z6k64PfuwwtjYl2P9sB123T
Iuvx/Tl6gvnyGzhgWlZnM9UB4W8Hwp/yioT6cQWBkLPNQqXLOuGIvQCpszf0
Vhc+l5AtdvVYS04H/N5WRcbv67/mh5/X9PK1aUb/aYdmxT8IN/javgf7OHrP
5YTrYa1Ql3eacE6elbErI2qBo/4Hvd+Xm6CZ/C5Sf3vSw1K3kEaw/tbq5R8T
66De1QEyXor5zDzsm7DdSVcl1D/DdNMcwoMvNm/77doORBYJ3sL3xf3M1YSr
i5ssFw3tANY3FO/h98UKZYKEL+xq8xZf0Ans1ze//MUWA8N+W5F5b2Z7+2D+
y9vFD59bnme9l4wfK1Zcguv4qAfn4/e5ieXyZLzSWQlpPO9eb6c0fJ/bo+hC
+Ls16yd50Tpb+UYD0TpB3Ox2wqd1YjPwvsq7d0iifQF9el8XptzuYx1UWsyt
kQ4AfKkgvHL8+kas27jP9QykGxjZtJfUiVcXOYl1jnPk1kc6A1Na5ypWriu4
L/tWzD+O+gK+0X3x11jD44v6KDVtKIz6CN7yU328VcfNwH03uHKpGvUdOHx8
TPj3eO4s7BMVlYkw5BPg6u1B+EsOfjfsq5jjgpPK/W2gpo6P8NovAfexD5+2
nBRGPgTqbK1k3jDDTB/s2x+cFReRb4E27dvFK47fwD63kA8/j3wO8mmf6xzR
98K5GFRrD8fXLcW2g6TOMeejDThHTcaqrvh5/qoBaTLekMNbC+fuFdidiM+5
iabfI3ySzmlai4Olnp+9igad05kln1YGSXXBwdo/f2dnLzLi/1u/q+voF3ii
0aNe53snXMb/+tSAbioMb1Mk/OjE9RBBlU4YdNJgFj9fP5prvRPztFyPzDuC
HTDZyyoIX3eIKJUTbrZeXsSPtxWOvBMPUKhH98HG+0idlmC98UMyjXBISFbD
ULEJvmERIbzQ64r14tgaaDnz+ST+vrM5upHwmvO7LfD9iEyY4ai6bQccZv9O
6r8PvHwPvy8+I28a3+TcCe+8WU7G3/o8aG5zKwm+7NRcFsfdBefNKyHcV/Nd
n7ztIzBdmv2rYn0XVPw4TOqo/7gXmbwsC4gWdOjdruiEak0vyXgOGaXtWUXF
wETOPF9qtgMyUtgIL2pxU0Ofz8BQ7oQD8GiHvdabCH+VYma2b6YOHJYozDdZ
3wIf99gQbqYwPHxDoRmEPHGZKRVugKFecoSHbot8dCSjDVwJ3O2P/eIk9Yrw
RPu/W+TTO0AXh/st/BxFuzaNrPNHu1fIiZhOUNX0Sx6fLzjPIk64zgIbniui
XSD+1B8OfO5eYf19wgvK9y3E/PywMz6PD+Y453+nA3Ed3lwOa1QH3G00J/My
f4+WxvMmVI+moXlBoQLXbsyXZvDcwev8eV4kFq0T5HuvIOOLlda14H1pG97k
LxNuACH0vuRMDLWwDmdbPjcgHcDZwSEy7/ej9pJYN8WsyitIN9BD6/YkvXAh
1nlh8+9ipDM4b9VPxjdKdm/FfQmRCzdAfQF76L7Mi37Ctxn1Me65/gTqI8jT
o/oIzn/Jx33nD/68BPUdPGKuIONPe0sWYJ9M+NvGIZ8AH9onSx25QrGvhFsE
vyBfgSHaVzf1fW9iH64UW3sQXw9Y0T50OGLNoYl8G8Zfuw35FiTSvj23lmMT
9rmzU74L8jlwo32+4+/RjzgXnypnL6BcgMTKH4RXczCF4xwp/Mj7gHIEDn+9
QeZlLEpvxLkTMokd7ddF93N07rYupXLa17yxW3uTg8orOqclW3bX7lPqhvMm
fCZxfuHF2RnOwEHIqhgm5Pe7Cw7s+ilk/yoNbhE1IPy9edYN1u1dsOqJ1kv8
Prfc2WwW872npQsesHfCx1XTe/B9bmbeTsKzy7x34uvawWOmE/WC9VAT9pI6
IuW3jklHNEFuFc0u9wx0/fl7BRkvlVrDjnNewMK7SC2qHV5oGibjM6QP3zp3
sRJWh6wXW32qE/LkniNcedPfDQyzfNh0zfrtlEsXfNDrTbiS7w7euz7JMDF6
YLXF0m548NQxUl8iQE11df5jwDW5d9mBLd2wdtUlwte+i9XD596kdu4Srq7t
ggE6OoQHO8lL4PcBFZoBa91/d8L07ZWk/kj616l96Dpp9bIR6fHoDtjLb0PG
z9c5MdOp3QDUmKJfCha1wsqrP8j49PBkkz2FLWBxoKBs9eVGaMZrRbiurtKI
NegAgu+7V+LrEwnjV4SrxoWvcn/dCeKeeH8dECuHer0/CRf/Gj++92UXOF18
UQSfZ/PpGiKcfaTDR2d9N+jbuPLJbxgHW4YZhF+I7/fC3G1Zti3+XUyAugwT
F14P1+tRXOfJwz0n8Xkhb7rOoxNpQnheYzmXjfg5arewENnXuNiFPrxOr+PW
Svj7RZxeJ6dyhAbeV7tDkSraF7jZd5aM/3nPrRfrkMtpnoV0AAonzxCelz7V
gXULdLVRQLqBHlq382HV3+yRzgel0iWRzuA9rXPHnkM1i1BfLAdjRVFfwMql
+8n4b36Z9vh3elOLW3EfQftjqo8hnB5Xcd8rb8qvQn0H++m+s/mWWmKfqL8e
TUQ+AQG0TywDnkdjX2mdmxRGvgILaF9t2J27Gvvw3HKbv6pR7eB89w3C/ZQP
WmLf7jZRqUK+BQW0b496TxzFPr9S3dKEfA4O0j4PTfMpw7k4cD+P3Bdn0LnY
J8h6G+eoX3WNDX5fXELnyK2+4D+cu7eqL67gc9Sb6dxN0zldMFkmXrjmvEom
nVMjgb4VM9t7YNYDoQVMTJcZ+9Q6tPyLB2CinpBV3+9uyD/ofSB9Mh32bzik
jfmxwHkyJ+S6odO601xhEcWw6OctwveEfnS+PdQJcw6JpzlVfIarYqpInbrq
zcIDUh2QWbB6W5d2Azw2lUJ4gGRN3CxXC9y8yZBPQLYVPgy8QHjNSWtu9LkN
67pVE9tjO+AR3WjCPdW9OoQMqiBj+Xv5fPUuyM3EIHz2mmtm3s0COHv81V87
+24YbdZHuNONPqWZ62/hNemhV1sFeuAb56+Ei8W3GRcsDgHJuwKcShR74LtJ
tsOY3wMDC47IZgNNC8+c/TXdcN+VIDL+kWhdOH6POdj6clDraxfMPbGM7Hej
Q9hefH+3+vL62TavTmh8vpnwg6d39Z4ObgSqfwc7HdB99LrlI6RO1OpTJTwa
bSBzs762an0TDL7cTbhB892LX4U6gc5jq7PoehOK5i8hdXy+/xS3fNYF1LuO
+wp9qIAePFmEz8v8quYQ0w1Ye7LGAoxy4a99Nwk/cfnCdlnJHsDfyGSmz/MS
pg9Qem5+tl0Zc+ZZP338e745LjzMspvUUTogi8857i1+SurEPlVYhee1uXS4
FL//yVJRJeMfhC93wus0Y2a6ia+L/6PXOaJz5j3el91JASu0L3BU/gAZ3xcz
Uop1qPkd9AvpANbSOoR3GUlj3b6JrOBs9+oEox+o9ZhlrTuDdTZyEfyOdAb6
Zo80MV+5yacMn6OWWtSbh/oCulg9yXiZm4bV+PfFZfP5nVEfwUcnqo/vNQ/m
4r6fS//0AvUdeD//QcZfm1GZxD5Jl9SbRD4BkbRPrhy7NY19tdqjRgr5CnDS
vkptCJbAPvygPxyBfAgSLH+R/dZufs7Avv2a5D21TLYVCDtyEM5RkCWBfR6b
zy+KfA5WjymROqOONz1wLgaDTZ7h53midC7WmyYq4Bz9tdyUj8+5vHdkJVz3
yTcbnLtl/pw5+Pcf1uOqpH4QnVOmujGlDGtHFTU6p6keTKyHFHthpsb22dnZ
S4wF509XlI31wwsfeyXHv/fAXNetUEn5A7xbXUP4bs/RjZkre2Cm5K7DPzpK
4GvBqU+Yp/y138hb0gUjD18PwM9X+bsbyjE/fTh7XeWvDujpu+IZ/t6Z+nSC
1FGauq8vadEKF7EHsz0MbYMSepaEg2NXi/D15adfJ3Ynu6Dr4YJ2wiMPLo7C
711C9UOCKjd2w13WsYTLmOstxecRveKbyz+b9EDvONVKzG/3hf/QdUmBvT2X
LiXx9sI7iVvIevbFxo0F6YWCZsEDUr2be+FIjjzh388cDcXn7/uUHNxvlPTA
X1FGhCvtUruBzyWseSW7+EB9N4S8vmTe9z/YZfDzmt9jV6I9jbvgTRhHxjcc
sPbEPla54MHbbdcBVy2KoeY1dLuCn6e4rnu21n9NCzxt+4rUkeCpS9b91gnk
xi+z4ftihXGqjutP7uGQm91AO7HCC78vNjsWSsZXOE2/Ox/SA7atvHoYn6P2
719B6bNv65XXEr2gJltkR+/hV1DPuIvocFWnh/C+vKid+Pe5K/xWkfG8jOgk
XOdaxu9H+NzyPbrO9+PlvXhe44BK/J4a/A4cI3z0jvBLvM5iMaGV+D53bp1J
0+tt8b58C2MB2heo62Mh439MXrfEOsi/axNGOgCpVwJkfJDKAC/Wbfv+LfFI
N9CVIk3WCY5L7ME6f1wmvRzpDOr+vCV11v7KPIL78uLYIg/UF2BSI0jG8+j6
f8V/L+Dl+e+4j2CI7qPteJL9EdT3B6WP3FDfwdLX46TOwr9XDmGf9D0tKUE+
AV60T/p4VuVhX73M/+OPfAWKQ3hJnbhezS/Yh1fcTLYiHwLVTiNqPaYcZ7Fv
DfXHRx+EtoE1tG/D/Tk2Y59z61++hK9D1hTlkfqas2/lcC5eKNU74+fzvHQu
NvSPbMI5YjeKmMbn1o5siSZ11NMWbsK5821vEkO5A3fo3A3QOS1XVHDdZOSk
wknntHh+ycGyDX1weDmDnYnpKqM64+kKgSX9MP10oa9WZy8s67G6Y3M+Ewbp
xxHevtIqIpujF15aE3BCZEkZzNy6mvChgLjIovBuqPabaxQ/Xz/uKrcS82oH
0+n4tE64+pXAKL7uqJRoEcV8+/eQGbH3bVDw7vwr+DmwQd0LUkd3X2Efvi+W
nBm4qqrSBZtqDpE6X+q63PB7N5bHAeJ9HD1QXvoi4QXzWOXxeVTIYBeAB3rh
4xvrCT8WlxS4wfgdtBPcImbL3AdvlgUTvnDPj9oF/k+AzayTiJxEH3y9VJ7M
K2eUb2mbmQO8OMyk/kvrhavErQiPDZNiAg4VwFZUeeu8jB6oorWS8HL5rxfK
NtQBB9vGjhvoc9TqTirhn9oV2ZnmtwCHiDN/0jd2wqZTKdR4s/V50Y86QNFW
WU/c//RpY8K9M0o91DO7gHtsxy38XGT01BqyzhSm88HJZj0gjK3WG58XKDHX
JLo9VeVd2nezF6ys17uEz9G3D3STOq/TqzzMBftAgu23/4Rux8MJiRwynmul
1UXM+4pEtgjfjgdzfN8Pb15cx2ZhXQGqA+bqNMt5+ON59/Jef4HmBd+c+cl6
ytuCnfA6NWNKn6N1gm/0OoUL+9Lwvr5WPQlF+wJp9L62i/ANoe8pcFNwKUfG
xk7QSOtQuWaxAdaNTSRnEOkGLGndDt9/x1BBOqslgB1IZ7Co/SDhV+DLNbgv
C5taN6G+AFG6LxLmswPzUR+PDC3+D/URJNJ9XGresgj/Prcj1wT3HSx+/JLs
V+PeeSfsk0fAkB/5BATSPll4P+kp9tWxtDsrkK9A4eBRMt6qZBMbvs/tMOO7
gHwIPs+qkvowesWSNci36tOOlvi5dyrnEVJnV3AeZwLy+X0W9zLkc/DfXzPC
T+0veYlzcSC7pQblAujRuVho0xeNc7T0vypBlCPwVUF4FdFfu+sezt39/rs/
rM9nggd07li4qZwuAqysG1icVSronI4JJomR/V01mp6dvcqYKryzD4+r/8M0
87CwD33PfDL49DQLsquUqmP+8O7SIa6eXli0WTgen1vuSpQi/Hu3e5CBXQ9c
eu+MBH6fu+BD0V7Mry6+91vKsQvWlh1hu4juc+8UHiDj5XY4fzVAuV32Zy3b
SFQHFOGvJ+Ovi8I8A8UmeCsxynHPTBdcJMRE1vNgn8PPa8XV8FHYaOHLxh54
Yk8bGW/haNY/klgMzx97PFGN/ruHa5SMP+Op1rpy13sYeE/8NutgH3Q+a0v4
el/f8zGZT4H3pbAbGov64XSfIeGTJV+q8e/BjFIceZKe9MElNTZknV++ZpBz
clVfdnCtf9gLRfLLCddyFtPF7w/8y58a3/3bDYfs15E6N54G9OPrqqOVKY/s
Ojph6dBrss5rx+6Oqe7tBJPLMqLQ5zaclW0hdYw2w2jna93gW9uN9fg5/DVP
F1InNcTfVEe5F2x6sW4nPp+m9o2FcPuAnZesLPuAu7rHyCOBAljt9ZbwFYoD
L0aY+gH7bgkZ5/cJ8EB4BeE8W91eYq7m/+sA/nsRSZmZapizwOQLuM6rv6cV
8e9oPtN19Lb2GeB5tziuMcPni/bS8wqfLHyC11nB3qWGn7tepdcJbR0G8b5u
Kt/Nwt9HycEbyb6kru0oxjps+6P2HOkAmgbHCZ962yyHdVtw/JsV0g18oXUz
M+GzwDpPsIUvQjqDOZ2nTi4LwH0RmvnFh/oC3soeJvx3jIAH/vs14u67bqI+
gj90Hw2ux5msQn3nkRTzRn0HjnTfM5YMyePfychK/fmOfAK6aJ8wPXBdgs8P
XT3wMBv5ChynfVVxemMf9uHZ3WWWyIfg8GdLwot8elnx942jRt/kcFQHWE77
NvGdN4c08vkmxbJOfF98m/Z5D+fvZzgXk0HzOVAuwHw6F39NLb/jHOnt0TPG
56jb6BydU5ZiDUS5e/fZh4F/Xzx5M4uMl11O5fRq95sd4b+cVX7ROTXNEK8i
38NhQcxMTNcYC5TYmPH39J7kJwvMo9D1o1Lymu5MBvT9dX5WA3GV6PAD29P6
YBzwfPDnWDmcMNBlweMXNVufst/SC78G+2yT3lMHJ0ZWkzqZeZLl7BLdsCVP
NXJPYQssPulKxh/3FrqLPrchR/wmHrW9nbB7VIAJ8/aQT9dvKDTDU7ty3I3e
d0MNnxjCa2MyRLR9auASv82ChZG98MqG16T+Csem4J7YElj9VcI7hbkfGnG2
kvGXsl18GwVTYd7e3DiBwn443hZA+BgjUKG/5Rk4dFclu3qkH9awWBL+Vkv0
Av4dq02dukGnK+Ke+qS+qVhENj7fW51a8N9Rc9TvtKeEi2ZOzuL3nnvkTYwO
Mnog88FuUoe7/XQpvh9cfebsrzS/LvhVXISMlx5kH04d7gRCqzP34ffRxc55
hKeollr5qPSA2cenvdxCGuGTCG7C5/E4aK3i6gPcRznrhwo+wzAVS8I12AVY
wnb1A44YyMMYLoC6S8qJnks3CD//0t4P7qz6r8mtLhGyuXgR3icQEYa57+j8
Gfe6RDDHfZoPzj5DdXJ2ap7Av/8T53pO1r+lqVkdz7uteecsmhccs9cnfV/7
OsYYr3P+Xs1I/L4olF6n5rvITrwvPm47E3wdXUTv64Hv6nisgxcfK0u6XxeY
XClG5hWy1e7AulVICp9BuoGdqaqEG+qaP8M6jzBU1yCdwWwqpXPQFmc53Bd9
pvqTqC+gmu5LxmO3hb2oj7bto7iP4DPdxyD5a+ubUN+3mRyPQX0HrddDCH9h
INaNfeJn2uCJfAJO0j6RHCzfgX0Vds6AF/kKeNC+Euj9GIt9GLhP/xzyIdhP
+3BZx+ZQ7Nt9jFBm5FvQQfv2RfuTRuzzvwHVN/DzvELa5xlSyyxwLh6paazA
53fyw56S8f43/bRxjr48unUA5QgcLLhKxqvzefHg3NV+brDoymSAEAalQwid
U/k3dd7LhlxUOOmcfru/9gS+Dy5Wa2TF+T2g0sKL75PniXF/O+06AE/3XLPc
UgGhXXDoIszbL4zdm/Xsh4sePrHINq+AV4u0+DF/odkdnfqjFyrLSrfhc0cS
79fzYb6LX3DNl8pumB2xbv3yolZ4VvkuqS++YEc3vr5UX2VUir+nUvjekToB
gWHe+L1LgChYomHRAzuGm8m83TZBKvg84oSom0i/WR+02xBO6tyfSsktCiyF
0keLPOZVoOtv5ReEW9keWvynLxUW52yR1wgdgBE7xMh6rh/asF1vNAz890nm
i3XeAGxhDST1rYZUfuLfma/2E57Q2T8Ao39mk/HOo8Lb8fn77eFFN+Sl+uHB
x/Gk/td4Jl98LsHl0D09G9deuDeonqz/jFuLED5n4LrQd5nm5m4osauVjE/x
/yiAfXxEXHMRvi/+XmJJ+M3L6xW2jPWADZx/duD3xUwJomTeFTcqG4o/9QEp
FlZHfI5aaYs+GZ92lsVckm8AXE5qaziVUQjZDGbJ+vdvC0z/mzIAOD2n77wZ
fA3XRP5H6tR2KaRh7vBSKRT/HSoJmr9/yG6M6xjdblqLf597WWQNqW935lsl
nlcrcfYRPresSM87eGuLFF7nLe/Lxvh97nYTATLv2MPV3HhfQofu/ofvc7/R
+zKumprCz602/LgnhnQAczpALwtbrJuNSZQp0g0cu5RLeKxavQDWeaPyiztI
Z7Cf1nlG6lkc7stS8aEp1Bcg9rqdrD98Httv/HfxHncO4j6CvGKqj88drsTh
vnfz/JBFfQfhdN//6/Tmxb/nlPxP0RX5BBymfaIXanMa++oPW+Zi5CtgS/tq
ZmAgHvtwyCOXHfkQVD2sJXX6mpVHsG/zRfM/4uuKobHfZPwW/UhZ7HPGORF2
5HNgRfu87rb5G5yLvX5RH/A5tMUOj8k6v/PdCMI5KvAfF0A5Ah50jmZihL7j
3IWueBIhXwGBLs8UmXfVAyqncX3vq3zbXVX20jmdZuUmz6EXHOdiYWLyZNj7
3KrDz6kTDplybNs5CN0yffnWW2fDXZfVGjA/ODJ+a3bPAFxyNOoz/r3UmbWH
yHh/FY+6zpg+GNQU6o7PkYkbyxBetDmZ9aFjD2xYcLcVP1+fVy9K+ORnwW/4
vrjbWmkPvu5YNbmY1J85cHTcl7cVGt4Rk8le2AvFKzaT8Sz8bHvw+dK7bkah
GSLoe9ZihPB1y2eeKF4ogw9GXPxd7w/Agmxhwvm+VUKZV2lQttWNZ7/5ILQZ
tiTP3wOv94vtvhgOJLT1D6XfG4SeTScJ12j7sLvfNQ885rkwnMg7CFWKj9Zg
Xtn0jjlqzWfg+L5G2WmoH7ooF5L6bkUL5LgCG4G3fKHt87V98L9oal8KCxrU
BqQ6QKTDyGbcz91HW0id5XcrZtHnMzhnHK6An3PkxtgQ3lsVwyId1gsOfLh+
Dr//X1+WTdYjPht0eMq7H6T5CTrhc/Fd5fykfmkjz9kPdQOgYlObPv69eG9X
OBmfulrLsezKIOBSGz9T7foG6kS+IeM3BlY4YG6XcW0KceCmmEq4zqCDBa6z
fT9rNKoDFhwWIfoHSjntx/NOvNgfguYFnfS8O6/8mpBC69RXsbiL1gkmXtsR
vriD8R3va+DRUVW0L7Dm+lHC6wsfyWMdvp4V3Il0ADZq9YTPT7blwbod/3PN
BekGsnZ9JLxKKKg1Eul8SChEFekMlLRPE31U8g4O96G+6LhXfEN9AV8+TJDx
yeuYB3eiPoYYiGmiPoKrdB/fav0w2IT6HlG0bT7qO+BnDNRj7vJq0xfsk3GV
zNvIJ+CT2n5Sx+vuJ3PsK70w0QfIV8CQ9tXVF7eX4/e5qUYRq5APwaWkYcJb
VabI8xze4gIF5Fuw4pkm4Q72LvzY53HxkmnkfNceA7KeU++8OnAu/kToH0G5
AKvpXEysSr+Lc6QjLfwS5QicpnNUyGvHjXNX6P3s4zrrbLA4r5HU2cpG55S9
WsfL84KKLZ1TFvo9MIj6zcTEdJ2RQL8nVl1SOPFgZhCG1axNwn+HKrgoahXm
qxzz+L5ODcDHy6XXdyZUwreS8qsxX+rFLR51uB/6VwoG4HPLZzawk/G1aRmD
EOVwz6ngA/h9ruztbaKY8+q+346fT/VVZXng+9xKKU0yvrLYoSpmqBXeb+U+
6BLfC28p5pP1nDgpnnr6YR18Ii2s8bOkH6obBa/A/Htqu0Sd5ie4vXwy8u3B
QagbOUbqX1Nz2yxhng4XKtUYZKz5AsPiJkj9S0N9969OhIN+v5te1tpfYNcT
qg7/M24G/jspmurJLhGfBqHTF2cy75NFKRvw78cspzsP5IcNQA5hC7LfXd8k
nPC5Or1xbueo8j74+WEctX6FiHD8vmFkc2bHQXT98KM0g9SZ/clrg6/DFl3z
WYafqxdfkyDcQPGateTuPhB861bJE4kW2Ox7nNS39bvDbr5tACg86I2Via6B
twUjSP0n9qZCUwGD4D/3ha+ztxTD1UVPCBf4MxLGvvML2MgoHZsYewMv50aT
+i8WHXuG+dDVnw/w31F8XvyMcF1+xaW4Tsv7Thb89yVW0XUMl2vOmKF533iW
VOLf3Tj/ekX0+RZ4wBivU+BnzRe0TtBIr1OVz/Yk3hefPd8a/Jw21eYHqSM2
cDcA63Bt+f0RpAPIX8dG6lz2sNfBumUeL7yMdEPfa5Ru9VN2nFjn8hU7dZHO
YOOzVjLe+c9zO9wXw7Jkd9QXcJ7uS+EmT338d10LVbVvoT6CDrqPz7cLVeG+
v2R31Ud9Bw5bhkn9MZnVztgnZ7TtniCfAJ5KP8IVg5qbsa+Kk712IV+BkAlu
sq9N0dOT2If32sx3IB+CG7QPRaKPqWPfLs5xwM9nQOaf42TeZza6E9jn7P7+
K5DPwV+dLaT+vG3RMjgXzJfuW+Nz1OYsZqTOUDwQwjl6Xn6fGeUI6GhFkDoX
TltN49z177h+BOUOLNwySfy8m85p3KmltVfE3VRe0jn9zX57CT6HtW1lFAvO
75hkKj8+p2XuFp2+OvkLNK06xRJukAPr5b4txvybgIGKWyzKCdt9H4FVVZBr
VJfwbJZDCak/+mHpWf8sDbFGuFtRmw/zh+vPVqDPbSgq/kDUBnTAWjtDwsvM
tu5Tz+yC9irHC52vdcMBh2ZezOcxuUoeyWiDrL+UryG/wGyBq6S+nMP9v4ab
6uEy5kufNe0GoEyXCeH+t+v249/TRgf9V3ZuahAeNGkl63904vnKgCUZcO+J
lAjtxi//6+nK47H6nj+FFhUpikr2oiKSQjlElhRJsiVaZC2RnbSINiRRSaJo
o+xkfQ6SLUTIln0pPChlKcXvzvnez69/er3e3ebMmXnPfc49Z2YOvv40mTzP
uTDAJt3xCaqVigyX5hjGqO8MeR4fXOYA/Z3yJ7XFOy8O4SJxJtEnZPTGFNS9
NnGcbPqiM4g7/j0nuJloyz7IB3ZQ7Fkj4/gVRz/2JnKyDs1ehHNS6TMlfNR6
E58XdVwJ+IGEBif4ftxi3nfPcKwbTy05Qp6/xV5cxmwbQBw3zTD34Bf8QzON
2OfA4Sv6hd3f0Nt9tVoftjVibc52gr9qUUh/uGcI9S4+truvtwKXsOkRXLm5
9ZzJxBDiHBT24LFLxSwPCwjO8dH7DOD5K+/wQv/XjtM3iT6GE06vQc4wQzEE
+uLIW3IRXO/XLU0Yd6lvjzPUC2rR4154uj4f9DRfZN4DeZTn7VyJ/hyecsdh
Xr+Dop/B+VJH+Q4ih+midw7scOX1MXFYd7+yVyTPX2QV2QB2y1TOkqDshmZY
3hP5bUGCNWDnKtk17ZSd0YclH4m/GHPneMEv1oySDZRfULFaM8E3pWrsgH7U
x2WORlB+RHuznYj82cIHZeD373OTTyi/o98eHcRfdt4Fj4Anr96tLaV4gvbR
PGlqkhc5SvEqQf5vBcUrtGtTKcGfCpwyAB6auV1whfcWg+ah2zrtw8Bb9+2s
ObCfJ2P5lTxfb+LaBTznFxpaQPEcfaJ5fl5gUzbExaF3EuFQ/6FCx8V5tkWa
EEdPMm+aQ18EdjqO2v+IY4i7ODnBF9AvME5MhDyvwPG/OE08JGjuVe6lMkbH
6eaLKf2QB12jmEz9/l5liJ2PZIM86aJrc+lRZsP4zNrnsWLlRdjhxiYOwL2l
3h2z1BnCnfpXuGWD63Cj1875gFcc5PdvufENv9m3IQfqcQbuCbADbl5w2gDW
lwZ3lzpDnpKl7fV5gGcUauTDuYtWuNYD2L+dF72f4KPP+UUhH7F3QCUeftcy
peOJ/Guui/dCnV60wyfmlUWD+JkiB5H/1TWoR6mpBku93uFh9XgIL51kJfoX
FAXmbsjJxfW1yR2FV4ZxYRc3eX5tCEMuofUJWqiXOZmTMoz7JOrJuM0Z2R+g
n5qQWfmgwIZh/LbCnMhJO3yvCOrMb1TryLkODuK45oXEDkqDdwV9stqQ63eL
0bm5r9hLf4rIGVZ9yQd5CRfNxvThuzgvcQEZ1+a9kA/s19jf5YyG8+Kys4/J
8423f8sDj2O/xAZAHjUPuwCZr6WUVHyp3yDqyhxfDfXFc5YjRJ/9BgvqDb8N
Iaf1+i+1rlXiwx9MyPN+O8+GecUMI5agUZXxz6l4/9utRP7CafHbgNs80Omi
cHQgh5PoE5ygVwVyLtjd+kPJQbc7hMi88tHmKBiXeWCjOtTnztLj2u1W2gh6
OhZmvYS85dqOACInPEv+DMyrLbSYnOe+p+dl0n2bHexgENxnAd+5+bQdSm4F
TUHdwvdbl6You6E3FZJkXMGCs9AHAZVdCFGm7IwMBM3JvC5F9J4Bv9zJ9R2l
/IL2uF8i+sy4bv8I/d9/3no4RfkRddN+9CzrPLGR8vuBdOEvlN8Rg/b7m8JU
VehzNLUi4BzFE3TuZw2RnyD02gF49clXv5/iFUp95kTk+GYP6wAP4zha7sE6
IZ3m4cQX3Urg7ZcWiRuwf+553YLos9k30wp4XqO6wBzyyupnVAkeOacRDHEx
62sdBvVWPXRcnGthWEMcTcqUfIE+JJcFvxPc5VFeDsSdAXP7LiruUMczYzKu
Ex2n3iLSX1wcvFWE6Th9uqzoC9Qh6RXak/jd96VbD+qUXn22mMmeGsZt9r0s
WtLF+N8enYOkfsn1IDLvGsLFz7uaoS8IV7PvAcDb0x6NVPIN4oJtqalQNxT0
ttEAcI+wpDJY/6/aX8ITzt6N57er6QDOJz1+Hc7F2kT+NsP+esrSb/sAXzpY
FQ35ohcYUSdg3ZEosHA/4PcO9dZs1m3GAQq7HxpEDuJ7QSpk3K6qKBnL6x/x
vZM3wjV2DOPbDkfJuOGO5RHPDuVh39IjeSVCTHy0sIXMS6t9sEtB7Sm6+jSu
870+E58veHwI8IX/HEReJ5aiXewrLbnfDWPdvDNk3MbU2IMWqxuQTFy1mI7f
EH7ju5XYQU84aeVLoy/IN8Y+FPyj4qZExu12lLh/c7gbjTTovIJ9C8lL9kTO
su1hgee296MBs08kz2U0NFUb8JGAc/XU+xkZVypaQZ57q3060dP//UyrwvIh
tOK3XijUf0c1GhI5yx+bp3VRvLRWu7Ee+qJ1zqYSOzgWLTotosJEYVzVL+x2
p2H5W991AU/pUzsF+BYWDRP73WloG42/xTxvQI6N5343Sg7qoOUYbztQC+P2
bmnMocZFVQ/eEft49C0qBz3tk7SvUnqiZlrP8e1z7jAvxb29ytS80P7Uq0RP
VDhwFezQKLKV+v3pR+K0HXZLzYy9oOz2YGvgI8puqDVfmeBRKz9Kgp3Llklt
puyMEmk7h6pFViZSftn4Yf0Jyi9I8EElsfNaZ+nI7ZQf1/5076L8iFxoPz4W
UDn8nPK7N8Mlm/I7MqX9XnJC+jrwJORL4G2KJ+hB104ybvg8r2ng1VLHvFCK
V+jPsnkE335uewrw0G/W2JDiIYpfvOww4GlTrA+At/sfXq2keIsSaN46JCU0
Ac8ddszM3GXvRn+7s4kc7SmRaYiLPGx2G74bLunlElxS+YQWxNGCJ0sSqDhC
b5fdJfiPVRUsOVTcOTW+i9WULkaDTfeJ/C46TleMhFs6LvNR0aDjVOvTgU6o
AzZPP0Xid/zo+Zk0pzZskuWvr3iDidVdn9ZBv+Wtci+nAF8k6LtZ2nEYL8l/
udxC/xN+uIT7D+Ba2/8ch7iKHv6N+jtasa32pjnAyyyKzWC/qaaKZx/kLT8X
5iTP39ba2d3P0YdXCu5th/Pc0H+2/wC/o6eYCPUJSWJdR+A7d4le1F/A5b7M
/rxd0YxfGY0IXhQcwoFG74gct19byrbz1WL5Zp6EtpJh7JFiQJ4Xvt6j9KEr
D1/uVHkgkM7EYULvybyWhCcimdinaH5rsA53LxMvCeKaBNxlz9XH0D80vNcv
38+QiT27S4k+eeti30NflX06S7+sWziMW6N3zgLuKPCdD+qGzhn/eg/rAd7S
iwRPGs6VgTy85uTQsYFTA3jFWyWiZwvrjxVwPnHZ9905yB/bX1dNxt12o7oU
1m1sf268UP7agVV1D/0GvLIgRKjhwRD6LKrV+v3VZ/zibDrR/zx/lCgrDxPx
9eocgT6cEp7V5PmTqjcWL69jomjmVhm9R2lY/fdyIt+v6/wCwCVNY5spHEmd
bSJyHAon14Gc0PneKdB3sUJCgui5kCm4ioxrd5cD+lE8p8eNNdfJBT1LbDZU
QZ1O4J8EYucVD9zZYF5jm5IvQf7SWz1R8rxvxYt1YIdVv8b/UnZAW3qyiH2E
ypLGYf3dWbf1E/zevb+2aBpw7eS7sWDns87n+yg7o81vaggeFrVAC/xiEGdU
TPkFZYUJEDz/VVQT3Heydr77PsqPaCHtx3xGUBP43bS2OYLyO+p3ayP67HDo
+gk8mYqsiqN4gsz8/AmuXP5zLdR5JhRt56V4hfxpXn3bE1QIPAzj36gN38Uc
//EwQnwUeLvrQmstnBeH0LxNSXR1AJ6r5rdugzzqZzTPP31SPwtxEbbqJB8V
F6i2ejHBhZLd5SGOgiJ9u6Dv1nDBH4KXZJ84BHG3im2jHelHrW5J5F+h41T0
w4Fe61QfFSYdp2/Y896SPjRqL6n4DWAkrnuzBfp0RPzMUu9aNoKzTNalMnqL
MWd+ojTg13iFVj1mDmMXs8Lvgs8+YX2NVILHPT2QRr23cceIvQs+2obH4gU3
AZ4Vm7/2z/WvOIYRfNg7uRu/1P1AcJ6uKYu0U32Y9f6SwEPK/XiDh4AU4PLD
TjPbcrqwiLrMemsl6vuePZfI33Sja/vL3S24M2rDVopfOOFeJdHTcKDjR/Dx
WmzJe2l4SJOJaxnsRL7du0FNi5P5ePWZrvQAxREsKSdF5AT5f8l2mHqKZk/2
sR21H8HJyYyNgL9irNWEfss3Gqs5pZqZ+MDP27KAt/2pegv9oC4/bF+XEziM
JZfGbwW8ovLrONTJcig53qTWm1jc1oDgYxEamyF/2CKSO7uiegDPO4CInFaT
A0ZwrhoxMVH7MKAX8xkP/Q930DkI35tzkiNj0x6duNDNYjPguYnzN5zmpdaL
F4X+8a1swknHW4n+3oPXsrwimCjoY03ecekqzJm7mox79to+74UmI+jiV1MH
z59pWEvVhdjnhbO7J+Bv+YOE4F6U//AForOpIGfp/ov80C9WptWD2N+3R3gd
jKsUrSUFeRZmO//JAJ7cNKIBegbv4uWF+kKh3lry/GP5GS2Y1yVT5W7Iu0zX
4CF6BjjJrgE7KCbuLoPzKNHKIjKvSue9H8BuCYrtEbBOF6XtpjiyIhTsfHK2
XYKyMyq2lCXyb91dOQb9qL2nVLgpvyBd2i+SZnYI7mliud3MTvkRRf3MJX5M
KzScAL9fLVBKpfyOxGm/3zZ+JBRC8WRUKq+P4gmqoXmyamrSCnhlypDaAO+t
yY5gIufnmjgueYqHp9/HLId9xJlsROzmfjLAAXi7/scHD8hzQbnaRL6l6fhm
4Lm7Ed4N9R/BHzSJ3YZ/hOVDXDSXhmlCX4SzL1XJfCfqhoQgjsa5LhRAv8AD
8bKSxJ6n72lB3DU1VhpQcYc46Lj7TsfpeZmTNpaHfVXi6ThVl8vZBH2w7DIT
qPgNZHQtkn8HfbLOfvExc78+gvnHJlPK5d7hqpUSxYBrCcYmuB1nYvFB+2bo
x1h3z6YUcJaDItywvtzlunvx7o9teGlWO3kem2wVgHOXUp5ndlC/8/2zMwPw
6rsLl0A+Is/oQlXIa4q/NloI+KnS9LtQp/fszh0f2O/dYXqF4IzNty2gf82D
cXdWQep3UNBN5j3gbIvja1c/r8Wzz2sP7ypg4o8Fo2TcDc4tCeKt+diUX3J3
TTplj6FaMm4PY9PnMs04VL9Ht/9c/wgO5vxA5H9SuSzk/70MVSz/sb3t4Aiu
cVIrAvx352ItyNfdYdxkPPB7GJ/2iif4S9dbdlBXxhis2QLfxQtyagjOp6o8
B/n3WUxVdzgvXsfbTuzZWrtCAfIS2PT+cUAetdz0KWI3w+8ZQ7Bf4yH6cy3U
F1+M6yPzkg7M3gY8Xm/9oe+FaxNmf2ZB5OS6DDeuWDqCMhmaPtCPWjhrmoyr
WvTgde2nESS12FqmZE86/t3TQ+yw6nVDAuDT9n6dFI4cZ+oJzqexpBbkRJl7
tkC/5UoLA4JHxE5IwrgLn0fzQB+q/8bVWb26E/ScvvBGDepzL9B6apmf2gjz
8ui+vgrylj1MQ4icXrlsJtjh2e5jAXCe+58dthxfrQJ2u9etqgjfubasn4gd
2t1c1oKd+2syLSk7o/JtiUQO9w+bfOjnvmd0iTLlF1RF+0XunthNuOfskonw
AOVHdIP2o3eXk70E5ffAtA2KlN/Rm+HbJYAXPer+BzwpPKyuR/EEVdE84Xr9
5hbwak7s6BT87rsdkSPyL8ZPJQAPxW/Z2cN+uHDrXjJf6/w2AeBt/JMPspAn
FkPzdsqzXBJ4viDK6BDUT7XHB5F5tX6LXQNxobnJuB36imRzKBB95h5pZ0Ac
bdms/Bz6bd5zmMOAuz5eaQlxJ3K2HlFxh8rpuLtNx6nlgqMkflvpOO2szOOF
PpR2AR9J/C5QLh6APpVPR+L4KiZG8Ngf7u4Wr3dYb+b4N8Dt/+ifvFrJxGxG
XbbQT+NcMNtXwH9xpsjDev6T0idv6Atis7OTPL/FWfQMnHNtYW2rhXqpvdIB
pA+m0dTLC5D/We2UK7m4rx8ns8aRcQ1C9jpDXaTi8yYd2F9/o6NO5LSkJ0dA
3y3mWXULWHfMt1tKxpUzChzJ6a3FD5sGSh9vGMH+KhPk+eualVI/NQrw9cPX
7YuER/GiewKDgB+4/FFSNCQO8Wdn1645PIr9jGyJPn1TcpLCOuXoglnrGquC
EVx0X4PIebL33obWwEZUtlAqC+xt6+ZA9DTO9zWyM+tARvt/nYB9iM1zxv2A
vxU8eeCoXC/q2/X6JpzPq4T5ED1l5qoddmUPoG1FXeKQt37z6xYm4C/xQguv
F4OIl1uiCOq5lRUeDgHufOfDTur9jFwrv7hDnzO3diaRb9+q/TnacwTZHMp8
An30RRYxewG3ORj7TEFtFLkeaAzkvpmOEyveE/xhXk0c4NML+JWW30xH6U8a
CG5oGF4LcgrSdGcpOUiUliMjckEaxmXjUnlBjYvO0+Mm9UkcAj1FBbrrKT3R
2oFcgu+X23EM5pU0pL6Dmhd69GxxH+Bpd+4rgR3CuqsfUnZAfTs/E/mKrmKS
YLcAhyInym5oE223mP3GMy2UnV3u3C+g7Iyw0cdhwJP908uFKL+YSJUJUX5B
DNovryd9XwhTfqz5mFpH+RH50H4MKnjVD35X2ZVmQ/kdcdB+36g3vAr6Lacu
fldI8QRdpnlifW+2GHjlGup/iOIVmrX9H6+mnsQEAg+fzp5WpniITvJ+IH5X
4rsUBLwVNPJaQ/EWvaF5695Q6Ac8H9EUyaZ4jhbPCBE5aVv+qkJcrHWO1afi
ArX5lBA7XOifdIA4cklnVYB+HeM9AkROkLzTGoi7f0t4HKi4Q9p03El++F+c
ftfWHzaZ8lVhpeNUTpTNE/pAzwowSfz2JH9NgT7R34uiViYeGcXbEjlTG7Lf
4XJp0wzANXYnxECcnI1cexn6LV8aFUoD3EqQ5TTsH729zb/Y7s4X/DKznuC+
NnmHIa9CtT6oD+pzJXVSUgFPcI1rZOzrx2LpGfwNUgPYxG8+wZueWzlCHb48
R1A2nOf2WZwn+DKuCRfoT5cjxpkB37mJZZyZgAtpP3hjLFCHXwuF8w4EjOBN
/qeJnvkH6/Ui4wrwaUHZB7L+o/iQ42Kiz1SW2TnL6ji0qN28TjprFG/K5Ca4
yJ/oBLhXI+/p3uRb60Zx9yl1Mu44zwSGfqNGzQ074ffdmsWP2Cflu3kmnNPj
nMkjsO/N6ddD5CxkYZmD+jSRd1LGkA/mxXhD8Oq/Vbcgby/T0yMZ6qSsxlNe
A27iHVEO5xlKPyK9oX/IejYF8rzGi7ABWOe1iJ54AX01vfwmyPPTORVcw00j
qIG5RAjum9DyOU/ma2dzO2hJ3Ci62fS4EVWkY+uJzUTPSqXsm4Bbbp4fRO7d
o/HZ698WgZy3LvsvwX0ET96vIXIaTkh+gXEvWqg1Q59Gb3rcvM/Z+aBnDcvR
YOhfsY7Wk6fvpw/M625iYCHU9WTwXSDyGduuMsEOvF58NpDvxL9JJQnwffO3
BYHdVvMOnYR94OOn/Ih8i54fd8DOq/Oz1OD3UXaFdzLgWR9r9oJfzMrsMyi/
oA7aL6beVRuOUX4MzpT5RPkRbaT9OKTKs+Qh5ffSaoMIyu9In/a7wWf7ZuDJ
N1crLoonaAPNk/kKLg+BV18XXk6E7+K2g51k3G+7Yy4DD28v6nkF58VdNA89
T5r0A28rbz5eTPEWHaF5u0JnxBp43lB8qhrqi7+G/4//ahOCzhAXl6VyOqHv
VjwdFwKhaS8hju6sZtGl4gj50HEUu/IlP8Rdrf92HSru0BbJNGI3TzpOb+0x
ftOofUHlCx2nITeN78A9DG/FTVkhfp8Os9rAPQ0JAhv4fyWMYuPEJSIxY+/w
2zjmacCzblfkUO9tbOQvq3PtTT3O6XMhz9ddDQ/pujKMw4wyP5V2fcGhpq9s
AZ/vKq2U9/kb9n8et0UroQfvUSw8A7ioJ09rf0A//qW5McHOdgBvZaw+Dniw
ZdCxo8+78V6hVOU/dwax+r99doAry27/GRnXirVfGyqx8jDxXsujpwA31F96
uk2nDsdpHl9D8RG7vLhJnr+0/WHb94kCPJ2yXX+yiZo3fw7Rf0l3PfdJtngU
7uy09TLnGG7rbD0J+B0uy39wH5D/izJWBedR7KhlS/RREbspAX2SP8mLv6fW
m/jfNTMrwFde+FgL/aMWjPoWGH4bwofn9xN9YhZmH4S62uQdfNqbl3/D3y+r
En12nnXlhrxlI2f1Ry4P+/Duu1Pk+ev1SjlwDvs45+SvdVFd2FhPl+jZ5vgt
H75PbU6mXTlm3oyvdNo7Ab787+h4vdQoWr7c+R87oxrzr8gl+rC6LX0nOT2K
YpZ+ad3BkoGXew4S+4u08hUBfnhF9iO4L7Q0hYPoI7J5kAlytob6HIO+TE29
NmS+aolf02Dc5EVmadBfdtclWeKvaxsbyHlxPBfLQui7Y0jrebNlOSvMS1DV
IQnqESdnPY8C3npnvwrY4ZSmkDHkaQ7RdjAf6H8GdtOV66qA8yt92m41vWia
nbLzRX1mNazrp2g7yzxLegR+eTY+n4PyC5IoDXQEvHrjXDTcXywfdEyW8iNq
pP14VdE36gfl90PC+/dTfkcBtN+VV/vfAZ4o9MnwwnsryX+S8JbntbjwQ4pX
c2P3ZWA/78vzEWIHfcXFbsDDee+lNkOeC6J5GMAIGQLediX9fAD1HyZ+Ys7E
niPdusDzRMtyPornSPPHKBn3d8nqSIiLfxxPE6Bf4HU6Lk5fOlIMcbRAYi8v
FUdoukeFyPdbrb8O4k4jqTAP7pdLoePuEx2n7Copsh+HL6hE0nEqGX1uiNzH
pXqF/P7ecbI0hHuSjjW7Cl8eH8U3LcfPiQiW4NOc3QaAXxR34oT1ZbzYhMm5
tnpcdF5EB/BgmzUacO6yumTtN+jf+K51/RHAlU65lUA+YqWCyVHoa7F0pI7I
P5VyYWZtdj+eOOypDvU+ylWSRoC/9Z0Ug/41W/mtn0AeVKl5singqdbPCgu7
W3GtVVIH7A/H+PUeBLz8Q9IhuO+k5sJ0GfxuCkj5EPkb3xVENCkz8KZVfmbM
9WO4h1eO4Db1r4v4tsWjG3xmvmOGY3h34gWiJxvnomLo1xb1wPPQruxR/PdU
BNEnZOMJOegbPqkrKgvfxU3nfpBxv7fKboA85zV7c7vgvDjf7jOxj3D3ugao
M1dQMOqDPGo5Pn4i/+z6X06Qfy/h+dEW6otLkosOAa4ts04B8hJ0usJ2Qt+t
i9LhBF+0+c062K+Z5OzYBf2ok7kNzQF/8PjbUuDxqskTu+GepuduXAfIvJi8
Y/aqY6heSPFzt3QGPlB4goxbN7FqBHD+mmVRcH/u9ycXCY5FaxeAHMmu/Bi4
V8hVNY/IebyGfSWMW2EsZw/9lt/Q4+77aCUJeirgrP3Qh8qf1nNtRoQVzKvs
ykaom0bv6HndC+koBDtE3Q//CXnL6byyFoDv/mg0B3nRH5dfHIbz3KMTZsfI
/XnTXexg557vHorwnRt/a5TI2Spxypr0i162zZjyC5qm/XJuv6Ex3OetmKN+
gfIjUqL9GP/N37CZ8rt0ziNjyu+og/Z7vZ9rIPDElsWrEH7HV9E8ecJUGwJe
rdR43QD727ZT+wh+zmuxMvBQzCI3DPK+BpEr8Ttz3IUT6kvbx7LkoR7q/A8e
YrfdZQGNwHP3aWtN6BPywa51H+CjVnYHIS7U33/Igf6Zqi+uEvm6lZdXQhyx
dm1eT8URkuEpJbiB7VkJiLtCxUuTcN+iFR13jnSczk7f2grxe5OOU7fuFEe4
h1CvP4iK32uMH19ab8E9hbPVPb7yW8ZwZKuisK5GCS7Ey24CfmZ3ACesz/n7
598RYKW+xw4m3AZc4nnzAJwX27f83XPGvB27/ygNBlza5lufouogLohLOgp9
QfYuywgC/IvuEQuoc9Q9dkoR6qUYWwuuAi72YyYe+v9osJyRDJ+l4td5JdHH
IaRsrmBlGz4ZV+wO++tJIfbXAZ8vmFypfbcOF9sskIN1R5u7zDXAlwcfctnq
xsB5ph/bJuC+w21JRJ/ytBktG9N4NJXP89z89hjW9i8OBPzemPD30L0VSNpt
5QawnxUz8A7go6UzYY9Of0btk0FkP2/Cz5qMW7TgZNJQRCfyFpJJhvP2qUlt
Imfv95pLA7970YK2wQ7IQ1eJy/UH3HlZoLh1/FfUwPZzPdRnO/jMJ/qMZw7U
iqQNobltnXLQt+x1lx3B/9yTNetaNoLWzV1Qhn7e6g6DYYCLPD4oRb2fkZqM
8Gq458p1tSuxz5zknhVpPmNIYp2rqZRRBj4s8usG4G8/2S0HvHhxC9cmowx0
K4qb+DGK6S4Gcn5l8nhQctB/crT0bA/CuAKo244aF22NYYQSP6rdeQd6RknZ
alN6It6+S8TOeMdRPpjXrUxuWWpe6DQ9r2tTBo5gB1GVeKiDQTtpOyxLELkM
dgtwscqn7IZ2qQUQvO70Tmuws7932QnKzsjEKp/Md2BrbCj4pXfrn02UX9Dk
0d9EH7Xpghpryo+f1TleUH5E3ifziP3t2rUVZSm/+98ob6b8jgZam4k+7rPy
08CTe7+ObaJ4gmT35BA/bn+ZKQP9lruUtR0oXiHNIxXEPocWNOYDD93NNPkp
HiJVkyrCT4f6ubPA27vHz2ykeItyad6iabVfwHPzI2raFM+RKs3zgwnK4xAX
ui8erKLiArnQcZFZcnUlxBHb8ldmVBwhtev2hG9Lc/UuQ9xt6rPOgL6UuXTc
FdNxqiwYRuJ3mI7TP03i1nAPcPdoMInfF5wB++Ce4KzTweXA++VH5l1edKIE
T57JNgVcui17P+wHRZ/xMXEXbMC1bnHk+Y9rg+9CnkSszbU56Lc8ItOiA7ja
3lct2taDeOIOsoA+VMWoEgG+tL7mmwPrAM41bMqA+tzxW9NqgNulxLa94OzB
fMNuPpC3rCL+wpA8L3Lqju+uNjx09nUSnOfi1OPqgPMsj5xe8aYOV8RKx8F3
LrpYoQ24n59bXu8TBvbwYtX7c30M+xSxEzn5LVeea3jEoyMPC2ZfF4zh52fY
dwNeML6nAO6bVHrWux9+ryd/X9Yk87J9UAD3cOQ/GpeEfezkJkUDwBdrnY2D
ejkh/YJyyO86F2hnAnhXEGsW9G1JvJLOC3VP4j2bjwCeeqM8A+rZ9qrkWEE/
kDA9Y1XAj5yffAl5fh5lHSnQJ3PE2cAY8Fr3X9lw/nE4e6UY3B8RkmFP8NPv
fx+AdWGp7efet7bUul94L7HnAGd+6MCrMSRWt+ky6/kMbKTqvIs8X/w+BPAU
8yh1uI/+CI3bLI3UAjnX3ibqwj19gezTxA4zsvVJMG7FRn8juL/A3lycyO+P
CH0Eejo2e5VAX8cuWk8O5uF4mFfjZt3z0O8inJ7Xnmrvp2AH8WO/xaEOaPW6
w3sBlzht4gV2q3PrbYD8KAfabo5N5qFg5867gXJk35i28x+t15bgF6ZzggH8
nv6g/bIllHezOuXH8oepc5Qf0VPaj+W9Ruf7KL8/Zt+hS/kdudF+T20wkYR7
7K4prn8E38VKNE/abbMx8MoiKCkOzovzaV7lr7v6A3jIu8HMEfKoFWgePol3
mQbeRkbVPYP64k6atxkHeIaB535HVmpC363/eJ58OjYW4mLNRHo19KMepOPC
YlmREcTRoQRLESqOUAUdRyXbWqsg7q5/ubSKijvELdFC7KPZ/L845TB3Hdfd
7afymI7TS9Ps4U79Y/hwsRWJ38vv22zcIjPw4mgvduq9jZd5TWw18CjBGT8E
nACX1k++paA2ir3WV1702NaAx9UbjgF+9s0idREVJj7TxSd55Fk7rpN/7gC4
5N9Y9aqLg1ifL7f0kGQvnv8EnQfcIfLYHuvVA/j8DY/WUZavOCnH9DjgayxP
N/gJ9uBg/fASdtUhPLV23A5wO0nXgWGTNszx95v48jombl44fBhw08cu26/j
Olxm5P9oSdwoDluXZg+44JNNzzuKGPhXiMs9ir9YQJDNGPBsUdPzT4PikVXP
u321HWPYynCFNeDVC5hlcE+uWO/9AWq9iaV8W88A7jxuwDMv5jMqDpSPqf00
ghubui0Ad/IJr4e+ymcPhV30ihnGmqnPiB2uX1HWgX5TYn7tMX8zvuHd1Qfd
AV/9NSwV6nA5rxraJ0v0489aWz0Br3y1yAfyky1EpW3El3Tj/IRkoufRCtGr
cG6rJXe4ewNrC345/yGxW9k7pzL4nuWerFHwuF6DS9/zmAB+Re3kjonKMVQe
pjpidj0Dz877QeyW8+TmdsA/h8vHw73Z/+GfAmcKQY7hjaAYuF+0nJaTN7aR
nCMnC2zhhntX/ht3soT/LOj5zjvOB/rRZtJ6Lji1OQ7mZZQb7g19eqroea3Y
Z6oAduDy106G+kUV2g6qt669BLv1pnMFQV6ngcFBU8C5eB174J6msiSdl3De
VUXb2T0k5QT4pSekeBi+AyRpv0gp6rE/ofz4ZCBZl/IjOkb7MTP0n28n5ffJ
Tpm78N5aTftdePiKNfDkt3FwBOznhdA8EXohtoZJ8WpRtS0/5Lk00bzi3ndh
CHg4xmKUCfUfv2kecom8NwTe2g8UVkBfhFSat6szRw8DzwX5fJOhXyBfBPcl
Yk9uSX2IC7O2vj/QR7+GjouD68UiII40U0S1qDhCA3QcifblLYK4M4w2LYd7
18WZ6CzhCR2nWJE/ozzET8WLjtMGXW55899jeLOhMIlfJeEfuCA6Hjfzy0fB
+nKxTrkV/9US3Kmt0QK4xOq7uXDuErgiW41XtQGf8VFJB/zL9YRiyEf8wJo+
Dfca1KIVbwG/e6dcCOr0Mt/eOwz9HtU1st8ALtjU2y8rMYDl8qYyoQ+GVrpO
E+DfalryoK/rmcTyZKgPii67+RTw3Yvq1OC+kx5HdhvImxoua3sHOGfk77ro
yjrc9DanD/aTPWc/lQPeaieivrKRgUNbnBa8oX5no859zQbc6vOiWY/IePRs
YmH52/Ex/Ifd5gng3asPLhCOqEACbgs94LvYcHlTBuDcEdXv4X6sDdtLWuG8
uHOGMxlwozvr3KF/SqKg4wDkUa8y784FXHFmKgD6qb2sOFEH9cXbNshkAS7Q
n14Hdeau65xWQd8tp5TAz4BHf5j3FPLv32g5/Knk68afb0m+BrzMUmw55CVY
qDo8g3ua+GLdifzgxfE7YL+mrv7UwPWoGiysJFwK+GPWNXrA45yndm+3RGTg
93cfEfu080rtB3zH6fce0hEZqJTG3apOk30fq4FnunB/7lpazqUArgUw7vad
jAa4V2gpPW42LoN6D6ToYcwF/ZbLaD1vFF8thnnFl4dthD5Ux+l5rft63wXs
IHBHvhvqc8VoOyQckNIBu8nPWP+EvGUu2m4H6pzug52Xz7/dC+e5rbSdNyYa
RsP93Aq7nWG/AhnQfjl9s8XTnfKj+8D8CsqPaIr2o1MzDxsv5XcFmStslN9R
JO33riNy8+C+2LiOgnbYr3aneeIoxOUCvIo9fNcc8rg6aF4dEn7TCDy0kp+I
hvqmOJqHmQ/7J4C32aX3n0Pfj300bws0uGWB51evMlWgH6YOzfMYjsZqiIui
7RI1cE/EezoubKwN3kEcnWMzXkrFETpHx9GN9roYiDvkpTG2+moJsk6+T+QL
7v9fnB4fL0mH+N1Gx6nXHPwZwzPk70CG9usH1L8fY0S3V1nBeptlS0DKUWqd
fUBML+9I6THGpbGCWVu4X7HO79w+jQZ86JKc3yUbS0ZCSXE+5Gd+dK4qJ/mg
3/bd+/fMgjE/6utHqFuUSxxZoa3Yi02TztzUvWHBSCyPXAn9P0TXxB6GviCP
Ba8e7a8+ylgyu+lbxJYe3J+HbEn/3Im8jh9PLRjGVx5dhHyxMfvkv5BHNmOx
vmvA/Sij7r7mNthHnzey/Sbsr4sMbfq80NuS4e/9Z78vtb6wSux2hHVHz6TG
qugPxxhPmp+m4Oh4tH9xrRzY46FwlFdoxDGGuolonfPDChRnw94H+wRasS1B
SQqWjOkortnm1M8oaF6oELmvbqxib9AqK0Z7h5wQC0sXuq5Z1EjumZBr/3wg
1YIxFaohM7urD+3qNFQnfTBtfy92dTZldP+u7Kn6+RUJ6fGPQD+Lm5m5XmNF
RxlSN9iEqziHUY/bzKyxQDf2tGf5oJNiwfgtwFnieW4EPUjv+vmHtwV3j/30
cXQwZ5wTPXn/1/IxxBoywAb7j8UbUrZcvGjJ+PRN9h71fkYWiS9CXan38t2N
btc6Xx1jyJWow3sb6Wz4rk+9r9HDE1cJ/mtcF/YzkfMKBuxjohtn3xM5rFUR
OTDulvPTYjO8LWh7jDMZ10nvINS/IOXzPFAng3ymfSpBzy7+6U8wL4OqiVlq
XoiznMMH5oXHbNaAHVaY3DKk7ICaI2o5wQ7S/s8Wg93Mc+R6KLuhFYVexG7v
s398BDtHputJUnZG7aa6mmBnw0+DjuAXnkGRQWf4np1XSPxyW/2yEoPy45u9
RdsoPyKG/l3ixzPnNXguwPpUoNeO8jsSumFG/B7Tffck8IRDYIc/xRPEVa3W
CDxxabVNAl51cEb8oHiFSvoeEF4lflo4Bzw8UOdhQvEQ3Yhe1Q485M5uEiP9
hMw59lK8RY/jmYS3T7kudwPP7ecu/9VS7EXHdVSDgefifFnlEBdiR/dEUXGB
pveOhkNc+ConLoDz3E5FNmUqjlDdwyOXII5CnDysIe5S9iTupuIObfMyyoe4
K6bjdCDxAYlfRMdpl4F0d3pwOGbyKgToB5lh9+jHRUdmx7Al/9xc3eNwnPg2
vYOFRZqxIep/uGxkfg88v0Sp3kovyAxJPPwf/oB+/gjnnuJce1GV/553UOtP
Kesdw2Wn1FhOP8jAv2IVlGqp57a87iD/XmK4lvzuy8xZugBuEqGYDs+vybPn
t36Qgcbo5xO9tUNh/ZC4+XKrO8XD35VxhIc7do0GO/U7MfL5n77ziJRnfKfn
uUzDKBRwrmUhje6R8ir/4V2vp4JBzquYP9iD4jkbVxaR40Hrc0+PQewjSeuz
IWHxZP3Dqzhh7vlRhTAl3ODilxxBydkr8IbgcRVFp+TDlNB/+M5jQ5Pfp8fw
WYM1hReo96PehLrbqpir+LHvgmnAOQ0H2X0p3u2j8XvJv+bWUH8nbPZksrEI
MmJoOYEGOtT7xYlhuzb8cmG02P/rf9BWUhbeO51pAqrFlPxXDS8JbxUPppL/
lzf8gugf2bpyOchfN6kvC3IszuqzFUeL/b99PtLj/k4cPV5gv0Llv3HH9P8n
x8ybk/glhpbjsXMfed+dYG65VEjpv9Izhoz7f3/c9HQ=
      "]], {}}, {GraphicsComplex3DBox[CompressedData["
1:eJxk3Xc8V+//P3Ba76ZESkObkqhURvG6ShRaooG2omiorKamQlRWSRnZMrIS
0uuyt+y9khJNRTJK39dxXefp5/d5//O+3e43t+uc83w+njqv1xnmGphqGw7j
4+PTHcXHN5z3/5v/mP8a0U5tme8e3hacpJajI/n4urH+uduHPrk1IikNV6+9
trGI9cdPhfiM9RtQWoHNMU3VdPBLaAQ3aGcd4hwenj6KWwD+w1+6bLRbNbqf
riygrlgKHmkyXiR/cQV692/5jqmTK8F3cQ58dZMuQZcqgo+821kDvmqMr220
aR7KPX+nV7CtDtxPYKmy1psU1O2SaXs/qQH8e2fu+Uu1EWjsnRUn1NIbwZd7
XzqEPV3xT6HhK/b0DPrsUzpxZzwSsGXC4Q9n9Ad9xMIT7VVRmbhCWGJ+0Od6
8B2/f4vy8RVhrQ9fqy/E1YIfCbu4qF+pDG/na1C/n1MFnuuO6vM7KvFI8z0d
mxXKwd0W75qZP64Wv75tMEp3ejF4/Rd1fO50PfYaLz+2TyQHfGLtE9fOSY24
9fzX5R+ecsGHKSi7mX5oxObdB76bP/IHH059PnHMuhBdJ4WsA95Et3uHbBfc
g+7nC7Kf4MX0uP6aDRwX+Alah02kDuD7aN02kbqBz6B1LiF1Bt9G+2JO+gL+
a2gfwe/Svo8jfQd3oDnpIzkBn01zVUhyBb6J5vAGySF4EM3tF5Jb8Daacw+S
c3BLOhc7yVyAP6RzVEfmCFyXzt0BMnfg7JwKLXds580pl3XB7qaBHJ8PUQwU
e2zBmSw1u9tSuxuPfpr7eM+9RuSy5fC2aTdjEet2/sdfzdjRgFoub10jsjYd
3H1zVWrGtjpU/nTB7+qXBeDDbtjPT7hXjSw97LU0V5WCS38a37JcogIJf/J/
sXliJfjyqIi0QskSNO78pGcmWjXgOp4xm/hM8tDsu5eOCDbXgS86urLWMzcF
HV+r2CwT1wC+ki/12OTyCNR44tmo8NeN4Fa3/Z9aPXLF2pbDsl/+HPQjdZIt
c9wScNef6+e+6wy609KbL+eFZ2KpO0r1pz/Ug4+3yzLc01OIxWZ8+pQQWQvu
HCN+JVehDEcFRlaYpFeBF11wyS/9VokNvEeLfVhRDu4nO8VTZlQtjpXL5M+b
Ugye635m/F6TeizWfCExQzAH/PX7OyuvjWvE50OqROwecwfXz+HbUtTQiO2l
HwjLuPmDF1NXJI5ZT6braJN1wN/Q7Y4l2wUPpvsZRvYTvJIelz45LnAPWodQ
UgfwWbRuoqRug+vTOi8kdQZ3pX3pJH0BX2M7pI/gpf9SBvr+lvQdfBLNySmS
E3BlmqsFJFfgEjSHQiSH4AtobsVIbsF7r5OcXyU5B3emc/GFzAW4DZ2jf2SO
wEfRucsicwfOzuk+5B7Em1Mu60tzrrjwfj8j3QspIUGOFpxw44awPP9uLPzv
4Mjoi41IevHkRdutYhHrD7X/Ocita0D9e8aaW61IB592bKXqPE4d6l/iOG9X
QAH48/+ebMy/Uo12PcLJ2pKl4BsjL643FK1Aortcq77xVYI7jcypsp5Vgoa1
tiePXFsDnh3X2vFZNw/tEfo6d1JxHXiO10pki1NQ8yU3j/F+DeC3LHa/bUiJ
QN9t611bQhrBdVcoLvZ1cMUGdww1ebkGr0qeHbbMJgFntNt9NFk76BLHPwwb
5p2J1yy3fFpUUg/Or7ohw/RDIcZT/14/710L7jn3vcryJWU46Yuj/5/YKnA5
iYthnxorcaixrelziXJwYatYC91fNdg8T+eU+PhicNNHSldG69Zj8YMbuhby
54CXHuOmSXY3YMmjWketbLngK6J/r/qV24jLi7s27rH1B19J3YY4Zr2CrjOM
rANuRrcrRLYLLkr38wTZT3Blelx+5LjAA2gd4kgdwIVp3RJJ3QbXoXWWJ3UG
/y+F9CWN9AV8xsohfQQXp31vJ30Hj6Y5aSE5GXSaq4MkV+C3aA7HkByCc2hu
55HcggfRnB8kOR88XjoXItIDcwHuQudo6t6BOQKfROfuEJk7cHZOi1fNDuXN
KZf1pMJDR5jzy3d5wfc5VhacB5kfO2q7eP/+jjya/Yt3HmnmuMdqjEEsYv2G
3N4tKXMbULB3+TbLWengZ38Iu6XPqUNrZA90Xb9VAB6eubpe3bAa6a3o3GUk
Ugp+86pc63H+ChSYJhU7vK0C3PmcS2PQuBI0T6LHKnFBDfioV3nul5TykOSI
jtDpMXXgOtfNh08OT0GFf7N9lt9oAJ8qZ1XT/DQCbXrzfnOvbSO42AXLbapW
rlhk/N+/Ya8H/XuwWWCQSQJe/nzVli+zB113467IS7cz8R3TZKk3MfXgmnad
bmrphdh+3t+85Ou14I9V2iPkp5Zh3QVx0zc/rgJ/7vYrfGpWJb78bszRKMFy
8BfPW/20qmtwX1fuy+O9ReBHpyTH2CjW4ywnD8VFH7PBtz1bqdlV2YAfeu2b
FH+MC550If8uk1eNgqeN/Gb+4K+p9+QPOGZdm65zhqwDfpxu9wXZLngi3c8O
sp/gcfS4LMhxgfvROuiQOoDvpXWzIXUDN6V1vk3qDD47hPRlKekL+NuhfQR/
uYr0fTPpO7gSzUkJyQn4j0SSKxmSK/DbNIeSJIfgF2luI0luwQNozg+TnIOf
oHOhTeYC/AqdoxQyR+Cj6NwFkbkDZ+f05YyRzrw55bLed/j7ceZ826xrccjn
3RacSp2PCTbqPXhG5ZNLK6UbkWOTuvAm1VjE+nm3i+NzftUjiUPmt6fzp4Pr
v53wMf53LbqpuxGd3FMA/uZsaovi2mqkdnSEnmNPCXi89oH925rKUfP7n3Ju
WRXgVzXjnmn/KEbzOm4scO2vBm80/TuaOzkPZVi5mSna1YHnazwpVndJQaru
Y5eF7moAV48K9FpmEYHCdMxqmHqwvqzEu91IzxUbHtoRwJynsH5Tpbz6vloC
lnWIWHjt5+A6RwWn3nxilIn325vstbStBw/NVPT85FaI54/mj3msXzt4vEs/
nWvpKcV2VZ3Nh62qwGesL5pt6F+Jl53SEe/8UTa4Pyk78+ZF12D84eDqgKYi
8N6H6jvfCtRjlxxxreLUbPC0lvcSnc8asO+I1yq6Slxw8x9Wk3i/t3F2I3/8
4p3+4BbUzxHHrGfSdS6SdcD76Xavke2Cr6L7GU/2E3wePa5F5LjAK2gdbpA6
gL+mdZtF6gZuTeusT+oMHkv7soz0Bfzn0D6Ct0aSvoeTvoO/oDnZSHICnkNz
lUtyBW5JcyhJcgj+nOb2K8ntYD1pzreRnIPvoHPxmMwFuAWdIw6ZI/BpdO5S
yNyBs3M6TNPmGW9Ouaxf+xPXxnxfY2XR3/lqqQWnZeO0KUGPenC7QcpcJsdL
RzzeOW9WLGL908cd4w++rkeSF2M2na5NA//jqqommFaLhkstaZJYUADu+vBK
VoRgNarRnbu7tLwEfI2aUd/M+HJ07G24StSTCvBZ0vsk7QuL0dKJDZ6+BdXg
Ks1bMpKbctFrQd86a506cL4JdgeWn01BEcv2ZtwRawDP3XwtqXJNBAqWWKzH
/HvKuq/cdvMpK1yxVFfvReZzLus/xUrC+kQScHLBV22l+MF1LqSULjBV4p3X
vc+XrdWqB0+97z/9rH4h5uw90Tx9YS242r/VBRplpfjLO9k2bY0q8DemB0ya
rCrx6gndJ2/mloGnWMcua7xSg+fVR6G6lCLwgC1Tpi2uqsO7xmZrybpmg6cN
kxkrd6YBi+QaHjMZzgXvHXv3K3N+2aM5a9U7GX/wPuohxDHrmXSdbzkD64CH
0O2qku2CZ9D9nE72E7yMHpcsOS7wLbQOLaQO4KW0boqkbuBOtM4rSJ3B584i
feGSvoAbyA/pI/hx2vcQ0nfwtvEkJ1EkJ+DSNFepJFfgwjSHciSH4Ctobs+S
3II70Jw3k5yDd9G5mEbmAvwjnaN1ZI7Av9G5MyBzB87O6Q+lXV28OeWyXi56
+l7npEa0cvO3+cn95pyg2/t1Z33qwZo5EVN5v5+Rgon3FO/vMYj1UEGNBM9z
9agzQnft7fA08FNztB3f8s4jDx9ILsx8mw++onGT8quKKnRdfMTCjc9KwFOV
r9Z8sClHKuGPAo2PVYDXdYYZ7A0sRrN3xcj1OlWDa8x/1/PILxd1nDOX4xeq
AzdbW2NSq5GCvpysF/1cWQ/us3/4iB+/wpHJ3JDNvPNEcJMO3TSDEa7YNve2
zLVxjeDLPU439dXGY8H2Vj5ersF3fuoWGTUmE+c3FGYITxhc38vxC+6cVIhL
bwxP1mmtAfdNHKV5JrAUx9xQ27RkUhW4g8/1Md7rKrHG3bFPz3qUgb/fKRTj
oVKDvUIv9oo9LgJXjRn28rxbHf41ZtvD/Xuywae1Tf5WurgB/9f9TnwU9zW4
p+mGZObzbE2khZICn//gflK/QxyzPpOu0/R7YB1wdbrdZrJd8Da6nw/IfoK7
0ONaR44L/BmtQwSpA/hzWrc3pG7gx2mds0mdwQ/QvgiQvoAv6hzSR3AV2vfj
pO/g+2hOvpOcgK+kueomuQIvpjmUIDkET6C53URyCy5Fc+5Acg5+jM7FBTIX
4EF0jsY/H5ijwfrTuTMhcwfOzmltt4o4b065kE+1REvmukvZmi8O4zPMOetD
FafmKvbihQfXTGbOR7cUeQaWxccg1mXPHfPxWliP3i7wtzhrlQae8WuFkap8
LdKf0DfC2CkfXN5hj66VcxUq70iv77UsAdezcSjnapaj4K+jRMsWV4D7m7ab
1lgUo9MnvWJjNlWDN3gZWxzWz0XG5dHRtem14CeFlWN2T09BLQd/CrfY1IPP
/xJ48ZFfOJIROvSA+VzMesTFmSoHClxwnrt+EfN9NesJvn0OIQ/jsWiczXPm
33HWhUeeirTMz8A5ZjtXK72uA3c7FxV4P+kNPnF0rP5Brxpwjlxkt+npUrxI
4K/+f4WV4Co5v2/G8ldiswat2JJDZeDvoiTSTvVW48aoedcunCwCv+Q76e2n
DXW888MTSSdFs8HDy7eNZ/I32+/6JvUTr8EPDFO1Z76XGaN5RGZtjh/4Qeqv
NAYcsx5J1+n1HVgH/Ardrg7ZLvhHup+VZD/BNehxnSDHBa5G6zCP1AE8iNbt
KKkbuCStcwap8+B2aV+mkL6Am1wa0kfwzM+k70tJ38F305y0kZyA59BcnSK5
AvegObQiOQTXormNJrkFX0pz3kByDo7pXJwmcwEuQ+eom8wRuASduytk7sDZ
OZVdq3yXN6dc1vdf8JzMXIeSDvUST7huznkXEaFsZ9uLZ1xrnsKcn79YUZpR
fT4GsV4j4n74Zm4dsuszPKiumAaen624as/bGnQ2/7yFjFw++Ny76My/9VXo
Qb5u9nClEnAv7ROXkkeVo5v6uyTHvi8H1863thDlFCPpW41qX3qrwN3LjbzW
jMpFnpOG68ucqAV3nHCuI6E5GZ2XV8lg6sG6lMauHR2q4cjnlJQx8z0B69tH
38med9cFf8mfVch8f8/6mqBhAnM14vFW2T0zmfMa1j+ujZ9WcysDX71q99Li
UB34vmt964313+AHl88YHdCoAZ944YfaXtlSPNzS8t6/65XgK3T5jirFV2BV
zd7FSXPKwK9FpuqeD6rGSnnDs0YoFoGLvvoh6/WlFq9c13bnYl4W+MGI+SW8
39t4/pgDudoCr8HlfWb7ya1rwLrLRRsE7f3AFaiPI45ZP0zX6R89sA74DLrd
eWS74Lfofq4k+wmuSI9LiRwX+BRah78WA3UAP0Xr5kzqBv6X1vkSqTP4MdqX
zaQv4OPGDOkjeKE66ftT0ndwK5qTSyQn4DdornxJrsDVaQ5XkhyCP6C5dSS5
BZ9Oc+5Dcg6eRefClswFeAWdo6dkjsCn0bn7SOYOnJ1TrYufJXhzymX9wH/F
i5n7EoRTT55rkjfn3HT4J7qmohcfWb9On/m+RvDYP49s2RjEuoGORyiT41VL
Q4vmdaSCf5T9I6hhXYNG3SkeplyYB75q9xwx88+VyHxPgsGFnmLwmzWFY/9L
LEOdl/WRpGs5eLjNfg/pf0Vo5jmORYZ3FXhrzj0jtaAcxI163S82uhZ8c6Fi
tWhgMurrctZm/n1k/aK7Yq14TRjqSwhbzXxvzHrSrqfuWRtc8BRrkffM9VzW
FTud+G60v8Qn61XlmM+5rC88bae4RSEDl3uJ6bX0DG63T+66XtDnAjwyTGS5
eVs1uOcIh+5tX0pwVmrMhZXSleArh+9dvtOwAofNqRunWVkKXmR/oKVOoxof
fCklGdBXCJ7Yelom4VYtlk2a0RNkngX+zky0hDm/jLq/IXCzfxL41/WvnjHX
XbpmTLVNV/ED/0b9GXHM+ge6jgNZB5xLtzuHbBe8nO7ndrKf4GvocQWQ4wIP
oHVIIXUAHy9P6sZH6gauTOtcTOoMbkT7cpz0Bdx895A+gs8Z2ndwOZqTfpIT
8FKaqzSSK3A/msN5JIfgF2lu/5LcgsvQnFuTnIM30bmYQeYCfD+do81kjsAN
6NytJXMHzs5pXumL87w55UKeJQrjzp2uR9nVwo/835txEseuNcLz+vCpxbrr
3wrUoz+r7IK5zdGI9XkP+UV5v5/RjfiRH2cFpIJn3j4YLTepBvXmlx7He/PA
r++Sm9NrW4m81yduufC8GDx7/uW90UfKkK34fBvtNeXglRrB/SsSitBKjthM
w9VV4EfMNikFK+egqCg/6TL3GvBFeyP6HA8lo4titq288z5wNyFD432Hw9Dt
57ejbRTrwZecu65z/LczFr21ZPhek0EP1wpe1un4Et+LLxi/uGpwnbumOLz9
bTp+pmI5m5dr8Cczkt+fO12AkzVF72ZaV4PjDFeJY14l+KD41aScggpwrU+e
WnPH8D4vZShUeNiUgnPrijSTm6qw572kP91WheD3Aj7NNRKpxTPMfCdNnZwF
PjHRPob5fLrMxvbDIZkk8JuBh88x120jTuplnevwBbehfpg4Zl2IrjOerAPu
Qrc7hmwXPI3u5z2yn+C76HH5kOMCz6J12EPqAB5G6/aK1A3cj9Y5iNQZvJr2
xZH0Bfzt0D6CK9G+25K+gwvTnFiTnIBr0Vy9ILkCL6A5XENyCJ5Mc+tEcgt+
keY8mOR88OfpXEwsGJgL8Fl0jjzIHIGfoHO3RG5g7sDZOa3x3+XBm1Mu1HNd
UgNzP+LsYXFTxe3MOHxirw50nezD1vGvtjLXaWbaKCfXOUQj1o1nC0sz569V
O81H79uWCt4lFHl4+6NqtKXmzeoPDbngZ2Jt9ifOrER/195fP29/MfiuiyJv
P4wqQ56e8g3PqsvA5erCI9VPFKH2J8nav3IrwSPktXvv5WQj6VzPmVdm1YA7
VzYUrZqSjLLbNIOZz8WsZ1af2p73NhQZSR17yFwvZv2awuKvMj7OeFlS20bm
Pi7W5179bu859yU22HfhNfP9NusPh1UntV5Nxz3hhfXMv/usq7VWj5vUlo8N
D+zMuT6mGvynykHJDPUSfHtuQEfLkQpwU+2mCVl+5di+XsSiSKoUfHTSnJSt
plV4x7JzL9Z8fAMueSZuBpOnW/NPfGsPyQS/0ztnDvM9i4JGuHVa2Cvw7fuy
/mPuP1Bc+s926xPf//F2mQHHrN+l60wm64Avodu1INsFH0/3cwPZT3BLelw3
yHGB99A6XCN1AN9F63aI1A08jNa5i9QZfAvtyyHSF3BZxSF9BDelfT9K+g5+
meYkj+QE3IPmSpbkClya5rCL5BB8K81tIMktuAnN+ah1AzkH/0HnwoDMBbgh
naPvZI7AL9G520TmbrA+dE5v8HWI8uaUy3pJsWQdc3/mhN92P23FzTiv1Bbk
Jr/swzMT3PuY61YNQRG/NshEI9ZPxD5FzPm8xMjvRXw/U8C903K+5k6pRkuV
iqLe7cwFfxzcnNsUWIGsqgXGuY4sBk/874Bttk8pqj+pVqlvWgb+6Wybzx3R
ItR/rny///ZK8O1y58qXbMpGb9UcHjL1YF1SKXn9AVuMfn+c78J8T8B6Kl9n
boB2KIqP/JrAXD9n3VCB6yW3zhnfQrJvmfvaWN/Dzx0XFhqHFVJ69jPf97N+
L/3Dhn2i6dhG3ECCOQ9iXf/UodHBO/Pxvm/9LtV2VeDCbcL37T8XY63vluEv
f5aDn/3YbH16VTkWKJVYLphbAj5N+8mblz8rscLYmSdDNN6At2R6lvN+b2OL
7ZP8DsllgtuZL3n+9notNn0wVzVo9ivwufvyDs/j1GEzfv9+Y2Vf8HnUpYhj
1h3oOlvIOuBtdLtHyHbBZ9H9XEz2E/wcPa7/yHGBT6d12ETqAG5C66ZH6gbu
R+t8ndQZ/BbtixzpC7iQ4pA+gp+gfU8gfQfnoznpJTkBV6a5ek9yBf6W5nDE
+YEcgkfT3LaQ3IK70pxfJTkH96BzsZ7MBfgxOkdKZI4G60bnbnzwwNyBs3M6
LyC5gzenXNZPR79+z9x/r3Rp4q2ehLMcqyv3+Pn4/uA3v0NimfsSUs4o3luQ
HYVY33e3dT/zfU1zmueI5Y4p4I9ELG8wOZ766kdse0oOeJnF5h1PF1agJ5+e
GncGFIH7PxRNuilbihZ0aLjd/VMKHr3AQhJdKkTX5qz28X9TAX7wd7B6TGoW
2rV/6Wfm3zvW/9vwrG91JReNXiNgznwPzPoINZG6hQnPkNFW63rm/ijWNY1v
VIbUOGGFp12dzH3LrI8WNQ7TWhKHF21T+8Rcz4XjMv0dez4oDSsEOK5kPuey
7t36Z+LFuDysP9Kw/d+/SvDjs98JNt4qxqltXJ3jVuXgT2Y7mG/ilmElp+1P
rx8sAZc6Kbp06YlKvG79aacb3gXgY6MOeTPnlwd/3ZJ6lJAB3iTZ/4a57rJB
qb5g4+1E8NIwtXvM/YhJibvv/ax4+j9uSRyz3kzXESfrgAvQ7WqR7YIvpfu5
guwnuC89rlXkuMDP0jq8JnUAj6B120nqBh5O67yK1BlclvZFgvQFvHNoH8Ej
VUnfj5K+gzeqkZyMJTkB30JztYfkCtyb5vA2ySH4E5pbaZJb8AKa8wCSc3BX
OhdSZC7A9egc9ZA5GlyHzt03Mnfg7JwO00O3eXPKZT3eOUswfxzvPDy0+aLf
hrOcYs3Fox5s+IPvd859OS+6Bu3TivvlrR+FWLd5aqp0Pqga8SfgK1PnpoDL
Fnx4xvv9jHTfJkRvnp8DvjvfqVjauxxdaxk9+TgqAnc12K+qnlSCHMuU0yyu
lYIrFn9euiPxDZp6TfjSEpUKcLv8mf/2LMtC8e+WveGdx4GLf3fdrT6NizZ2
bMk61VsN/rG8c63T5GdI/Po4b63qGvCZi62XxJxwwnaeBfdlRtWC/3z3bWuy
3wscUZUwt/HK4M+76834eEImDV9bMKW8TmNw/ZMn/6zOH5eHV7z/OYOXa/Dz
yr/PfZlejCMdxk1b1VEG/pW/+agdpwy/byh9pPO9GPy3oiX+UluBFwbNzBFs
ywe/1ay7kfm8qZy9XDdvRQZ4l4FiGHMdlj9A4ND75gTwjvag48z9yXO/rMsS
Mn76P173ecAx6910nbf+A+uA29HtSpPtgvfR/ZxO9hO8gx5XPTku8Ku0DqGk
DuCXad1kSN3AQ2mdL5M6g89oJn0JI30BTxnaR3A32ncJ0nfw/m8kJ5okJ+CW
NFevSa7AJWgOxUgOwR1obt1IbsG305zbkZyDS9O5OE7mAvw6naOpZI7A79G5
syNzB87O6XuF8Zd5c8plfdnUQsQ8p3dfd1V8XN4ZTqh7pK3hnT+4jc/1t0t/
NWpYUu/b8iESsa6sM1yIua7TY6Uh3hSeDD6p4Yg4c75rnvvIXuFCNrjQMJPP
eEI5qpaOXaPmXwiuOS5IUZVTgta2a1iv7y8BF9j2pCbwcwHa3Su3wTKsHHzm
j6Kkw66ZSDNKV535XMz6/hdNchVbX6MQV2Ef5nox6+92ou0ShiEow6VUj7mP
mvWNxWkbrv6+j7u/377JPN/EulM7X/AKoRd4QuwKS+a+Lzhev+Y5xuGp+I/6
hc3M9+GsN09sPcacD008ZmLFnCewriM463FjUBFOlznVvMmoDDxmlZ3hgbhS
vGaP4PRoy2Lw6ElnjJh8VFzQrngikQ8+efIyfuZ7E1szg/ilAengWd3SU5n7
CW6tKS9PXpUAfn6nvydzn73ZtN9q3R0+/+PLiGPWc+k6RmQd8Kl0u+fIdsHj
6H7mkP0ET6DHtZIcF7gerQMmdQD/Ses2jtQNXIvWuZvUGTye9mUc6Qt469A+
gjvTvmeSvoMr0JyEkpyAj6W52kpyBf5nK8nhXpJD8PU0t+okt+Djac7bSM4H
nc7FbTIX4KvpHE04NzBHg8dF52609MDcgbNzunrGrgTenHJZ3zJRoo95bnHl
mndqRhpnOJePuHdtf/MHzx3ZOmL12mrENTwsIGkSiVhvMMq1Ya5zubquy3+9
IhlcwXVTOXP+7/3Z+UxvZha4nHLbCFezMpRoHVJ4P+kNeHP2we9h8cXo62/H
tTJmJeCzwhX6HAQL0F3pn4uSefVgfbPMZrVx3zPQrm1dD5nvCWCd7RdCFM4l
oRlY3oG5fs76T6G85qWhwag2fvFYDcNq8Id9N4vWXbyP+QKyNZjnvVjvMT23
8KNVLH4lq/iJuQ+O9Zkytp1+C1Kx8FLTNcz1AdZ1RYTmj3HLwWseHj3JnDex
fm/BfOVW6SJstOn5qk9FpeBd757/HilRihc+G6tY1FUEXvaX28f7vY0nH9pt
dU43D9x2XKVmr20lXuO6/ga/QDq4n4Xa0VcVVfiyh8hF8cvx4KeXV5nmX6nG
+r23QkutfMDPUJ9GHLMeQNfZT9YBd6DblSLbBa+i+/kf2U/wP/S45pLjAnej
dThE6gBuROsmT+oGLkPrLEjqDD77NOlLAukL+Io/Q/o4eFxD+w7OpTkRIzkB
X0NzpU9yBT6e5tCV5BC8jub2F8kt+FKa81yS88H9pHMRReYCvIbOUTCZo8Hj
pXPXSuYOnJ3T3a96N/DmlMt66m/7Xcxz5ofE1da14tMcgR/fbNDEv9jo75E2
5v57mdMvV6wqfI5YH5Zo48Dcl3DDLnN3siEG31is4Mt8XyMkIFheNyYLfOSu
U/OYHJt/Epo+LbsAPFBaviFBqhiJO17LNX1bDL55hpjDIcl8tK969bjNvH+/
WM+7nLj24doMlB1iL/LxSAV4wM/W/Gy3Vwi/mG7J3O/E+jeO3rK+liCkMk9X
hnkOiPXY/siUXe33sPnsiGbm+VzW1TOUG6eXx2B+Y9TB3LfMutWI4CW7XFNw
6AuHa8z1XNbNrBQv38/J5p13y+1mPuey/njW3/+Y+3vzS4dN3bqiFPyAnZdA
gmMJfvHJQ7DZtAi8TO2uNHN+aXawX7XHOhd8W0RAIXPdZZn4+itXTqWBd7fd
3cvcj3hc3qx7f+JL8HRn2xjmOT2O6sPRUW3e/+PJ6wccs95L19lC1gHXodud
R7YLXkX304jsJ/gRelzPyXGBB9E6ZJM6gF+jdftG6gZuR+scROoMfpL25d+x
gb6AN/8b0kdwX9r39aTv4NdpTlJITsATaa7ySa7A19AcGpAcgnvT3EqT3IL/
20lyfpPkHFyFzsUCMheDP59A5iiEzNFgPencXSFzB87O6c1vO1R4c8pl3bSw
9U1+RyUKEuCmWCw9zbFMfLdWeOtfXDCmcYyhfyWy/5jc9S4pArHutXiUplJ8
BRrlM8uxbxcXfHKLz57Tq8rRqIS/a2TWZ4KrVE8o5P1+RrLDUjzXZ+WDSzqN
dQx4WIQmqPSMVdtQDM7fb2t/Uy4PTTy/3YJ3XgZuWG4yW8uOdx6Z+loky68c
PHLT7qD3QYno4MZY5j4+8IA4m+fVokFIvcklYGrWoD8p9MpvqbuL48vcX5d+
G/T/voYfE1ocg8+PmaLXZDXoO0xjY1/9ScarLsjN2mlYAf4tXqMzvyMLnzIa
c3ATtww8+4P7a4HNb/ALzw098Y4l4LMcCz++/FqMFValblVLLwSPGX38CPP5
8UjXzHvnPXLA9/5O12Cuqzrc4m/9nJkKfnS65T+vdZVYl/+SDPdrHLhB+GVv
5jncb2+HH71Q4QV+mLoFccy6MV1nDVkH/ADdrjXZLvhLup+6ZD/B59PjWkKO
C7yM1iGS1AH8D63bcVI3cCNaZ1lSZ3Ap2hcr0hfwlKIhfQTfS/uuQfoOfpfm
5DDJCfgOmqvnJFfg7X9JDkVIDgePl+Z2MsktuBLN+TqSc3BBOhdTyVyAP6Zz
JEXmCDyPzl0VmTtwdk7bn6en8uaUy7r/BJWFzPtrhj3sveG2zJRToP1LMMae
l8+oKcOZ5/qiw+ZuLfAMR6zfwx++j3lfjoSnLAryXPMaXFfl9SPmOtCNPBmJ
dWYZ4G0rb/Ex58fdiybwXUzMA7+xV+2Hfk8h8jerHvnNvwhcdVvaG32FXPRo
xDsz5nMx6xN+JvZdy0lDxelhOcz1YtaHNdzg+x6RgDbsaeopXVwBvj34Z/ec
dYFIUW+FI/N8Met9r17MCUxyxD53xGyZ936wHpJomz3ZKhrfr70tzDwPxbqT
zcSrwvuT8bxTbyYy94mx7lmrtom5v0FX1MWI+f6cdcNfik1Tlhfg1Kflnsx5
BesuheEdqrx+q4sNj3F5/Aac6+gewHwPEtgzVl43NBtc61HrIeb+AKFfRdoO
U1PB/52KsWbum7+3WFjEfWoc+Lf2seHM8+Sq+44lWMR5gn+nXrh3wDHr/KZk
HTOyDrgO3e4Isl3wFLqfHmQ/wd3pcSmT4wI/Q+vAJXUAf0brtoPUDdyX1nk2
qTN4Pu3LXdIXcJHXQ/oIPo72fTXpO3hTPcmJOskJeP8PkqtykivwlTSH3iSH
4JY0t6Ekt+DNNOejJAdyDr6DzoULmQtwRzpH8mSOwL/SuftL5g6cndP05502
vDnlsp6jWb6eeZ+PyT15gc2/TnJu3ijKGZnxFwu83m3DPOe4Ja/81PGzYYj1
T++dPJj7P8NlQ7fNnJwEfvZt2xPmutjMyumfjnukg1vHZvcwnxfsFznVyfjm
gk8S3dI5P+4NmtI/zGwPrx6so5rV77YszUGqbyLOM98TsJ7kffnCJf40lBXo
KdYyqgz8fchrhW2h8Uh+zl8BrFkOriDO9V58MAAdihGaeYK/Alw2bbrp+PsO
eHzY8smyEoOOH5ltP5EUhauFOBJi8YPr3JhU3Mg5g7GpP2c5c98c629HnzTK
X5yJpznMrmeuJ7A+c4zmz39j8rGgdl83c57F+rfV/Qm839s4dfuxq0uMCsAP
P/lkpp5Ugjc3KNl2R2WB3w8zcow+Uobr6oqcQg6mgJ/Mvj6uxaYcL58o6a6m
8AL8h4a2maFoBa45y+c+3f4J+E/qJsQx66Z0nSlkHXBnut1Csl3wo3Q/15H9
BO+gx/WSHBf4QlqH8aQO4F9o3URI3cD9aJ1PkjqDN9G+VJG+gKukD+kjeOcC
0ncD0nfwDJoTRZIT8HCaqzySK/BlNIfqJIfgI2huF5Dcgp+nOXcnOQc/Redi
CZkL8I90jorIHIGPp3PnRuYOnJ1TuTAxQd6cclk/02Y/fItCOSqWE5ngHH6C
070icUXHH14dEoxkmOfMQ+WnhiiuCUWsb137Yglz/73Z5uTVP98mgp/svSzF
3Jcw03yE0+iENHBRu/lLmO9r5usUPii1zgEf556ty+S4Ka5zpCvv3yPWDWNj
SvNmZKPjU0oQ8z0t68qerSHOy1NR+jKJB8z9S6zz7/wtdsbzJeJ3Kitknuth
/dFBrQk7LP1R3i3NS8z7Llhv33Pd7sHuO3jMJ58lzHuoWH8lKGZj1BuJf9n8
usA8n8t6V1mKqfo0Lk4MbBVh7ltm3Wx18ALmft0ZNxcHM9dzWdfbFH1OtTIX
v28Wmsx8zmV95HH+C8z5pfOHg8vuL8gHv54r9Zy57rL75eiJqRGZ4MnWrz4x
9yNmjYpyu+ebDL5s6rJY5jm9RY1vzs7XigX/WFh8lXl/zekFtxI/bH8M3kp9
JHHMuixdZyJZBzyNbjeRbBfchu7nZrKf4BPpcd0mxwV+mNbhLakD+BVat6mk
buCTy0mdX5I6g9fQvnSSvoB37h3SR3C9oX0Hb95BcjKc5ARchuYqi+QKfDfN
4WmSQ/B/D0luv5HcggvTnC8nOQc3pnMhReYCfDOdI1cyR+AddO7aydyBs3Na
4NgiwJtTLuslaa+m9iuVoWyPHLfvesc5E7i+Ikdk+/HFkQWHWnpKke1uvDKh
OwSxrr9VUHIv79+bfLO6Di/fBPAwOZlT9p+LUe2ZB1HmhangH55Nm9oqXYTE
TjdIvtPKHlzn80dv3u9nJLuplX/q8gJwawnXMRv7M5HPDT//xqAi8K2VUxun
66eguPoyqQz1EvCOB8Nxuk0cehY5vNP0dCm48wRn/f4bfujno3V+8lPLwE8o
7pXJFLbHK7fUncxVGPTg8gmdOssjsbKlSKJG2eA6EaFjb5TEJmHDTWPeb/sy
uN3nH7Xk+5XS8YsV9n0Nt4rB5XV7iw8/ysFRra/rzugXDu5/R3Ac83lwuPmw
rbxcg1/XnHWWuU76aHLQyTm+GeAuyHYmc/+w3z7tJ9NfYfCsdWOUmedqtx98
Mdr5QAx4ecWmFcz7pkI2H0vXFfAAr6C+njhmPYeuo0DWAXej271DtgtuQ/fz
HtlP8N30uHrMBo4LfB2tQwipA3girVsUqRt4Hq3zYVJn8EzaFyXSF/Ajq4f0
EXwn7XsH6Tt4Bc1JGMkJ+FqaqwSSK/DTNIf+JIfg22huEckt+Fuac0mSc/AQ
OhdtZC7AdekcfSFzBH6Bzl0umTtwdk6TTGwe8uaUCzl3OlSzUbEUNUzd9/xH
rzGn/UYOR8WwH6vnu8xm3nfzbLF3n2loMGL9v6dF9sxzgMcv1wYH6sWDG035
L89lZDG6Y/yfxqSGFPDx9Z+3MNeN2m9Kd1WKZoFf9r22lzmfDtyu/PkC73Mx
69f+HRaSq8xAqy95CTHXi1mX2LLS+dTFZOQSYSLO3EfN+rvrE5S5R16gA3b5
cczzxazP/+2x8K6dL5qjI7WIee8W6xZOHSVzM2zxG9UVM5n3YbIu5m+sIJgW
gWPU4ucy7wlh/bDUFrEzqq/w52c+0szzU6wLHz/UvVExDZcEKcox95XBOvqG
f5p4/TvZvjlBNLsA3DJA9xDzvUb0LTcOcx7C+tLd4t9NUBG++vDa0hsO6eDB
rTPmM/fB58odEWqbzwU3d8r4veFZCf6aIcH5ZRQNbjZ2+l3mvWm3pncJ9GL3
/3Fx4hj2h65TQdYBf0a3G0O2Cy5L99OK7Ce4NT2uYHJc4BK0DkakDuCzaN0K
Sd0G16F1biN1Bt9N+xJN+gJ+0HlIH8Fbu4b0HTyT5uQQyQn4NJqrByRX4OY0
hyokh+BmNLfRJLfgw2jO/5CcgxvQuXhE5gJ8BJ0jOzJH4Bvp3LWSuQNn5/Rq
8LAo3pxyWd9mkDrvgTTv52VmiC52OsZpy+i4d86N9/OLr1Qz7/9J1X9/qFUn
CLH+VM7qCfNc5EsTsQ6nUS/Bl42ciJn7RddWlDqrfEgGt92/dYGjYAGy2mXu
yNSD9bNRY38zny9ky0u27lHIBY8c62wmHJSObNv19gZ9LgDP4n98tkwKowXe
L9qZ+8pZl+E7+Lh8dSya8PhcOPO8Netj77edOX77KTomPGJa8LgS8G/rPI6v
PHEbK8617WbeD8p6Q4eVQ/SUcJwsJr+HeW8K6yrblFe9zk7AjabfspjnyVi/
fWkOeiCdim9x/c8z99mx7rVq/kHe720sUapeyFx/YL3jIv50Uy4Pz5KZNTqf
d17Gunbppoc7Et9g24Imj32n0sDV9R6sXJlQhHX8ZviuuJoEXnfV7NHeQF7O
1jhsjTWKAv/69o/AlVkl2L/c7cyOow8Hj5e6OnEMx0vXqSHrgGvS7SqT7YLr
0v28QvYTvI8elwg5LvAgWoc5pA7gTrRuV0ndwPfSOteROoNP7iR9waQv4Pkq
Q/oIXnpvSN8H16E5ESA5AY+guVpIcgXuR3N4n+QQ/BjNLYfkFvwKzfkNknPw
JXQutpC5APemc1RG5miwPnTu/pK5A2fnVKo4ZBpvTrmsty4OEWXeG14sIDBm
qdhRTt775SM6Uvux3pLaDcz71Ow0fMdH/QxArO/v3V/APGdu11vg9TXkBbhy
Oxq4/965gsNtzMXgVW8/mjD3JdiubbnE/PvC+objDqbM9zWhhqevMd+7st43
zdWSyXG4Yd4MT4l88BWpbetrdF6jDX3yncxzOqyLnbvveGt0DCrk3/WEeX8F
69PKVhrzW/ugTF2xN8x7HVl/NaJrueOYW1jzq5Mw875l1nfGHUtbuz8UpyzU
3Ma8h4r18EtiFjtU4nFOsMR65vlc1g9x9VboTk/BOtvsApj7llmvvxX2gDm/
XLIhUpu5nsv644L8BOa6S0xItwjzOZf1uro9ncz9iM13hK9JqKeCpxudWNhj
VYjNh+s7Bxclgkcc6ReY9bgIcw7cf6p4IBJcZ8f5a8x7XfdNnjX694gH4Duo
jyKOWY+k60iSdcCz6XYPkO2CN9H9rCX7Ce5Hj+sZOS7wFloHCVIHcBNat62k
buCZtM4ZpM7gdrQvyaQv4I4jh/QR/EMp6XsW6Tv4SJqTIpIT8Bk0V5tIrsDb
aQ5jSQ7BlWlu40huwQtpzp1JzsHl6FyEkrkA30vnyJ/MEbgunbsUMnfg7Jwu
E7MZy5tTLus3/iqP4uMrQo0dnr89vA05iSeWJnh97cevBWtOfnIrRCd6HgTu
tfVHrAvO/zTOWP8NOvv95GlN1VjwHRJCOUE781FXk2ch814m1qUDFzWMdstB
NYmvRZj3dbDeoRctlr84E6EO2X0Dz7dSD0q37HSTTkXWk7+fYp5jYn2+4i6X
aNNXaE1zychJbfng0cZzVbXeRCGHg+muzPkL63nFZTaXar2QlKL7OeZ6K+u7
g24bY8+b+JPlJcR87816wB2t5DMeIXjtLO8fzOdW1nUzN/RURcXh8wdKZJjz
Adbn/Fo1m48vGT8euK88D3zVr4PLmM93/D522vdzssH7Sh62MNc9J2X79m1W
yAAff6hZgrkf2DRMYAIv1+CVkhm5zHOyxpf4JveJJID/+/3Kh3l/1MeGt8of
nkaAn6mIeMq8V1lwh/Fv80eu4GepY50Bx6wP6ybrJJN1wGvpdneR7YJPovt5
lOzn4Dql5LjGkOMCV6Z16PMeqAO4JK3bA1I3cFNaZwtSZ/By2hcO6Qv4jOAh
fQQ3oX1fQvoO/pjm5B7JCfgEmqu1JFfgT2gObUgOwT/R3GqQ3IKL05y/JzkH
30rnYsK7gbkAH0/n6A6ZI/BXdO58yNyBs3P6pORPN29Ouawvk563nfl7J6Lr
T+0cP+0Ix9l87G9jkX9Ym18+/cSeAjTNWNXvmogfYn31BpNf0nL5aJd2XKtS
RTS4kYfQMmbe1rVXqZf5vwK3MLzxoyczCyk4y69kPhez/t/VsabMdaaGadP+
rjXLAD/g83M2c/7tHrB1K3MfNeuZngdMJK4moB0jG768b8gFr5aPln/hEIkq
NxsHHXPKB1/0s0JUIuIJamlzv8O8j5r1779vzjOQvIEPTne4wfydCNbzM9Rm
8ecHYa1F7ieY92eyPsGzavyPqS9wZv+G+0qFeeCHFjlcYfpxT+TYRuZ5K9bn
z7h6jvmeosh5nylzHxrr2413dEivz8T+JnmrmO/nWd+458Be5r72Oq3zc5nz
FtYDvEaMZZ73zh5r+/ud1kvwlaNHGjLvQXshLjbM+1wYePvOkKidAQVY00dp
maG4C/gP6v+8BxyzLk/XcSLrgIfQ7caR7YJvpvtZQPYTfDc9Lk9yXOCLaR3y
SB3Az9K62ZO6gc+jdU4ldQbvoX3ZSvoCHtA9pI/gb36Qvn8kfQdPozmpITkB
j6K50iW5At9Jc+hNcgj+7wrJ7UeSW/BTNOcqJOfgh+hc7CJzAS5H5+gUmSNw
LTp3mmTuwNk5vXEwdhdvTrms7/9Y9Zf5+y9XhrtsFbc34NgJPpdXXf0PJ79M
M2Pei+sbasWX6PEUsR7q1t3HvC9INujbqH0Ho8DfjTWeL70pGxkbFyku5NWD
9VLth9eY+0s/XhcZaXoxGXz+dhc/5rrbB/U8y+s5aeBLIlc/YT6P/LB8q3TE
NRN8UoWt4/BbL9HE6omXmH/XWM9G/h8sbCNQ4ILzv5j3kLG+3U2uu8XcA2VM
qhO+rJQHPi1/Vt/E8GtYdqxwMvN3M1i/3Hf+XURHAD7/5/TKlKbBdcyaQt9v
sIjBC6LcCpj3rLD+OjhkUYzpKxzu0eLPPH/G+t7vbvIz9FPwVfX8e8x9eawL
upy9oWWXjj9tTW1jrlewnvBryom9y7LwD5WGp8x5HOttFw2fByvn4A1iEQdn
Xn8Bfqd5zmkPv1wsJBy5+db6Z+DhS5VMvujm4SdBHssMQpzAI6jvJo5Zd6Tr
tAsNrAP+hW53Fdku+Gu6n81kP8Gn0ONqJscFfpjW4SKpA3gBrVsIqRv4bVrn
OaTO4IG0L1akL+ApQ/sI3u9K+p5J+g7+lOYkmORk8OfLSa6ESa7Ap9Ec/iY5
BJ9Jc/uV5BY8n+a8neQcvJ7OxWUyF+DBdI7UyRyBc+ncFZK5A2fnVKYKb+PN
KZd1+Z18sszfx0oYtfrWnY6DnDc5MdKz9vKOt0LFlHlveHf47lF+oj6I9a3Z
d54y71NL3+ct7JD5HPzl25AI5jnzfS5Ols28fy9Y19Kwucncf+/Td9WF+R6V
9QyDGFvmvgSt70nOzP1FrHcufXyR+b5m2soRXcxzN6w/PPNRgslx8n9Si36E
ZIJbREx7UfopFL2xz2ln3tPI+vuZgddDl7mjR0WrjzJ/v4D1/iVbGo0kr+Lu
JY5NzN8VYl1Qz3oJEvLHp60OmDPvW2b9x7BAXdvcKHxg+2bRYPMs8GsiEnrM
+WVSyzU15vlc1tWutbYy112Ulu91Ye5bZj2ye9SkL5mp+PIXAz/mei7ret5N
15nn9CRaFX2Yz7msxwU3KTHnZxbGO88dfRYDPqqpP4V5r2uqtniazfBg8OUl
m2Yv4s/BV1Q908ZI3AeXpY6IY9ZH03X8yTrgCXS7RmS74Pvofk4n+wkeR4/L
khwXuDatgzypA/g9Wrd4Ujfw4cNJnfeSOoPL0b6Ykr6Au0sP6eOg0757kL6D
b6c5KSI5Ab9Fc5VOcgX+juZwNskhOJfmdjfJLbgmzflzknPwaDoXpmQuwDfR
OfpM5gjch87d3IiBuQNn5zRFZMtt3pxyWXc4/CerKioT7T2V5VcYup/TtS42
t+3CPzxbOH/HE6NMFH5yyfjE2Z6IdX2PvPfVtzLQ6/Jp+5fgMPB3e+Im7BNN
R6bXkhR450HgFxc7xfstSEWrWzfInVF9Bf69/5Qh5wxG826mXxfenww+3sf5
VVJ2AlpdyJ1mHJ4KbqDaeIr3+xl5JowJa72aDr42/N7nR+tC0KRXhx9Y5meA
d730DDzyzg05+b12vHQ7E3yO37m7EzmX8b8k67vzwgd9RV7p+/OLfPHHtvm9
p5QG/eBNu8dGopF44mpNgS0Kg+sfaTL6zHxeE3DfaH8+KA08szHwKHMds8fJ
d/gu15TB4zV47MPc31sZKTWfeQ6V9fyjcwqY5153NP9eukMlHvx99d27zPug
wk1ezeTlGjz+0qGfI8dkYvl3ms4OCQHg6XNKa/m9M3Hu6rdXeuQdwTOo7yaO
WU+k68wk64B/pNv1JtsFL6L7qUH2E7yTHlc+OS7wYlqHX6QO4Gdo3caSuoGf
pnUeT+oMvpP25QPpC7ic/5A+gkfRvjuTvoPPoTkRJjkB16a58iG5Av/rTXKI
SA7B39HcSpLcglvQnGuQnIM30Lm4QuYCfDedoyYyR+Cz6Nz9JnMHzs5p9MyE
AN6cclm/ZGnxVUM1HT1bdb8l7/AeTtz+hWoeD3ifK2uO/Mf8fZRY6ySZKcM8
EOshesENGxXTUMZW1FwXGgL+zrpRi3mfznO/KZj5XMz6IeXl25nnDGdOj9zF
XC9m/Vlmq/GMyUlIK99JhrmPmvUSr7D5zHWp3766lW/Dk8HVG2R09vLO1ze6
vXu2d1sqeHXExKPNjoHoQl39WOZ91KwvtNCy/u+OC/qd7FVjMSsdvFLlc+sS
sQvY3TYXT1476F2lrcaL5X0wdjQoMq0dXCcNp72T4tV3TCtXl3nfJuvSf0Um
MN87fF+33GWZYwp4zgaTk8z1ePvZBbexIQZ//3TCx95dXCxqPObGj7eJ4A/1
BGYzz2+Pj5oxgvk+n3Up5yUXmfeaVeltnHOHd57DemjxvPxb4Wm4uvrt2LtG
fuDKGhd6LVek45y5E+1fT7UH51A3II5ZD6PrJJN1wKXpdpPJdsE96H4OI/sJ
/pUelwA5LvAyWofrpA7girRuX0jdwN/SOo8idQafXEb68pr0Bbxw/ZA+greZ
k753k76DJ9GcXCI5AV9Dc6VJcgWeTnP4h+QQ3Jvmdh/JLfhemnNJknPwBjoX
XDIX4IF0jt6TOQKvonPXReYOnJ1Tr4DNrbw55bJ+S68ggfm7qFe2jPU9JqjL
MXeKEFvwnJe3haUbNFxSkKiTXEhA9QPE+v6dnP2JzcloREi943tePVhXSGru
Z94vZM139jPzPQHr3b171BTPJaH1W63H4yMvwFt/6kQx96OqaWxoYe4rh583
uPOVuU5XYTBMunLra/C7T5oVLHmfX7bs+6YlNyUZ3KTrxMHCIj+UENu7kvn+
lnXTng9tDlJO6L/RN28wf7eK9bRhKXvO/rDEuXlKu71yB33aiG1WHOsnuOzK
6krm72ywfiJCO8djXQg+9vKCxrTAwe3OznpQrvUmCstbXshaU8kF9zmsbpph
E4cbliRb57i9AueU1Jz5EJSIY6xWRzH38bGuYSUqr8H7d2vUHNN+5voG6zES
48zuHkrGm7VXbS7jnfexXhuS2FKrkYKtpjgpXRv3FHzf9sNJtjgFb9M+8C30
y63/8V/bBxyzXk/XMSDrgL+g25Un2wXfSvezf/bAfoJvoMf1jBwXeAitQxWp
A7gkrZssqRu4Da2zEakz+Dbal1LSF3Cv4UP6CK44tO/gWjQnr0hOwC1orraR
XIF/oTlsIDkEb6C53U5yC/6d5nwryTn4cjoXd8hcgO+lczSbzBF4M507bTJ3
4Oyc3sq878ebUy7rB8632jB/B3oT/7G9/8Xs4OwYVTf/cjrv94Nd6B3m72Mp
PTq+JD7IBbEuZ7NvlI7Aa+Td2PCC+f3PeoqK7xnmfWq1QfO5zPeirG/M+OTO
PGf+pZ3jy9wvxPqILw4BzP33lu7Bl5jnaFiXGi6xibkvIX2eIidlVQJ4h92l
Bcz3Nei21AfmvYusG/Dzd17l5dgixCyc+XsErJ9V2qD1zs4RnRmvcIL5O32s
X9h06teyJDPcUvPlGPP3c1l/sOrkJp3r7jh4n30c83eFWI+2v9fJnF9mmlh8
Zd63zPpngbgXzHWXO0ac8eq3E8Elemq2MPcjTpluvORA4kvwpAVCF5nn9OR/
8z1m7ltmfZLdtBjm/TX+izuTmOu5rK9a0braQCYJS8z80MB8zoWfP3zoEvP9
re7JqFkp2p7gc0Qik5i/A1r4aJaFSPwN8LnUrxHHrE+m66wg64Ar0u1OJtsF
n0L38wnZT/BUelxLyXGBy9A6TCJ1AP9D63aL1A08m9Y5ldQZPJ32JZD0BVxu
85A+govQvp8lfQffTHNyjuQEvIHmaj3JFfhcmsM8kkPwvs8kt1dJbsERzXkX
yTn4KzoXP8hcgMvSOXpJ5gjcn87dKTJ34Oycrmt6uY83p1zWdS+7HjrjkYB8
r45KnbBlOwfhkxeeVPB+39bUXr6vloAao1P1np68j1hveLgsfI5GPCrQj3nA
O68B71dyCw4NjUPr3h2X4s8PAtc1sU9vsYpFfQtdxQXTIsBF12n9OJ4UhSR9
9j+fbBUNPsw8pSJqSji6qs29skLoBfjEi6OVIjoC0PSt3js8574Ej5jntl3Z
+glCPSM1Qx7Gg9dg3VqjSFuUcdlVN8gkAVxYSjThtfVpLCKde3+O26D3zJtf
vPqSK3aP0tnFXG9lXY1/cg7z+euXqmzo9fbB7eZ32Nox1yUrZPfray2JA69M
qs1j7tf96hPkPL08BvzImPiVzHOs861+I6PeSHCHl46CzPud1GxcNq3dHzpY
N4vzbR2OL/G4SMVcjpA/+NaRm12Yvwe0YezMl9rX3QeP6+44Pebv5B4JPFez
9eJV8MnU5xPHrGvRdRaSdcD30O3+eT6wXfD7dD8VyX6Cm9DjEiPHBd5A69BK
6gBeQ+tWQuoGvpvW+SepM/ic+aQvD0lfwJ8P7SO4A+17Juk7uB3NiQrJCfjf
CyRXs0iuwH+YkRzakByCT6K5XU5yC76d5nzcooGcg/fQudAhcwFeS+eoicwR
+BY6d2NiBuYOnJ3TSUqz03hzymXdWMnCa49tLBIPK5mbizdxZlX3eVz48A/7
eRZMZO7PsBY2PHFazx6x3i8Rm1F1PgYJpyvbivA+F7O+vsfxn5pMNLLy/dp/
VcQP/FqPz6JFJpFo+sOzY5n7qFkftqKz0PhsGHLT3T8l3zMc/Fj2kd4WnSAU
Gprw8cOHSPAvkSHV8R5PkXxn5Kdah2jwBoH1X/x45/d5QsuSSuNjwANXzeh6
ln8D6XTNsh5tEAt+OO7X3HfmJjjw2KetojcH3StdLs2HVy/P++92z5016IcW
ZZXFz/bEb54+CsySHVzf+c8VLvP3sM+lX3g2PzsK/EHxhlHx3SE48O4htxWF
z8F9tybZNSVF4IddfmsV1oSCB00MXsC8p0zD/mjz858B4HLT9FJfN0fjAxKj
F/iK+gzuf+D6uV7fY/DCnj38L3nnRVAfu4+SWlaxuHRs17WDphfAv1I/Thyz
bkjXESDrgCvS7eqQ7YKH0v1EZD8HnR6XAzkucB9aB29SB3AvWjcLUjdwa1rn
PFJn8Ne0L09IX8APvBzSR/CjtO87SN/Bk2lOCkhOwBtorlaTXIHr0xw+JzkE
75IlufUluQW/SHO+kOQcHNG5uEXmAryPztEKMkfgT+ncpZC5A2fntLDddT5v
Trms46LuS9a1ESik13xkR7UqR8BcVG/Sj3/YsW62k6xFBMocEyAfzqsH61tS
lkv+Ug1Hql3r14y54wJeO3uCZZB2KDr64azRoogn4B1CQvrLeXPbenv6vXt2
voPrWF2rlDoYgB5wyh7OWxcIPnLelMMnbj9F3VLpMxcZhoAfm/N+bau5B9q6
MlK54G3o4PrRR+478j7vRA/7cPGxXzj4xj35mSdSLqMfiSebmPuUWG9bUGC9
uekwftIVbjKlfNBFt6zPORZpi+unT4+qXjPoXI/e1Ubv3LD0QtsXC2vCwA3U
54Rb13rhp/lF9yQTnoGrW9yJ/HfDDxcmKET/aQkCdzD+zakVDcKz9+/U2Wnp
D37o2K1/zpOf4bxXX02GWfuA6wXabDpwOAx/k5doD1vmDj5BW+7vz1/heMU2
8y/NvPNE1iVkbje/TYnAe84cUJOsNwNfSH0Cccy6IF1nAlkHfB/dbh3ZLrgR
3c80sp/gzvS4ppLjAt9G65BD6gBuTuv2hNQNvIzWWZLUGXwD7Ust6Qt4oPiQ
PoK36ZO+/yR9B6+nOXlBcgKuQ3OlQ3IF3juX5PAfySG4Ks2tN8kt+Gea858k
5+AVdC4uk7kA16RztJfMEfgdOnc9ZO7A2TmV1M4axZtTLus5KwoeWzzyRwtv
r6poqVjDMfnZ+H5PD+/3gO/VPVI7/dGmI33BBrzf56w7Wp0wn2Tvh4r0W4fh
qfbgokJtN0yUfdHZVWbTjcRdwFUVNGaWWfmg8Wkf5vRhd3CXccGaM+yfILmy
7s+WcZ7g4iOS25n774eZPvzMvEeRdQGNP+eY+xJOnQ+X2/bEF/zAs+IJYV9u
ofl/fBqZv7vH+qjN/D6LeDnenFl+b5iZP3jZBIXVn+31seYcLSzjNujKX/o8
tvHOL53CN9Qyfz+X9dX3rgf3yjvijyoHF2SoDK7f7ffzlcUjV5xy6oVYR8VT
8NBQoVg9AQ88++uMYdFt3uDb1ntcvFjhhfme77Nv2f4Y/LzsqYPCxk+xjXlL
MHPfMusmq0yPn+/wxZPOLlk+VuI+uP34VR+ZvwOqh8XeM59zWXcP6uhk/l1L
eysxwtDG5H9cnzhm3YGus5asA36SbncE2S74JbqfF8h+guvR4+qKGDgu8Be0
DlNJHcCH+5O6vSZ1A9eldX5P6gy+l/blPukLeLHAkD6CZ28a0nfwdTQn4iQn
4P/USa7OkFyBT6E5/I/kEPw2ze16kltwRHM+jeQcfDKdi2tkLsDv0DlqJ3ME
7k3n7i6ZO3B2TqtUeip5c8pl/WJK7n9cT1d04u5Mz8g6Kc486+78Xf3/cNWr
GFdDPVd0fI5eZJO5CWJdz/6o2dy7Lshx6eNiKbEL4ImSinqr1jkjr3+KUock
b4Bf8B/vt/bifWSuftJyToYtuLJUk87Y+w4o/EfvUf8kR3CXTgEv2RO3kRLi
V7ny+z74lp+rbguEX0MCBmmZ0j7O4JO/Wa0+/cMSfdsVxb+/wAXc/Z/9B42m
wyjlks5fFStXcGt14T7T+5rYvPzZRstHg+5cO602ifd5qu1cySyRFYMu/n5N
1QTOZbwmxUIrc8Pg+mFvuxZyPW/iiZWLA4JrnMBnzwy/my5sj6WW3XTf0X4P
XMjcrfp93V2c4ib9zHX3HfDbSakTo084YZf9zcF3xtwCV1nQPt3ktzNeVfYs
zlDyKnjTwtFWh0a44n2vjpovTTID19+YUeLj4Ipbn/R4tdrrg++hfpU4Zr2Z
rqNK1gFXpduVJNsFt6f7aUf2E3wGPa6X5LjAJWkd5pM6gL+kdRtH6gauQuus
QOoMHkX70kr6An5RY0gfwfVo31NJ38G7vpKctJOcgHNoroRIrsBtaA7XkRyC
L6e5TSS5BbegOb9Gcj54vHQuwslcgO+icxRO5gi8ks5dBJm7weOlczom+K0X
b065rAsbTP/h4b2Tc+eJT6mM4lel/n8D/2EXx9H+n3fv5LzPPGmdh6U4rN8r
uzct4foOziJ7rXv5h9eAqwQ0NNqK63CmGFT5j5+mCm4oN0XaSGM759bT1N8/
ejXA3/4ILN70awtHyO5imtuybeCLHOeXSDqpc5r+RZbE5W0HN1YdwS9ur8Ip
W6u8RNxOB3z6mLS+o4IKHLWuLo/xGTvA/5QvDf1RvYAj2Fr9kGO1E/ySWfbZ
6Lpx3O7Yu0Fijwe9YVnZnwlblnPL93Z2vFo66OtPL6wvDOVwHxmPs2iSH1y/
t7VK6LG3GnfUjuNXexK0wZO7ayK+623iPnC9qdiKtcADKxvyLZZqcc8JpvY4
hW8GN8nUtvHboM31GWH8U0ZsI7hvgrOP/3sd7hOl6hN3OtaCW3I2SSb37+BO
M78i/l/MSvBh7VVhQY47udIhQd8/VMwAH049OXjAuayfo+v8MxtYBzyAbvce
2S74KbqfbmQ/wUPpcZ0kxwWeR+vgTOoA/l8bqdswUjdwA1rnB6TO4P20L6Wk
L+A25kP6CP6K9n0S6Tt432iSE3WSE3B9mqtKkivwaTSHLSSH4GU0t7NJbsEP
0py7kpyDc+hciJO5AHegc6RB5gjcic6dVNbA3IGzc/ot/0I5b06TWP9bzxeV
1dyIUtrxO0N3f+RXVeCrLNmNK1Vfpuzqb0RqCrvcLnpZcFj/Q39+/I+Bn8f/
/8/nj3jxgPfzXNa1gkrUYxxvIs2pDd5bHTSRTvHJSDfedm23fjEq9rqJJl9+
n76gYQaH9W3055+Rn8es7/q9IJiXQ46WQoZL2/+TQ2HrjXdNPzSiA18nP7Xi
nV8ktRwdycfXjYWoPyOOWWfX+Sw/sA7knN0f9YjgTN7+cNntJij1dLV3NyID
gVsPLvN+/42z9RT1ntwN7k4cs361XMe1yMMcxakZjZV1XowW7Go9/oG3Dut/
iGPWp+k+fe72r/H/Zr9PQU8ieH6pHcycde6uhtE/79tbhjwQOQQ0H+Z+6YrE
ZaBy57uajuS2O9xw93NwgDSW2LdFbmVpvce9D2Y+zBxmiDnw8IHZ+/ZXjyTQ
3n0we2HmWCh9ZAKaYwczB2avgzrYXnj4AwBq03nx
     "], {
      {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[2], EdgeForm[
       None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[
         TagBox[Polygon3DBox[CompressedData["
1:eJxFnXnclVP3h8+57/sc42ue53lokKRJkaQyVUplaEBShjJFRCKJiFLGTBma
RJKSKYlMJTIn8xQyz5n97uu3rvO5/9if9ey19l5773WtzpPe5/m+2/c5vctp
SalUStYuldLctq7mX+e2Tj72yEclH7mrVLcUftbU02b52D8fm+Zjs3zU18ee
RvlYMx9r5aOBOVbLR8N8rJ6PNfKxl5Z1exontrf78iuVWuZjw3xslI998rF+
PjbIR9N8rJOPdfPRTLtePprk43/GmutjT2PzEWthDvLua+6N87GfdpN8XJmP
4/PRJx+t9PHOo3wP922Xj63zsU0+2uRji3xsmY8DtVvl44B8bG6srT72HJqP
HfKxYz7am2PbfBycj+3ysX0+DtGyrrU1Jtdh7tspH93kQe2PkBusOuVjl3zs
mo+OefEPzEebfHTM5zsb65KP3d3TwXzEupqDvN3NTS8cqeX9B3lf7nq09YDt
+fnobO5j5QGrnqXoCdj20sLkTHPx7t762NNXTvA/zhzN5AFXeuEEbQtZNTN2
ovtgO1Ae1P5UecDqJLnun4+TtdS4fyn6gNgp+tjTz3zEBpiDvKeZm144XQvP
HqXob958hj7eeYx1InZuKXjA6uxS9ARsz9HCZFAp+oDYYH3suVBO8D/PHIfn
4wJrTy8M1bLuLGtMrmHug+1l8qD2l3pvWA0vRa/D9hItd7+4FH1AbIQ+9lxk
PmIjzUHey81NL4zSwvObfCzMxzP5uEIfDL/Ox9PGrpEHrK4uRU/AdowWJneX
oud491h97LleTvAfZw44XytXeuE6LevGGyd2g/tge7s8qP2t8oDVBLnSvzdr
qfFNpegDYrfoY8+N5iN2mznIO9Hc9MIdWnheVYr+5s135WOI73zM93Dfe+QB
qyml6AnYTtXCZHIp+oDYNH3suV9O8J9uDjjfJ1d6YYaWdZOsMblmug+2D8uD
2j/kvWH1oFz5HJ2tHZ2PWaXoA2Jz9LHnAfMRm2sO8j5ibnrhUe049/WxRo9b
D9i+53nkfkoesJpfip6A7ZNamLyRj3t99wJ97HlOTvB/2hxwfkau9MKzWtYt
NE7seffB9hV5UPuX5QGrF+VK/y7RUuPF+bjT2Ev62POC+e7Ix1JzkPdVc9ML
r2nh+UQp+ps3v66Pd86zTsTekQeslpWiJ2D7thYmb5WiD4gt18eeD+UE/3fN
Qd3ft/b0wgda1r1pjcn1kftg+6U8qP3n3htWn5ai12H7mZa7f1KKPiC2Qh97
PjYfsS/MQd6V5qYXvtI+bS3od3r9W7nC88xy/jmdj4Pz8bM8YPV9KXoCtj9o
YVIpR8/x7p/yscg9v8sJ/r+YA86/yZVeWKVl3a/Gif3hPtiWy8GD2v8nD1j9
LVf69x8tNf7LPiD2rz72/Gk+YqVy5CBvUo7c9EJaDgvPbcpxJ+6blcPHO7cu
x3uIrVUOHrBavRw9Ads1ymFhslo5+oDYmuXwsWe9cnCC/9rlyAHndcrBlV5Y
txyWddVy1Jhc65djH2y3yL/+0dpvmn/9naw2Ksf3Er7PbFwOC+cNy9EHxDYp
h489G5QjH7HNypEDzluWIze9sJU9wfv/V477ctdty1EneLYqR17uslM5eMBq
+3L0BGx3KIeFSZ1yMIbDjuXwsWf3cnAitnM5csB513JwpRd2K4dl3S7liBOr
az54NipH3WFVvxws6dk9tNS1gRZW9dzHuj31wXavcnAlV0N9zPc2Nwwba6nN
duWoB29uog+2zcrBFf77loMTfPYpB1c4tNDCqrlribXUx5425WAPn/3MQd33
t/YwPCAfm7uuqedz9oHug+dh1h1Wh5SDE3zal+PPAGwP0vKmduX4M0DsYH3s
aWs+Yoeag7wdzA3DjlpY0XN83vCZ0kkfbDuXgyv8u8sMVkeUo1dg21ULq5PK
0XO8u5s+9vSQGfyPNAecj5YrDI/Rsu4o48R6ug+2feVB7fvIA1bHloMrdT1O
C9ve9gGx4/Wxp5f5iJ1gDvKeaG56oZ8Wnl2sAW/ur493Xux7uO/p8oDVgHL0
BGwHamFyqn1A7DR97DlbTvA/wxxwPkuu9MIgLetOyUdrc53jPtheKA9qf4H3
htV55eB6eD6GaGF7rn1A7Hx97BlsPmJDzUHeYeamFy7SHmk++oVeGW49YHuX
55H7cnnA6tJy9ARsR2phcnM5vufx7sv0secqOcF/lDngfKVc6YXRWtZdYZzY
1e6D7Q3yoPbXyQNW18iV/h2fj5Ot8dhy9AGxa/WxZ4z5iF1vDvLeaG564SYt
PEeUo7958wR9vPMS60TsDnnA6rZy9ARsb9fC5NZy9AGxifrYM1lO8L/THNT9
bmtPL0zSsu4Wa0yuKe6D7f3yoPb3eW9Y3VOOXoftdC13n1aOPiB2rz72TDUf
sRnmIO9Mc9MLD2jh2SLNP2PzsWE+ZumD4WwZw/YRecDqoXL0BGznamHyYjl6
jnc/rI898+UE/8fyMU7O8+RKLzyhZd3jxok96T7YPi8Pav+sPGD1tFzp34Va
avyUfUDsGX3sWWA+Ys+Zg7wvmJteWKSF58ZJ/neG3H6bj8X6eOenvof7vioP
WL1cjp6A7VItTF6yD4i9oo89b8kJ/q+ZA85vyJVeeFPLuiXWmFzL3AfbD+VB
7d/PxxxZvVMOrg/m410tbJfbB8Te08eet81H7ANzkPcjc9MLn+TjUd//uvfl
rp9ZD9hmSZxH7q/kAasvytETsP1SC5O/zcW7V+pjz/dygv/X5lgoD7jSC99p
WfeNcWI/uA+2v8uD2v8mD1j9LFf69xctNf7JPiD2qz72/Gg+YqvMQd4/zE0v
/KmF5+fl6G/e/Jc+3rnCOhFLkuABq//K0ROw5R9al8nkX/uAWDkJH3tWS4IT
/NMkclD3ShK1pxeqSVjW/WONybV6Evtgu34SPKj9ukncG1ZrJ9HrsP1fEpa7
r5VEHxBbJwkfe9bMv/7YHlkviRzk3SCJ3PTChklYeNJzfMbwmbJREj4YDs6/
7pCPjvnYMgkesNosiZ6A7eZJWJjUT6LnePcWSfjYs10SnOC/VRI54LxNElzp
hW2TsKzbOok4se2T2Afb3ZPgQe13TYIHrHZKgiv9u3MSlhrvmEQfENslCR97
dkgiH7HdkshB3jrmphfqauG5aRL9zZvr6eOdbZN4D/fdOwkesNoziZ6A7V75
WCMJJg2S6ANijfSxp3kSnODf2BxwbpoEV3qhmZZ1e1hjcu3jPtgekAQPar+/
94bVvklw5XN0P+0m+WiZRB8Qa6WPPS3MR6y1Ocjbxtz0woHardzHZwE1amc9
YNvf88h9WBI8YHVwEj0B20O0MDk2H01896H62NM5CU6724/kgHOnJLjSC4dr
WdfROLEu7oNtD3lQ+6PkAatuSXClf7trqXFX+4DYkfrYc4T5iB2Tj4bm7Wlu
eqGXFp4HJdHfvLm3Pt7Z3joRO1EesOqTRE/A9gQtTI63D4j11ceeU+QE/37m
oO4nWXt64WQt646zxuQ61X2wHSQPan+m94YV/6MUvQ7b07XcfaB9QOwMfewZ
YD5iZ5mDvGebm144RwtPvh/y9x3+rnOu/GD7Vz5ey8fr+bhQHrA6P4megO0F
Wphck0TP8e6h+tgzQk7wH2YOOF8sV3rhknwc7bqLjBO71H2wvUoe1P5KecDq
crnSv6O01Pgy+4DYFfrYM9J8xEabg7xXm5teGKOF5zv5mEWd8jFWH++c6nu4
7w3ygNW1SfQEbK/TwmS8fUDsen3suUVO8L/RHHCeIFd64WYt68ZZY3Ld6j7Y
TpIHtb8rH0NkNTGJ7yWwvUN7Xj5utw+I3amPPbeZj9jd5iDvZHPTC1O0vP8m
78tdp1kP2C7yPHLPlAes7kuiJ2A7QwuTp8zFu+/Xx545coL/A+YYJQ+40guz
taNlNcrYQ+6D7RPyoPaPywNWj8iV/n1US40fTqIPiD2mjz1zzUdsnjnIO9/c
9MKTWnjem0R/8+YF+njn9HwMN/a8PGD1TBI9AdtntTBZmEQfEHtOH3uWyAn+
L5iDui+29vTCi1rWPW2NyfWS+2D7ljyo/RveG1avJNHrsOXz4B7vvjSJPiD2
uj72vGw+Ym+ag7zLzE0vvK2FJz3H9w8+U5brgyH92MnYR/KA1ftJ9ARsP9DC
5Kckeo53f6iPPSvkBP+PzQHnT+VKL3ymZd0nxol97j7YficPav+NPGC1Uq70
71daavxlEn1A7Gt97PnCfMS+NQd5vzc3vfCDFp7vJdHfvPlHfbxzzTTew31/
lwesfk2iJ2D7mxYmvyTRB8RW6WPPv3KC/5/5eFXOf8uVXvhHy7qfrTG5/nMf
bFdLgwe1r6Rxb1glaXDlczRNw76bj3IafUAsS8PHHn6ggnzEqmnkIO/qaeSm
F9ZIw35srget0Vpp1AO29dI4j9zrp8EDVuuk0ROwXTcNC5Od0viex7vXS8PH
nk3S4AR//p1gpZw3SoMrvbBxGpZ1/DvCVzLfNI19sN02DR7Ufus0eMBqizS4
0r9bpmGp8eZp9AGxrdLwsWezNPIR2yaNHOTdLo3c9MIO+dd/yPN/afQ3b94x
DR/vXDuNOhGrkwYPWO2aRk/Adrc0LEx2SaMPiO2eho89DdLgBP+65qDu9a09
vbCHlnU7p1Fjcu3pPtg2S4MHtW+Sxr1h1SiNXoft3lruvlcafUCssT72NDQf
sabmIG9zc9ML+2jh2ama/10jH+3y0dJ/B4Ltfmlwhf8BafCAVSt9sN1fC5Nu
afQc726tjz3t0+AE/zbmgHPbNLjSC+20rDvQOLGD3AfbzmnwoPad5AGrw9Lg
Sv920FLjQ9PoA2Id9bHnkHxsb+xwc5C3i7nphSO08JyYj8H5ODcfXfXxzgG+
h/v2kAesjrInYHu0FiZH2gfEjtHHnuPkBP+e5oBzb7nSC8dqWdfdGpPrePfB
9mR5UPv+8oNV3zT+jQ+2J2r3zccJ9gGxfvrY08d8xE4yB3lPMTe9cKqW9/fy
vtx1oPWA7RjPI/fZ8oDVGWn0BGzPysfBMrnMXLx7kD72DJET/M8xRwd5wJVe
OE97uKw6GDvffbC9RB7U/mJ5wOpCudK/w7TUeGgafUDsIn3sucB8xIabg7wj
zE0vXKqF5+lp9DdvHqmPd55mnYhdJQ9YXZFGT8D2Si1MRqXRB8RG62PPODnB
/2pzUPex1p5euEbLusutMbnGuw+2t8iD2t/kvWF1fRq9DtsbtNz9ujT6gNiN
+thzrfmI3ZyPM817q7nphdu08Cxn+fe63C7Px+36YMgPEC5LIzZZHrC6K42e
gO3dWpg8nEbP8e5J+tgzXU7wn2IOOE+TK71wj5Z1U40Tu9d9sJ0tD2o/Sx6w
ul+u9O9MLTWeYR8Qe0Afe+4zH7EHzUHeOeamFx7SwvPONPqbN8/VxzuX+h7u
+4Q8YPVYGj0B28e1MHnUPiA2Tx97FsoJ/vPNAecFcqUXns7HBNc9Yo3J9Yz7
YLtEHtR+sfeG1fNy5XP0Be0d+XjOPiC2SB97njUfsRfNQd6XzE0vvKyd4r5z
rdEr1gO2P3oeud+SB6xeT6MnYPuGFiZf5uNJ3/2mPva8Kyf4LzMHnJfLlV54
R8u6t40Te899sP1MHtT+E3nA6kO50r8faanxB2n0AbGP9bHnffMR+9Qc5F1h
bnrhcy08X0ujv3nzF/p456vWidj38oDVN2n0BGy/1cLk6zT6gNh3+tjzi5zg
/4M5qPtP1p5e+FnLuq/y8ZS5fnUfbP+RB7X/y3vD6vc0eh22f2i5+6o0+oDY
n/rY85v5iP1tDvL+a2564T/tMmtBv9PrSRZc4Tky/7pnPnrlY7UseMAqy6In
YFvJwsJkiyx6jndXs/CxZ+0sOMF/9SxywHnNLLjSC2tlYVm3RhZxYv/LYh9s
N8mCB7XfKAsesFovC6707wb51yut8bpZ9AGxDbPwsWedLPIR2ziLHOTdNIvc
9MJmWVh47pXFnbjv5ln4eGfDLN5DbLsseMBq6yx6ArbbZGFhslUWfUBs2yx8
7Nk5C07w3z6LHHDeMQuu9MJOWVjWbZlFjcm1Sxb7YLtHFjyofb18pFmw2j2L
7yV8n6mjhfNuWfQBsbr62LNrFvmI1TcHeRuYm17YU8v7d8jivty1kXWCZ1fz
cpdmWfCAVeMsegK2TbQwaZUFYzg01cee/bLgRGyffKyfBeeWWXClF/bVsq6F
cWL7mw+eB2VRd1gdIEt6to2Wuh6ohVVr97GurT7Yts+CK7na6WN+sLlheIiW
2uxtPXjzofpg2yELrvDvIif4dMqCKxwO18Kqo2uJddbHniOzYA+fI8xB3btZ
exh217LuMM/n7KPcB8/jrDusessJPj2y+DMA255a3nRMFn8GiPXSx56jzUfs
WHOQt08+msvwBC2s6Dk+b/hM6asPtv3kCv9TZQark7LoFdierIXVhVn0HO8+
RR97zpAZ/AeYA86nyRWGp2tZN9A4sTPdB9sh8qD258oDVmfLlbqeo4XtIPuA
2GB97DnLfMTOMwd5zzc3vXCBFp79rQFvHqqPd17ve7jvCHnA6uIsegK2w7Uw
ucg+IHaJPvaMkhP8LzUHnC+TK71wuZZ1w6wxua7Mx/GyHS8Pan+N94bV1Vlw
PTEfY7Swvco+IDZWH3tGm4/YOHOQ91pz0wvXaQeYj36hV26wHrB92PPIfas8
YDUhi56A7c1amNyfxfc83n2LPvbcKSf432YOOE+UK71wh5Z1txsndpf7YDtd
HtR+mjxgNVmu9O8ULTWelEUfEJuqjz13m4/YPeYg773mphfu08Lzpiz6mzfP
0Mc7b7ROxB6SB6wezMcVsp2thckDWfQB/TJHH3sekxP855qDuj9i7emFR7Ws
m2mNyfW4+2C7UB7U/invDav5WfQ6bJ/UcvcnsugDYgv0sWee+Yg9bQ7yPmNu
euFZLTyf08LteS1sX9DCdol1h8lLWrgtzqI/4PyilnUvG4fnq/KG1WtaemGp
cdi+omXdh9aR/v1ISy3flCsM37aOMHknH7Pk9pZxevl1z6Ev3jUOzw/kzRlv
GCfve8Zh+76WdcvMx3kfexd4/mC9qNMK6w6Tz7Vw+zSL/oDzZ1rWfWEcnl/J
G1Zfa+mFL43DdqWWdausL/X7xLtwxndyheeP3mtRPn7Swup749z7G8+hL342
DsPfZMwZ3xon7y/G6YVftazbrZL/XSm3/LJfnXyU85Hk40/Zw/wfaw3Df7Ww
+ss4rP7Wsu4/49Q+rQRjGGaVsO953jJ7gfOW2wvrVaK+1G/9Sljqt1ol2NNf
a1aCJfVbqxIWVqtXIk7fVSpxDr2wdiXiMFy3Eow5o1qJOHn/V4k4vbBOJSzr
fpcVPb5BJe4C8+0rEfsjH5tUotYw3LQSFlYbVaInYLVxJSzrNqtEnB7cshKM
YbhVJSysNq9EnF7YohL2J897RTYbVuIunLFtJdjTXztUYh0Md5QlrLarRJx7
b12Jc+iFnSoRh+GulWAMw20qESfvzpWI0wu7VMKybo1K1Bsede0dmJ+ajwPy
0SYfDSpRaxjuqYVV/Ur0BKz20LKuoXFy710JxjBsrIXVXsbphUZa1rWuRH03
93ws9WtWCfb0V4tKsKR+LbWwam6cvmviOfTCvsZhuH8lGHNGU+Pk3c84vdBK
y7p9zLeBteAuMD/CP2/UrH0lag3Dg7SwaluJnoBVOy3rDjZODx5WCcYw7KCF
1SHG6YVDtaw7xvpSvwO9C2ccXgn2fB509V718tFNC6su+djde3f0HHqhu3EY
Hi1jzuhknLxHGqcXjtKybnQ++uTjBM+hd+iJXrKH+XHWGobHa2HV2zisjtU2
NV9za3+ijGHYT7uf5xGnF/pqWXeW9aV+g7TU72TZ018DZEn9BmphdYpx+q6/
59ALpxmH4Zky5oyTjJP3dOP0whla1vWQFT1+tneB+aXGeubjPGsNw/Pz0VlW
gyvRE7A6V8u6C4zTg8NkDMOLtLAaapxeuFDbzfMayeYc78IZl8ie/hrpOhhe
poXVCOPc+2LPoRcuNw7DK2UMw+HGyTvKOL1whZZ1fG/k7zj8PeYqucJzjOxh
Pl5+8BmrDz7XaOEw2Tfz1nH62HOj/OBzrTn4bLvePoD/DVrWXWec2E3ug+cd
MoDV7dYOPrdUoufotVu1cL65Er1C7DZ97JlgPmITzUHeu/IxRP53a+H8XT6e
zcdz+Zikj3fO8z3c9175wWeafQCfe7RwmFqJXiE2XR97HpAffO4zB715v30A
/5la1k2xxuSa5T54PioPav+w/GA1pxKfEbB9SHt1PmZXoleIzdXHngfNR+wR
c5D3MXPTC49ref8M78tdn7AesP3A88i9UB6wWlCJnoDtU1qYvGUu3v20Pva8
ICf4P2OOW+UBV3rhee1EWd1qbHE+7pTta/Kg9q/IA1YvyZX+fVlLjZdUog+I
LdXHnhfNR+xVc5D3dXPTC29o4flkJfqbN7+pj3fOt07E3pMHrJZXoidg+44W
Jm9Xog+IvauPPR/LCf7vm4O6f2jt6YWPtKxbZo3J9Yn7YPuVPKj9l94bVisq
0euw/VzL3T+rRB8Q+0Ifez41H7GV5iDv1+amF77RwvNbLdy+lys86Uc+h/gM
+sW6w+RXLdx+ysciOf+sZd1vxuH5h7xh9aeWXlhlHLa/a1lXrUYd6d/VqmGp
5T9yhSEiHstkUq6Ghdu/xunlvzyHvkiqEYdnpRq8OeNv4+RNqxGHbVYNy7r/
zMd5q1fjLvDctBqfTdRs7WrUHSb/q4aF25rV6A84r1UNy7p1qhGH5/rV4A2r
Daph6YV1qxGH7XrVsKzbthr1pX5rVOMunLFxNbjCc7Nq3OuHfLStBqctcrtJ
NeLce8NqnENfbOkaGG5TDcacsVE14uTdqhpxemHrathfPYN+4XNiu2rcC547
VIM9zHepBj/47FgNH3x2qoaFQ7NqvJm37lwNH3vqVoMffHatRg6Y7F6NPoB/
HS3rdqtGnFg998Fz72owgNVe1agdfBpUo+fotT21cN6jGr1CrKE+9tQ3H7FG
5iBvY3PDv4kWzk21vK2574P59tWoEzXatxq1huF+Wli1qEZPwKqllnWtjNOD
/HgQGil1SoUmDvPD8lj7avTCAdXQ00FjZR/PJy//GVvfPZQTPRV0VdDBQS8E
bRC0cPY0hiZOQ+c13RzmaOTs7Z6KOciLzk1jY+jdNHGOJk5T5/wsOD/v//8/
618K7RRi6OU0d45uzj7O0b9BEwX9E3Rz0FdBdwXtnH2d8060R9B/qenpEKtp
4rQphYbO/uZCy+aAUmisbGGc+Wb6WIdeTlv371QK/RO0UXYohSYKeibo0KCt
gsbKdqXQOWG+jb52pUJPh9jW+si7o/nItXMptFU4Y5dSaKowR8MDXQf0HdDQ
wb9rqdCOOUlOaKIcKVf0VbrKo7vzuvqOKBV6Ot1LhSZOTxkfbS44o61yjIx7
Oq9jji5y7e1+at2vFNoosOlbCn0MWB5fCo0VWPZx3lTfsaVCT4dYE3295Xqi
ueDZ3zNa+W7mDb3j0XI7xbqQC52OK+WAJsrpskRfZYAMTnNOjhGl0GVo59rT
SoUmztlyPdNc8Bwkn0OND5LxWa6D5WD3U2v0T4bJAU0U9EzoV7RVhljTC5zD
GS2Wc0uFng6xjvoGy3WYueB5sWfAb7jzNr711FKhp0PsAH2nyAFNlFGyvKwU
uiswuNx5T32Xlgo9nctLhSbO1XK90lzwvEoGfY0z72GOEbIc635qjf7JDd4X
7ZDrZIm+yjjveq3zk/RdUyr0dIj11zdWrjeYC543eQb8Jjiv/Q4nv+NX09Mh
VtO2+Fs2d5VCGwWW6KvcJoOJznkn2iOzS4WezsRSoYkzRa53mwuek0uhsXKh
8ckynuQ6WE5zP7VG/2SmHNBEmSFP9ESmW9P7nA/Xd0+p0NMhdrG+aXKdaS54
zvIM+D3o/Gzfemup0NN5sFRox7woBzRRHpUl+ipzZfCI86v1PVQq9HQeKRWa
OPPl+ri54Im2yjz5zXd+lTnmyHKB+6k1mijPe9/nSqFxAM+FpdBd4XP0GecT
9D1VKvR0iN2kb4FcnzcX7NFWWSS/F50Pcv8tcnvJupALfY9v5IAmymuyRF9l
qQxedc47V5RC16Omp/NqqdDEWSbXN8wFT7RV3pTfMuf36XtDlsvdT60/LoU2
ChzQRPlAnmirvGtN33f+oL53SoWeDrFZ+pbL9SNzwfMTz4Dfp86n+NaXS4We
DrHJ+l6SA5ooX8kSfZUvZLDS+Xx9n5cKPZ2VpUIT53u5fmMueH4ng+eMM3/C
HCtkib7Kj9Ya/ZM/vC/aIatkid7ML971N+cv6vu5VOjpEFus7ye5/mEueP7l
GfD72zmfWfOsDdzQUOFzB00Ffu+e37WHA5ooaKPAEl0WdFdggNYKc96JBgla
JDU9HWLwQSsFzRS4ortCLniir4L2CvyIM4cxPtbBEs0V9lNrdFHQQoEDuijo
mcATfRW0V6gpOifMYYwPfRbqzVpi9AQ+8sKVfOSCJ/oqnAE/dFaY1zQ+0ICo
6elsVC50ZNAbgQPaJ2igwBLNFbRXYIDWCnP4o8uCPktNT4dYTRMHHRW4oq1C
Lniir4L2CvyIM6eHyEGtYYnOyg7WGl2UOrJBPwR9DFiir4L2CmzRzWAOf3zo
s9T0dIjRE/h2lGsdc8Gznmdkvps5PccdtykXejp7mAudjk7lQh9nb1miudJQ
Bo2c17Rm2stsb2PwQS+luVybmAuezeSznvFmMm7qupqezj7WGl2UNrJBywRN
E3iir7KvNW3lfCN9LWW2v7EN9bWQaxtzwbOtZ8CvnfPVfeue1qi9sdX0NSgX
+jgdZInmyiEyOMz59voOllkHY/BBL6WLXDuZC56dZbC7cebbmeOgcqGnc4S1
RhelR7nQxzlalmiudPeuRzmvr6+b7zjaWD19XeXaw1zw7OUZ8OvtnO8b9Cs9
CLNjjfG95D8/j2r6OCfKEs2VPjLo67ymNXOefE40Bh/0Uk6Va39zwR59lZPl
d6pzGJ/kupqezgBrjS7K2eVCH+cseaKvcro1PdN5O32nWe+zjLXVN1CuZ5sL
noM9A37nOm/uW4+X7XnGuB/aJGPLhT7OMFmiuXKBDC503kXf+fIZZgw+6KWM
kOvF5oIn+irD5TfCeWdzDCkXejqXWmt0Ua4qF/o4V8oTfRW0V/gcvcJ5b32X
+bYrjfXSN1KuV5kLnmM8o5/vZt7M/cfJEh2Vcebi95xnlQt9nBtliebKdTK4
wXlNa+Ye+dxoDD7opdwq1wnmgif6KjfL71bnZ+qbUC70dG6z1uiiTC4X+jh3
yxN9lTus6V3Oz9U30XrfbWywvtvlOtlc8JzqGfCb5vxU33qtbO8xdoq+8eVC
H2emLNFcuU8G9zsfoe9e+cw0Bh/0UubIdZa54DlbBqONM7/EHNPLhZ7OQ9Ya
XZT55UIfZ54s0Vx51Ls+7hz+6LI87DvmGRujb65c55sLngs8A35POYfT087h
h4YK/z3G71Dxezf8Pg71Rv/k+XKhlfOCXNFfeVYezzuH32LXwQYNlSWyetk5
LF903d3GX7R+6JksLxf6Ne/IDH2VV6wfeiavlwutnDdk+5rralo8L8vvLdc9
YG60VKaab6ksl7lupvFlcnrdvPB7zztRIzRLvrbe6Kl8KCd0UD6WK/or78vj
Q+fw+9R1sEFDZYWsvnAOy89cN8/4Z9YLPRN0TuaY+z35oa+yUobfer+aVs63
cv7adTUtni9k9r3rFpkbLZUF5vtStj+47gXjzNE6QR8D3YyaHgpzGKOv8qs1
Rv/k93KhlfOHbFa5bqnxVdb6L9fBDA2Vf2Tzn3OY/O26N4z/bb3QM0HnpKZf
wxzm6Kugt0K90DNBU6WmlcOcPkNrhXU1LZ7/ZIaGCutgRm60VOgR8rEOtuiv
sA72xNFhqWkM/SzDdfy3V3zolqBnQo3RP0FXpaaVwxw26K+gwwID4sxhiIYK
62CGhgqaKLBBO4U57NFdYR3siTNfIpNf7LN1/XdgmKOvgt4KcXRCuF9NK4c5
b+C+rKtp8XAezNAaYR3M6AW0VOgR8rEOtuiusA72xJnzZwkO1B2GaKjQQ+iJ
oDnRT2bon+yeFFo5dWSD/squMiC+m7nquQ5maKjsIZs9nXNmfddVjNe3XuiZ
tEwK/Zp97Sf0VRpZL/RMmiSFVk5T+6yx62CPRktDmTV33YbmbmEPNXIdbPdx
3QbG97FXmpgXhq28EzVCt6SDzNA/OSAptHLayAb9lf1lcIBzGLZ1HczQUGkv
m4Odw76d67Yx3s56oWeCzsmm5uZOMEdfBb0VGHbyfjWtHOY7ed/DkkKL52CZ
dXZdXXOjpbKD+Q6RbRfX1THOHK0T9DHQzeBzYVfPhzE6K0daY/RPeiSFVk5P
2aC/crQMejhvbN5eMkND5TjZ9HEOk2Nd19T4sdYLPZOBSaFfc5rM0Vfpa73Q
M+mfFFo5zOmzfq6rafH0kdkprjvQ3GiptDDfCbI91XVtjDOvaQx1k+EZ3gkf
uiXDrDH6J4OSQivnbNmgv3KmDAY5h+Fg18EMPYvzZHO+c9if67pOxpnvIRPO
P8jcZ8gcfZWhxi/2frBBL2S4bxjmupoWz/kyG+E6mNELaKkcYb4LZHup63oa
Z36r3yP5nlnT07lcxuirXJEU+jhXy2O0Mep+lfOa1sxEmVxtDB7opYyX7Vhz
wRt9lWvkOt55f31jk0JP51prjy7KLUmhj4OmCb2FvsoNcr3J+UB911vfCcYG
6LtOlreYC963eQZcb3de0/hYKcuJxrgfuiIPJ4U+zmR5oLlyl3Wf5HyIvjtl
MtkYPNBLuVe2U80Fb/RV7pHrvc7PM8cdSaGnc5+1RhdlTlLo4zwoS/RVZsp2
lvPL9N0v4weNjdQ3Q65zzAXPuZ4xxnczp0enee+ans4j5kL3Y3lS6OPMlyWa
K4/L4AnnvBMNklflM98YfNBLWSjXBeaC59Pyudn40zJ+ynU1PZ1nrDW6KEuS
Qh9nsTzRV3nemi5yfru+56z3YmO36XtWrkvMBc+XPQN+S52P962PWaNXjI3T
92hS6OMskyWaK2/I4C3n9+p7XT7LjMEHvZT35LrcXPB8VwazjTOfbo7XkkJP
531rjS7KiqTQx/lUlmiufORdP3H+sL4Pfcenxubq+0CuK8wFzy88A35fOofT
SufwQ0OFP298P6EvR1lv9E++SwqtnO/liv7KN/L4zjn8fnQdbNBQ+VlWvzqH
5U+uW2z8J+uHngk6JzX9GuYwQ2dllfVDz+SvpNDKYU7vorXyR1Jo8fwqv39d
Bxty84MTL5vvN1n+5zrYEv9PTn+ZF37oq3AnaoRuCXom1Bv9E3RValo5zOGK
/go6LPAgzhx+aKiwDjZoqKClAiu0U5jDEt0V1sGWOHPqhZ4JOif0FLm5E/zQ
V0FvBYboqXC/mlYOczhzX9bVtHg4D2boq7AOZuRGS4X+IB/rYIvuCutgT5z5
Qvl/nRR6OtwPxuiroKkCD7RP0ECBB5orxKg7WivbpIXWDFokMEF/hRg80EtB
RwUG/LsAueCNvgraK3AlzhxW+HZMCz2dXWWDLkqDtNDHqW9voa9SR671nJf1
7W596xsr6dtNlg3MBe+GngHXvZyv6Zv2knFj30m/U5stZYb+SbO00MppLhv0
V5rIoJlzGLZwHczQUNlXNq2cw76l6zYy3tLeauI9ano6rewn9FVap4U+TltZ
tjHGXQ90vpXxA+XX3j2bmWN/+R1kDPboqxwsv0Od1zR0DvOOG/kmWHY0xs+S
8/PX/Bw2LNFc6SSDzs5rWjN900IH56i00NbpIteuznfX11l+6Kx0l+dRzuvr
6yY/9FWOkQ1aKMfLtqcxuPZyXtPmuF9urD0uLbR1esvyOOeN9fWS6wme0dAz
j04LvRj0ROo572rd+vl+WKK50l8GJzvfT18/GaCPcmZaaOucItcBzlvrO1mu
6KycJssznLew3ifIE32VQdYVLZTz5XqOMVgOdt7VdwyVAWuHpIW2zrlyHeK8
o77B8hvqGYd4Ju9p6x0Hyg99lYvch2bHRNkON0ZNL3Fe05q5Pi10cK5IC22d
EXId6fwYfZfID52Vy+V5hfPe+i6zRuirjLauaKGMt35XG4PfGOdoKvA79fzu
/cmuHZcW2jpj5TrOeT99Y+R3nWf08cwrrR01QP+kl/caac1u9P30BJorE6zp
Lc7hfZPrajo4d6WFts6tcr3d+SB9t8jvThkMcR/zAdb7OnmirzLJuqKFgk4K
PTLFGL0/1Xl32Q6TAWunp4W2zjS5Tnd+kb6p8pvhGRd4Ju9BrwINA+rO59pA
7whDtFVmyhbNlVnWdLbzmtbM82mhg/NYWmjrzJHrXOej9c2WHzorj8jzMedj
9T1sjdBXmWdd0UJ5xvrNNwa/J52P8o4PyIC1C+WKDspTcl3oHK4L3A+/5zzj
Ws98PC30YtATGeN8rlwX+X7Yormy2JoucX6nvkVpoYPzelpo67wk16XOJ+lb
Ij90Vl6V5+vOb7fez8kTfZU3rStaKOik8Pm7zBj83nY+13d8IAPWvpsW2jrL
5fqu8wf0vS2/DzzjPs/kPSM9b4b80Ff52H1ofaADAttPjVHTz5zXtGZ+Twsd
nG/SQltnhVy/cD5P32fyQ2flK3l+4/wpfSutEfoq31lXtFB+tX4/GIPfj845
B+0Q9ECWuPaXtNDW+UmuvzhfpO9H+a3yjGc981trRw34IWT67EvPgeufvh+2
aK78ZU3/cf6avj/TQgcHnZSats6/ciX3fzL51/3wQ/MCBvBkH/Ol1nuVPNFX
QW+FuqKFgk4KPYLmCjF6H+0Z5o/I9iMZsBa9kZq2DposcMXHnLX42A8/6soZ
9BBn8p5p1uIV+aGvwucRmgH8rj2/hw9bNFeIUVM0WjbOCq0Z9ElqOjjopNS0
ddBkgSvaKsxhgo/98ENrBR0WeLKPOTzxodVCjdBaQYOFuqKRgi4K9UN3hRj8
0FrZPit0XtADgQFr0VKpaeughwJXfMzhim8H+aG1whn0EGdukxV6MeSlzzhj
c7nW9f2wRXelnjXdw3mqr25W6OA0zgptnQZybei8qm8P+aG10kjGjZ2XrPdu
/jlBx6WptUYjBf0Qvn+ju4IOC99XWjjf3Nq0lgFr98sKbZ2Wct3P+Yb6Wsiv
tWes45m8Z03vuJf82lov9qP1caI90c4YNW3vHD7oonTMCh2cTnJFO+WgrNDZ
Odg+OMj98ENr5TAZd3S+o75DrVFn81JftFCOkhn6Kl1k09U5/x+5/Bw5Pxve
wLVHWu8u5qrp7NR0d7q5H4bHeMYe7utu/agB+ic7eK9DskJnp4d1RHOlt3U9
znljfb2yQgfnpKzQ1ukjm77Om+s7Xob9ZdDKff3l1MO70gvoq5xifdFCQSeF
Xh9gDJYDne/tXXrKgbVnZIW2zmmyOcN5W30DffMgz2jtmScb4zMGfY81vF/D
rNDZQYeFnkBz5VxZDnFe05q5Oit0cC7OCm2d8+U61HlnfUNkg87KMFld7Lyb
vgutEfoql1hXtFCutH6XGqMWI5139I6DZcDaK7JCW+cyuY5y3kvfSPld5RlH
e+bwrNCLQWekq/Ohch3r+2GL5so11nS88/76xmaFDs6ErNDWuVau1zs/Rd94
+aGzcqM8Jzjva72vkif6KrdYVzRR7pLZbcZgeLvzob5jkgxYe2dWaOtMlOud
zgfru11+kzzjLM/kPYd63iD5oa0yNSu0XZ6X7T3GqOl05zWtmflZoYPzYFZo
69wr1xnOL9E3XX7ossyUMftmyRPf/dYIbZU51hVNlMet31xj8HvYeQfffI4M
WPtYVmjrPCLXx5yP1few/J7wjNGeOTsr9G7QQxnpvWbIdYHvhy16LE9Z04XO
b9K3ICu0bxZnhbbOM1mhrfOsTJ5xP/wWyeBO9zG/3no/kRU6O0usK5ooaKPQ
Iy8bo/eXOh8m2ykyYO1rckXn45Ws0N95NSs0d5bK703PuNszec9U/+7D38uo
y1uuo07LnMMJ7ZP35Yw2yzvW9z3n1Bgdku+zQlvnPVmhqfKJjD80F9zQAvlI
lp84r+kBfZgVejqfWlN0Ub6WCXomK60lGi2fy/JL5zWNnhVZoa1DbJ6+z7JC
i+cruX3rGbD8zjmaHOg/oBPxnO/7zvuhPYJGCZzQPvlVzmiz/GR9f3Fe0+j5
MSu0dX6RFZoqf8p4lbnghjbL77L80/kL5vghK/R0/rLW6KKgiQEb9DHQWIEf
Gi3/ypNfHPwvKzR60GdBU4e1aPq8oe/vrNDiIRc80VzhDPjxbuZLveMquaG1
srq50P9ABwQOaJ+ggQJLtFnQYIEB2inMyYEOCXolNW0dYvBBUwXtFbiiu0Iu
eKKVAh/4EWde0wNiXU1Ph/3UGl0UNEzggJ4JGivwRKMFDRZqig4M85pGD/os
NW0dYvQEPvLWtHjIBU80VzgDfmizMK9pD6E7Q414HzF6HR/1ggPaJ2igwBJt
FjRYYIB2CvOaRg/6LDVtnZ3ljaZKPbmiy7Kr7OvKIDXOnB4ix/aVQk+nvrVG
F6WxbNDtaCRLNFr29K57Oa9p9DSoFNo6e9kTDcxb0+LZW/ZNPQN+zZzzPeMd
e3A9/5wRQ88CDYSbZYP2SStZos3SUgb7Oeed6JB0qRTaOvvJG02VA+Xa2lzw
RJvlAPkd6LymB9S6UujptLXW6KJ0kA16JmiswBONloOs6SHOaxo97SuFts4h
9kR789a0eA6TfSfPgN/hzmvaQ+jO7O77Ons/NEZOlgPaJ0fJEm2WbjI40nlN
o6drpdDWOVI+aKr0kusx5oIn2iw95NfLeV1zHFEp9HR6W2s0Uvp5X/QM+soT
jRY0WPgcPcF5TaPnuEqhrUOsqb5jK4UWz4nyPMkz9vfdzDdw/z5yO9W6kAsN
kNFyQAflDFmivzJQBqc7553oe4yoFNo6p8sH7ZRz5HqWueCJ1sog+Z3jvKYH
dFal0NMZbK3RSLlIDuiaXChPtFbOt6ZDnXfWN6RSaOsQoyfOM29Ni2eYPId7
BvwucV7THhog2xHG2ug7VQ7ooFwhS/RXLpPBKOc1jZ6RlUJbZ5R80E4ZI9fR
5oLn1TI40Tjznua4tFJo64y11mik3FgptHKulyX6K+O963XOT9Y3zndcb+wk
fdfI9UZzwXOCZ8DvZuc1PZ1bZIi+Cpoq6Cugs4AOBPwmGqPudzivac3MqRQ6
ONMqhbbOXbKc5HyIvjtlhs7KFBlOc36hvslyQl9luvVGC2WWDO8zRh1nOEc/
A02Gf2XD2gcqhbbO/bJ8wPlIfTNkNtszhnvmPZVCLwadkaHOJ8lyru+HH5or
D1v3R52P0Te3UujgLKgU2jqPyXKe83H6HpUZOivzZbjA+WjrPVuG6Ks8bV3R
RFksy2eMwfZZ55N8xxIZsHZRpdDWeU6uLzi/Td+z8lviGRM8k/dc7x2fkB/a
KkvdhzbId7J91Rg1fc15TWtmRaXQwVleKbR1Xpfrm86n63tNfuixLJPncuf3
63vLGqGt8q51RRPlE+v3vjH4feCc/257278nPurajyuFts6Hcv3Y+Vx9H8jv
M8940DPfsXbUAD2UGd7rTWv2he+HLXosX1rTr5w/qe+LSqF981Ol0Nb5ulJo
63wjk6/dD78fZLDIfT9WotdWeNeazs4v1hUtFHRS6JHfjNH7q5xPke3LMmDt
n3JFX+T3SqG/80el0NxZJb9/PONFz+Q919kH86zLv66DYUmNFThV1EOBc6IO
C/VN1WOhxpuqV1LT1iEGqzXVVIFxVU0VuK2uDgss11B7paYHxLqang77qemG
6pnAZH01VqjlOuqwwHJddVhqGj1otdS0dYjRH2ur5VLT4iEX3DZSewWWG6vB
UtMeohZw3kTdlqqaMujHwAk9HfRy4IzODjo81Bc9Heb8/x/x/32ETk9NW4cY
rNDKQUcHxnzeb6NmDNoxfA+A5Q5qydBPm6kJU9PW2dFao4NTt1po5aCdA0/0
dHaRJbo5zGGMb2ffxlpi9Ae+neRa11zwrO8ZFd9dv1ro6TSQMZo76Oh0zcfh
1dCngV8jY9R9b+eHWo8tqoX2TYtqoa3TuFpo6zSRZWP3wwyNm+b2RAvn6+lr
Vi10dtDdQVsDLZXDS8GwlbH2fk09+fsTn7l8Zh9SjfXorqAzg64OOiidc9uh
Glo72IOrEWPtgebfyDNb2nPNfAO9wXt/1Lbz6y657ViNM6nZQd6rvV9zv82c
b+p5nMuPrHV3727510dUo8+oazfvx6+U1O7a2jM6et9DXd/Wc2G2v8wO97yj
/Br/6rLd0xxdPJfcnT2LfNxjc8/s5l1Z390aHem5rOFnuPj5D37W43DP483/
B9BGDTo=
           "]],
          Annotation[#, "Charting`Private`Tag$66459#1"]& ]],
        Lighting->{{"Ambient", 
           RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, {
          "Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{0, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}},
     VertexNormals->CompressedData["
1:eJw0nHc8V18Yx6ko7VJZFYUSUUgROSqKFCqVVVq2ECINkpRKQyXZJSIaVoVw
sjKSvUf2nkXJiN95jvvrn16v9+u8nvOc5/l8vu6959y75rT1IaMZLCwsOuws
LDPJ/zZT8G8A/6b/30wN92m63TzDUvFJff7Jbu8BPL7RPdrAIxOzy/H3iDpa
KjoNpEya6vXj4mJnm33KZZgvZbkQ25i5YkhmenL4kV6cfT4/hz21Hss0K4Ry
kPGTfh2Fc7y7sERUH6eqXAsO/lm5z3/SXPFVju+yfNF2vIrvuTbXsg4ck/1b
QXOuheLsSbFOb/Fm/OMzMm0+0o3XTFbLnr9joah1PcAl1roWt5u/n1jc1Yvb
tT4ZivVYKOb77JHWKijGE70ydx4m92MeZ7uHH73NFS9fGtt/pTYVH4tqslTJ
HMDFy41TSzZbKgZUhUTjwFCkMrdISn90AL861RZ5b46loryOYPF5v1zkZ8LW
el5vAK8L37sv3cFScch/0WRVTAVyn/FQILynD39d1snDbmmhWPlDSoCFpRG5
7Ekrv/SxB/PxvovRs7BU/PlQedOkQiva2nB498PcTtwQr8/2gf2cYu1oXnP+
UAfi0+Dp2y/bhhcd1LYPW2KhKHh71pr8eT2o/sL45DHeJjz03k1R87aFYh/v
vMyLNn3oQVzj0Njyalxj/H2ye5eVopngGZ/hJQNo7F77rLYXBThlyYx7T5C5
Ym6n5FPrtgGkExX+0N43Hjtf+Nx/i8dSUTRz9xPgKusHNS/4xqOR1R8o7/ul
7gVxzDhTTUgclJjPSeP8+eadCPMK2/0VGl9ejdwX2dB5TTW0lkGeW+2Wcurw
NqGyeTMQ5FnD87cE1rU///ckWRdydd9C15U0YMIHdZinc/cwqQPif95J6yDq
FjYX6nY4UaqZ1A01fmSNg7qlJfwshDo/jtPYQOqMNgTcpHU+UNJlCX2Z27W2
i/QFrViQRftye7fr9lTSx5cqadKkj0hCsJP20chOeelV0vcjvC1mpO9Ie5E8
7bt/0+MzoJN/PNvciE5QptErqhPzGtN3oKuKed4/ia7Qvmu7qK5elcyZAh2q
FDvqEB2ivrWOVIfzEiqFQLcr9NlViG7RT0tOqtvARa5NoHPjKdeJvXItaOlx
FjXQ+coVH3PAF3wGu/yJL9DsldHUF47yUbPNiI9q5WbJEx+hwPQUQfCRu7Wj
EfgualfUDuI7NM7+sht8l8j4tD7qWVzOfWfFEMan8ufew/rxx9Ba6l+fr+JH
oS739f746T8YwOrCz0/y3MjEeRlqtF6P44WT+LT78RMO653Llcpw6GZeY+DN
W9TTszR7sdFPjb/Vn+rxAPv8E8CzJpwFEh904UxLQ+19Mi14XYyjAvCHnyPa
JNe148eSSR/2L+rAHvuC9YHL9D7+XLihGe+xPPPeXKsbi748dgp4zKKrO1nM
a7HW4BvjxS29OM4vnY4PWYeLA/OKcXypdqvEx35c0JVkAXzlxy+7lpWn4gzl
ebPfpgxg1aXz6LrE1iX+c/QNRQ+K72Z/+jWAtdNDzwA3KptkX+Odi44OhjoM
HB7Ajy6fOAQ87MjVrLVvK1CLqV6NTVsfXt7hQdf1oOXNBf3RBnTt9tz2xOge
rFMVYga8uyfBPU+2FcXdW15sntmJsxNLtIDf079aXNrfgXzzFbnapNtw5Jpb
e4EPOT1/IcHeg3T4xMfyVjThyYzHJ4HHF39bbGDeh5Lz+MOyFldj/31fNIGj
84e2uc4bQCUnl7V7+BdgEYeLqsDfbkk/UPRjAG1W2/xJ3Dsef9yZc4Dmo1qs
DjxyvqejhHc8+sDw9dLLJSHOcbsj6rf9C9BGJs65kY/sMO+TdNsyMi8KYOZd
YGX0BPJs3cez6NuKJsSSOZ3nuKxGOqwr1/G0CFkXSmbWVVipYwt1ED7S0Ujq
gL4zdWgJTlSFus02njVE6oYMmLo1e/H7QJ2/bxVuIXVGS5k6vzWeEShA+nI+
YcEV0hd0h+nLthqPiw6kjyfTb+aQPiItpo/vhWJmLid9N/dbNYv0He1m+n6h
dYQ1iOjk2phOPdEJymR0MlqNz4Ouvn9D+kRX6N3BXYeBP1c0KQcdyv1+EEh0
iKQYHa53ifwNuuXZofeK6BY5MrodeP91M+j8sdwHRaJztILReVjshe/gC33h
9O/EF+g344tS1tZ08JHL2IIFxEfoBeMjpwWPg8F34qF8A9w3MlEy47sbjE/l
T5hS/z5kfHpo9sQj8vuMy/89p/7dOaegAH6nJVP9Z8VeHsAbFY02H3TMxDtU
Vn8Fri2vdmfrzn78sG3zNUdp8vdXckYdcE7OrbvWKvbi4nRZkaNh9bhXRiQH
eMEeq135Ll24gr/k66ENLZjz36N8Ov530m4j7nZstzqhsp+lA48XaNHxrr05
pc6rm7GuTHQGm1I3NrijUA6864hcT49OLZaWchBcUtyL//Lm5wHf8rZ8iwcu
xr8t7P3nv+zH/zwbK4Hzz+gI/ZGWiucaCnm3vx7Ajne1q4Fzab22DfEMReyS
cWpE19jVJYGul0/1UfZm91zEf8u3zVxpAHPsXVwE3GaLw5IZwRVopHhpUFFJ
H3Y6UULzCbsrW27d1oBklN9fdQruwX2KA3TeJW4xqpIbW1Gt05bgifhOvCsy
m+Zp7OAX093QgdSLm03fr2vD/MKhZcA994476fzuRiYibsbC85vwaId7KfAn
pw64zdHpQ/tcAhvXs1bjq5LF34GjSKGvG/72ow83PWQcPQrw3VFOWv/vkge3
/s4jevWO7NXziMfFGio0fvnyi1uAW/QFvNT3iEffmhwo79aKwxBHZEg1iMRB
C3j6aoD/unXICeZ9Z+KwSIS1Gjkx8x47rHcO8rSIvHyJ5Il+MnnqibKFwLoi
vjtdIutCa5h1BewrlIE6ZDkHvyN1QDuYOlw7rxQOdfthOXyH1A39X7fFxx42
sZI6T4yuDyd1RpeYOs+Yt+w09IVNOK+b9AUNFPIUAmfZFj7rBenj003B++D3
6QrTx7c/Ey43kL7Pj27yIn1H9kzfx0fbzoJORKycnxCdoFFGJ8YXWrl7ia52
Kb7hJrpCHa+jqM4dKhu6QIeJ7TbxRIfoNKPDnpdRh0C3cg4ncolu0RSj25Vx
Wtqg8x5dtvdE52gho/NTDkc0wBdfUtjHjoTVo1bGF1Jnfj4GH9U0Hd1DfIR4
GR8VVtTOAd+ZjWRnazlmoq2M7wIYn7qe56X+lWd8Osve7QxcXwayGlL/Zi2T
/uhcm4rq1qpn/ybXkS2Vm69xnM7EJxPwW+Cy60XV09b046mt5485rC7DXv7F
dDy37LBXpkAvtpKq+Xf9Zj0OvBv7BfjLEbkqVaMurPxAzMB4eQtuceSg422d
HTosWNuxeqVN3MyudrxJuT0NeOBkcU34vGYseXHfpSShbuwquz8GePS8tgdX
FGrxuQzut7xxvThn1Uka5+bnhBHOt8W45lTUC0m3fsyxzzMauEU3S1LLi1Qc
0+26f8xjAG8wc6Dja+Q0wpQdQ5H30I+JN+TvsqCpZgJw31utn8PNc1HAra3q
vfwDeLhQ7hPwkBH75Cu3KlDoSVuRgrg+fGNwIgn4Ofa1ISqZDWjIKzD7y/Ue
HKnSS+sjEKH0YRtXK0K7spft9+/E7ZVRocB1l1rEcWV3oDehboYxi9twOrpG
510sUxSuVd2N2D4KRVuMNeInP7pp/kf84j+5y/WhTpFZgiIdVfjE6nbKj8sK
7v9T2Y+arrA3fzItwD1hU5+BD3HV3we9rnD548JqF495Nqyk8e0K2j2BP+Uw
3jXDLh79z91PJ6pAnNCCErUE0wL0WmxVCvBlNza9hXnT76zSJvOiN2b34oEH
HTP3hzxHv+IMkifyZ/KMth8JgXXJP15uS9aFvjDrMmI/9wLq4DL0TojUASVf
WxkH3FN4/kWoW2hCRimpG4pg6rbLWPYB1Dn7GLskqTNyY+o89GffCehLdvao
JukLsr0gQuOfHmwU3U36OHu45B/pI1rF9PGtZtP5VtL3KodPaqTvSJDpuy2v
s8gyohP5iDA/ohO01mKYzpsyY2Mq6GpOzfwQoiukOc+Qzjtg8WEQdCgVL2FB
dIgcGR3O1uIdAd2K8luEEt0icUa3y1ledoHOvx9mUSE6Rw2MzkdcZweDL3ow
ez7xBfJnfGGiJ6UNPkqwO7KG+AjdZHzkm+j1DXznpR21gvgOXed1eQf8IOPT
K8vaB9V3OCsmMz5dcWKRBVxvszQYUP++4JuK0yfX3ayRgpe3iA/gFZu4BNSV
M3GOb8AH4Iq1InNzf/fh4L18D3lZy7DZgbFY4L/rvNsSRnpwG3vkznP69XiB
WWk0cLOXuS1ySl3YYF2l/r3RZizRuPk9HS/QpK/ZRO4D6xq2eWe343M8HgnA
o7UWhx762YTHQ7hEnkx24TsvftP4CnzakynLarGQvPwFudu9WCN3CeVxf8Jy
VR8XY8vYHZujjpL7ch4WmuemBU02my+k4hN/DtVAPbbbu9Px71H9HhPdUGR9
6WgoXKewD7nGAM+7MW/goUouuuCGhV1/9ePLkeN0fEBCtVeAcQUKvL9Q18Gj
D5eWfqL5x/7TetPt3YAu8Jx966/Xg+MLFROBD3BfcGkfbUG/9uyqP+PYiV99
O0DXld5sLGQU2oGC/YdXD/9sxbbG7XTeB68DCtfGdiMl54VSYU2NOFJ9er2z
ent1Ghf2oY3HzLYXp1fhiFuV8cBfBwWJDEf2o+UHLqzQUSjAvpnnPgKfvT1v
CfndRiWHXHVEj8RjJfFt74APcgwtAj53qn2h2JF4tJPhgn2ZayFOZqnxBRIH
PWPiBLUv1IR5r/UkmZJ50f/zOvzpTIM899Xp7yV5orJvmZ+AL5m/Yzms69j+
pZvJupA9sy4pgb/mUIf5kRN9pA4olKnDyoYhZ6hb1o0rSaRuKJap2+vKo2eh
zud4g06ROqMKAy0aR/qc6wPoyxF2f1HSFxTRYkX1ee1I8Hcj0kflT2phpI+I
lenjJaOabZKk7zNUNCtJ39Hz5NO0nrKpW0ZAJyaBoRuITlA+oxNOnWMSqURX
FjyVZkRXaB+jq0LOV59Bhy12D7iIDpG351Kav2vEnXOgW52GznVEt8ic0e2l
LYJDoPPxKrO9ROdoPaPz1U1/B8EXOWUqK4gv0GzGFxWf9nKCjwwNy3WJj5C8
0z2av3nTXRfwHWuRUtw+5Uy0jnWU5nmG8ekRf/ZNhT1XFf0Yn96qiO+E5zUF
dfuIf91TfR2PXoDnBVZunvygY8G+eOu1qzPxbL9UR+AFP5Pnnkzpw+dFnLVs
akvxeL+2DfAmh4BdizPIr8z3O+3rhOqxtLscHa9Z8i7t3eIuXJyy+3hpeTO+
VOhoDzwwVWdiZUIb9jlroBQT0I7TCi/Tec0clNbeKWzC6IXji5DvXVhoa4wD
cLUF9l++NNXgq6fi65wP9+K1797TOPr78rUkbYvxxkrlr3dX9eN+3rCLwL9N
SDyplE/Flx626MDfU/+EKlvgWVaJX1ZIk/tOv8ZLcJ979ruJHXDj6qNp48tz
UVLfgoMKCf34ubzDeeCzeRo3WytUoCMH122q1erDHiv9LwF/3WorYqvXgD7Z
u/7gXd+DnSKN6PiFn4TL1MpakFy6VPMhtU7sf2cVzV83ZrFNk2MHcnmVa3Qj
rxXnJZ6leZbaDW5pcOlG/i7VW+vSGrG06QrKI08brRSt6kVBs40VpJ5UYVGL
LXS9ayvL5m0934983xyVN59ZgI/5jNH4p57e64Pry+8pAuVNEvH4lIIHHW8e
59UDPMpio1+zRDxa3XOe8rCGTDaIc2A8IZDEQUeYOHpW75fCvNvU7piReZGa
cgfty3HthyKQp+bD1eokT/SLO4P2fbl7pyGsqxPdvEjWhWL6OmgdPvgt/gJ1
eKLz7BepAwpk6qBz2GnyPKnbCP+XblI3xDey3Rp41UmrWVDnZ4vYZEmdUbnz
NdqvMx+VzkJflosVHCF9QYFMX5o6DI8uJ318uSPvMtwXn2L6iNb+PlhF+n5N
asZR+Hvtw/TdRcPYHXTC4vcqlegE9TA6ic3k7gJddZUtKiW6QisZXe2S4dwO
OpxYq+1FdIgqcjPpvGM7N85dRXQb2xAuRXSLDMquXAYe/iu7FHS+yjxYhegc
5TTtouva416kAb5w2X05gfgCvRmWofV8PJq4FHwkeGtiFfERUvW8R/MpW3dL
CHznqy7ye83qTDTlO+27PMannx1bJcC/XoxP13wXuT+8hPhdiZv69wdHhB88
j+RLl1xBfp/xUx0BgeCBDJz05KEP8JVfcj4GXuzD9eKb9956W4o3epfR8Ur+
qzwbyXVkPid/0dfGOrz2Y5k3cBvz3bKfKzpxU4TUxr2RzfiKUvQT4M2rLlS2
ubdhBVPrcDPTdjyzSjcIuPzCFgODV03Y7Jeq3JhXFz73NO0Z8NcXDwz6vqzB
ByZ3b2Nd2otnPNL1B67od+NsrVoxPnb6M3dPZR9mW636FHg1u2fV4O8U7Hth
MVxv4p5WIZrnZ4FnC8/MCkVa8X83us4bwH38qwKA3xcLGBuvzUHuM4wnZc73
Y3EVc1/ggiWtguwcFeiOfEQa54I+XGHfRscbnpb5PrykAW0/fiLpcGc3TnDV
DQYuuvePxvlXLaj7+IDKxiWduGv/EZpPxvu0BcE7O9B2lwZfW79W/CjNkY6/
sE31o9+ubvT79s1fq/wbMW9MK62DRr5bkpN3L5LRj7h2Qr8Ku+MXNJ+/XBoD
paL9SHp3/Shb6nfMV2cYCLyHpYjez6adyKzaxhKPY0UiKb8uWZsCfPW9F36y
LPHof7793aEuiDMy45cee+p3xMPEMeBWj4Z5Vx4RiCbzojC13bTOpdUrIyHP
FSdV2Vf7NyJxNltaz7qCsX9BZF21tu+iyLqQF7Mu+Wv7FKAOUeGR2qQO6It3
Nq2bu8aPEKiboZtSNqkbiitbROvz2cvvNxups8xR6zxSZ1TG1DmS66If9OWq
iMZM+L0RZfoiHJzhf4r00VawUxyew2lncNHx3+ZaPftJ+v67bZ0a3B90Mn3P
u9X7AHRydZntUqITxMroRGnBqtV+RFeqPkYbia7QmNe0riY6TtqBDtf7pG8g
OkTGjA69DzZ3gm6XhMn4EN2ihUd0Kf9Yf0oNdK5q3LGM6By18kfTPPOqbj4F
X3BZDIQTX6A1aRnUR16PbTD4SDLzCCfxERJmfNSHdXnBd576ZYlBAxkojvGd
EePT+hfB1L/ljE9/Rirbw77LPP0dk+Bf5ZCcPK2CYnTDwmwJXI9axY68K0vI
wGlZHyif3PjPP2h9H36rFOFs61iKnY+05ANXXdtyWnlbD1YYL2M386rDqwJ4
vwF/725w0PFRJ1Yxm9U85tCM9878XgA8rW5reeq+NnzlLs/yMtF2vLJ4LBe4
g7qZec2FJrwyN/ZDnHoXbgzTpfyyn6z1Gb0a3L2/KaY2swdXH1iaQ+P8nv3m
GG8xvsHVtLTdvQ9v5ivIBq7y5Jm678sUzMP24wncF79VEqVx3nTKWhl+f4n0
XrZ9h+fV620mKO8SfhT+2icHrXxzJwr+jq+Sv0fzf6a8LcUhvxzN9dkmo5DS
i0c/SVB+/UtnzMPkH+hL3ejhk0HdODMpntbnwo/Cf9Y2LUhA9s7h2YUd2HWD
Mh3PlaPvEc/agR7lmb8pOdWKrUvO07q5PtmUZTXWhYYXWjtdOteIG4J0aRyf
2dbN3Xt6kdv1S6HnuKuwUdH0vAoFcxeA/g53Hlulavkdl+8eo+u92nLPA57L
/LwjWIpy4/AIdw8dLzHx8SbwobnnbivlxqH/+VyH2+wQ55HH6BUSB/U7Laf5
HLj0swrmrfdKLiXzogM+N2j8WwfuJEKeoirnPEmeyOC+LK2/XJDpRVjXVJJF
KlkXsmTWNVIq1gN1WLxY/gypAyreiOl4t3sBt6Fup4ZnnSR1Q3+uKFFudorn
AdSZW/XPDlJn9Iep853x9F3Ql89F76Ph7yYf05d77h7CJ0gf+X8mFsDz5FUN
o7SPJ34MzvEjfR89OOkF97lRTN/FlxdWgE583vvOJzpBW0b16bye9yefgq6O
d9SHE10h36io6frIXXQBHT7GGa+IDpHSWADlBWayLaDbz4/DZhPdIh5Gt3k9
nGdA54FCud+IzlHyIjnK2ZZdsQJfGIxvrTX1qkNdL8Vpf0tc2MLAR5X4rirx
EXJifPS65dVy8J0Kp/8e4jv0mfGdbNS0T8VWZ70uV72qqMT4tDWgeQnsQ2k4
sFH/bhQv+qemXIb4xxfQ6/OWiuU/qp0y8KDqgUngrq1thjfyevGP+GfGqnKl
uGCJ9wRwH81gSf3Gblzn6ucosbUOb7geQOP4dZRaTu3uxEM4MHemQjNuSltE
43xmZbv8hb0Nb4keWze3tQ03fLlIxxcm3rbmVmzCF15p7+0d68TptXfHgP/Y
5PtInr0Gd5yfoSdh2YP5up7TeQN7krsTW4rwbd/QDKjHU/E5NH6evMf6IeUU
XPlB3ASeE8gI6ND4E9yp6wTvv0QyrQXf4Pn9DMP6KeDnNYXWrVHLQVO9fNxw
XaMaL0K5ZkS9UM3NcvQ2+HHshVO9OPSbCY1TGh2mYab3A4VFHz1pqNaN794Q
oVz1Mru6gVQL+hydfWvqegf266ihPPD5UXOFhHb0sHClYLJAK751KYXy8Uxr
PafwLiRz3xXPkmvEB/1mUt6YlLYlqLcHra6wsLv8rRI/Y5NjgX3CXcNjxeR3
G33s4g88tPA71v7rS9drsGL1i607+5FGQ4/b4jtxOO/nD8qLRzWCgc+Tkty2
5E4cymV4w4md+RDn/dE5YyQOOsTESZs8Kwbz/tuhG0LmRaM3E2mdC/Y4aEKe
Ym3OxSRPdM9gnPblgrC2AaxrxC1UmqwLBbS0Uh78S1sW6qD6e64PqQN6xtSh
flmQENTNfkeFBakbcne2o+vi+zf0t5rUef/hjiRSZxTC1FldpzhLgPTlqSP7
KtIXpML0ZenEwdA1pI8m83PySR/R5InpPn6ONWmGvt8PPHaW9J3ch0/3/Y3M
n+VJRCdV80+nEJ2gJ4xOTLeaY9CVznCKBtEV6tJaTPMR3px+A3Q4b1fANqJD
dKO5nMZ/1nrpNuj25dgKHqJbVM/oNrP/12XQubiu8weic1TP6JyjK1IBfCG7
m1ud+AKNGo3R+HuLTEzBR7qGL6SJj1A246NNO/K5wHds9fGmxHdo1iF7Gkc8
cNqnh/hfduiMXFEUZnxqnM8nAucSWvbOoP712KRcAfvo27oLj8Lzmjedj9/l
SGVgw/GMcuBa6VnhoOOdSm4Va4dK8B2R6fHhicXz1Zy7sdSHdPYdhbUYxfpT
vtHmMLd9Twd+uXWH0aXRJrzIa2cZ8FYJ/dmzk1qxpqk22vCkDQfqxFHu5bzl
sfhUIy4Wq3bICu7Eh0Sv0Dip1cF6KuHV2G+n4eSqOT3YM0qhEnh+cPp37ldF
eO7Y2YPw95H/oCEdv2ie8ivhmmS8lf+8LDw3tl3QTMe7jxuVZu95icacJhth
P1ei+ArlKXLLVrkNZqP7K7Ak3OdK/i2n3H65ye4DsuXI8wOndvsouc/d6U95
3QVto/CeelTqJCJq39WF2RvnVAEPVJL8p9nbjJp90uy2iHfgPbH1dF3sfl+2
HDFqRzvP6s7aV9mCA1/WUp5/RqOzTq0LXero4gkbb8D6qxso75Gy3Jx4swe9
7htvCrevxBZ3VOi6Jt2GiuH68jQXu+P+0HwcyRNC8/nyuyoC9l2SxUc3Zu6K
wwJtCXT87oNL6X6MORqpIxzxMzzSlz8f4kRW+ZaTOCiCiZPM93gdzNtnsHVx
hH0lMmfmzbgbUwd5/t0ZqkjyRHpMntUb7YVhXT6u/cvIutD3rztpnEcT1d1Q
h/QztddJHdBXDj06vqXIUp7WrW1wK6kbyitpp3zO5BQP1Dm98bIBqTNKcZuu
G0fvWMJ10he2oZqtcF8swfSF/86JW19JH/1WlzXBfnGZsAvlcasfmawjfTc9
uGUrPMd+k6BA4zx3KxsHnczsTNgHf995GZ3wH+H2AF1F3fAeIrpCtxld6Ts9
fA06tPN5bkJ0iBI5H1L9Cz1s4wLdSsmf30R0i54xul15QHk96Dz/znktonOk
OCxM4yyTDuQGX0TbF1UrFNYiOcYXf02Eo8FHgnVzwoiPkLx7DI1/ytNKH3xn
ZPpgB/EdMq4MojyO8emKioEzhtpXFF0ZnwrfXBp/0aYP35adT/x7I3W5dLUi
nLs5k6Ci1LiwD5tfbXyX2pKOlSLmIuB+ud84ye8z/rDnVv/qsBJstUGMcpk3
vO+2LunG/g9mWGGDWmx38dRO4Gr4Fs+YRwe+3Sp06NL7JvxVJ5jGP6/jrRN7
thVLX/G/cUi+DR/44KwEXIrNZlQ6sRGLvlJbabS9E5stUaLxtV/FSEXsqMZ5
g/kby55144fLZClP0tg3cO9UEc7KnNdBrvuwin8ejXP8aszu42eScV7dg2h3
uT7smVaxAzhffskHi5EQ9PYqO4uBeR/e6OtP4wyKLVIevpeNdmzfxyFa1Ytt
Hf3p+PM8Ex8GG8uQ+4eLfETXOJrjtQLwvXouAxdt6hHHm4u3vjp34We5WnTe
I3L1oqZBzcjE7NeH3O/tOP3lKhrH032p9hqOdmSnta3Az70FuyVm0zpIOpju
/9LUiaKr+Pv/OjbgS9EzKU/OjRM0Xt6D8NSBsRXLKnH4uy80z4zTT+Pg/vRx
e0fCKYl8XJx5mI7X5A52gH3b45LjpheHYvEFhyTKU5rz7YE/95VY7TQUiwaf
x1D+6EnzW4gjdd92+WmJfFTExMm7s4IX5p0VKCrCtawShdxbRud167u4E/K0
Wfxx8ahjA7rI5Cm8Z1gZ1jVS7PmDrAtZrF1I+35epIYL6mB8WiiT1AGVn/tJ
+dWitzlQNznXoMekbuiz7xVaz+Mv+e5Bne/1X10Lvx+H0A86bzXL7L4h0pdN
Bp8XwHM1a6YvcvdUFMxJH6P6RqGPSJTpY76h6U/o+/5vknQfrDREkc5rqjy6
6j7RiXGNeCPcH9zNUaZ8+fB9fdDVvhFeQaIr5MnoSt3qwoItRIe+5Y4LiQ7R
GUaHW15tNQPdauwLsSe6RaqMbmPVj4iCzgMf5cgTnaM0Ruf7bncngi/cHubs
Jr5Av3KPUS5T1r8SfOTuLZZMfISaOLvlgTcqrlMG3xU622kS3yE5xnemjE/N
/tVT/y5kfNq5bE8tnEd0G/L7NzXllpqwwGZ+nHUtCkmJ3wf7NHaK1wvqPNPx
vbjNlLN5xYrA9auh67cFxzVLsOqVnHnAC+IWGh707cLz93YptP2owWq3liwA
vn3bS52klR348QYnlbUnmvCMzZU0TsnjmB9t7K14d9nLmsjqVuzWmE250770
SFXLRjwzQfrQ77wOfM6qn8ZR3GYx+CC3Cvs7i/C5rO7G/WE6dLzdKqlMmRVF
uP6e0yu4L+4/+5LyouDf2741fsZHg1qewH6x2Z8pDuCijyQUNj0PQZLC/3bD
Oa4Ekds0fo0YT0Dgmmw0meGRCM+3dbbemAvc1jwio/NaGTqw9UI1/N033dBN
46x9Nsq5pKsOCdmfybjO0YUXlUzQ8TriceJZqs3ozSqNnvaz7fhMnieNv7bU
Y3H2yzZUlZ96rkisBXuu+UfjfLh5O13Dmvy+cwm8lO/4gXnXXKXjF/bWrQQ9
bdq8pnLwdQV2SnpO1zWwx5YfnrMsXbL5UMabb/h2Ty2t/3bvnllw/mCRbZSY
RkAszt5UROOsL/49E3iPqkoF4eivSCDN87V+Mw/E8Tpi/4bEQXeYOB3qbpww
b95etpk/X1egi8y85+45fII8Q3Z655A80e2HmMa5/6CaFdZlXmF3lawLsdqa
0/ELzhbwQR3Ghd+PkTqg0SIOGv/0DO2+xaRunHH3vpO6oeNS/guBWwg2B0Cd
/9yd2wh/B9PUftE4D73ad0FfDsjsTYHnwydm1tJ1iStPlIqTPjqcbVOGc1Px
TB+9nhwog76zibg+gv3clRfn0zy5mo1/gk44r/cFw31uD6OT2sVveR4SXe2O
PLGE6Ap1M7qaulKeCjq8esZbmegQfS3jpfEvrWLpBd1qFdR+J7pFVxjdtpwL
MQGdi/HckCQ6R5ObpnWex7nSHHxh4sK+lPgCXTQpoXG6nmduBh+t0HtbZ6BZ
goq61Ol4bcNuDfCdske7MfEdcmd8J7R82qfm1843GMVcVoxlfCqzfk41nM8M
Fcqj/h1fuuQ4nNP8pLZ/BPatpPt8FuyVSMfl5WGUH1g4uR2u58s7/5Wz/CrG
TZ+rTwAXOM7ak7eiC9//OPyu+UgNVni/gI4vU/6Y2fSqHddeurXgCVsTNrqh
Tse3FpS75zxvwWbsuFzPuhVHt88yAN6cpO17l7sRp65cezL0YAeevewijVOv
o5O7Ub0Kt0+JPYV6JMp9NQRu62a70dCjEIe1FnjBc4LTjzfROF1Plj0KO/QZ
G7Dc+gT75xWWl2mc5rQdDVt3hiDLoZY6ONcWu4mXcu9vYavfRH1FJRX2evC8
/4e9Cc1TXihE4zh3GTp8a+NauA7alN6hB/yg4ZclEUfq0DGtpnvVtztx1N0z
dN6tY25P7vQ0IaecRa8+/WrDAbv2Ud462eNqI9OGkrXENizOa8aSuhGUD7/e
V/TpVwf6XCB3/LXaD5wy3KoPXGH9nQryu41qvN09T22twBdYk2k+6+12vmu8
3oMEmq/yhfN/w7WB36brfPb9qbWKvcjw5L9Qsx2xmLXiCY0/J4nPEPiFmEFt
8x2xyHMqmNYNRfZGQBxXXZnzJA66fHqMxlnAylUA80p//PWJzIv21PXSfKQV
7mRCnpK9tS4kT3T1pRPNx0LK0A7W5ZHqI0fWhTYx68qsrrsOddh92yme1AH5
M3U4WZXSE07qdnVPzTNSNxTB1C3FRXU91FkyoFyE1BlZR6TTfLK67+ZEkb7I
OgUYkr4gv7CHNB97bjMfGdLHe1Wf6kkf0RJZbjq+etcdrVek73p/Q+JJ31Ex
03ePzhtuoJODWdfuEp2g44xO0ri+DYOucttqPImu0DlbA8pffFJ/BzoM8Hx9
kOgQsTE6NBhZ9wR0+9dnMpvoFkUxuj2u0FYKOuf7cWj0MVsTOsPovLDi2DD4
YtlJw7vEF0iG8YWK9P3d4CO/3c7hxEdolvIwXZfA0+px8B1yuh+4RyIdFTG+
s2N8GjhjtoHlwsuKw4xPNW+2N8D5e4N41wnw79/9zxfC+XJ/1fr3cC5BOVMz
UCgnDQcuu7gA+E9BLR14XoN7pedL3ivGE2pTdHzSM31n0DH7HvH4wbRqfCr9
JOXSsp/UX6xvx4El2ZbDYY24oa2a8t2ipok3pFrwj4b9XvcnWnCqkx3lU+xD
POhKAzb9ExgcWtCOjZNSKBdYpKYUl16J4wMLO+Dv3eC9F5R/jOOq3V5ZQPyc
YwPPgZM+BiwC/vtpe/z6xCR8S6atCs5HKUeLUb5983yJyJoXKLFAeQDOLR80
SaD86qqJr1obv6I06/EW2M/VyQ2g8edknP3sFF6KWjbdlYD7XF1FFsq9Fndx
Xf5Yi8wzfTqnpjqwZ7gb5csiP3I23GxCVYba+y0c27CIMxet2wnv5gvqqa3o
1DXjZ9dPNuOv6Asdn/VnUGKTZQe6bDh11S24Hl8+4Ujzqd4iGwzXlxx/Pi/z
TSzHH74r0PFXq67lw77LrU2NL/beysMaSROUz7WaoOcR7yXzb/9VEYMfnhKg
cTbai1FeV/K3jnDk1RhL8yl7tTQH4lhHnfhD4iCOF+8oT+z95w3z+sjIITIv
Ohx1g8YvEbcXgjwP7sx5QfJEAed3Ut4meM4U1iX0+GYEWRdy//qWxjH4cGIm
1KE5YEqH1AENm0xRfgkl/bpE6vYv4PAQqRv6v24fKlY9gTrPmmKVgfviy/zP
aP6xozPMoC8D9smdsF8cwP+ejn+lfzIvgvTxtt+GQThHff9wIh1/JwAdFyF9
Z+U+VgHnu3Yxfd+anC0nT3SyOeSLOTz3DnSZrqcpDjECXbVzDv2A64F+Rle2
roa7QIf+J095ER2ii03CNE5mzPavoNsoJZEbRLfIYeAy5TNCLfRB5xEdC44R
naNnmz5SbvZzgwf44t7piLvEF2itXRjl5WJf6HPPVZnh1ZvvFaMxxkf5Xevi
wHe/f3LIEt+h4+zNlD9ifFqv+brC1uKS4m/GpxkaRfPy5/Xglf3XiX+vp750
cxOA90vEC4xj18Z2Y0HR1/+C9dLwDL87/MBP2gpvdQrvwjwWXDe41hTjbM4Z
a4Br28iFkd9nvDduIna/YDVepHydxrE8wZcnHtyGU0oer7BAjbjx31sa54Iz
j6JqcjM+5MyWfsG1BYs79dDxV1jU1mgn/cBN+Wsvb9xFfs/0L1BuoDPwW39z
JVYKcv5GruOwcGIwjXN/VpaSKk8BNmlSy7Qa68IHFb5QPmvmPW6vZUl4+6Iz
flrV3Zjl6QCNY1U643Sc5Qtkki3jKcHeg589iqfj56iMnf7yMgvx9w/zNbh0
408pM+l4V6ddg5YSpSh7V973OrUu/GBJ83R9bvsp588j17nDopxE1/ifwTR3
t9C73Ev+t76+fInMUCs+fZqdcm2pm6a3FVvR8NTSR4cHmjC3FQflu1lNcG9t
O7oz/iOBXFdiyZt+NB8XwZg9cL9Z17pf6Zt0Oa4fm0Xr3Fbz/jXsw9abjkq3
tuRiVbMSGmfHIxMTOJ8s59Rrs9QsBt9QSqb8uEGIMfBHB4SXcJrFoPUxxjT+
1UPGYXTf+araLRIH3Y91p7xng60izOtxfNyczIu+JOVSnhzUEQ95biiUq4br
32buP5RP5a0ygHWJWCx7TtaF/l/X+7mnLaAO8l78q0kd0CmmDm8juFdD3fqL
mlfD70Gz8iLKoyWKc6DOo69WVcBzMv3IFzR+QrzqIujLItvtAnB+5CPTF4GC
OslY0sctLaPQR/SU6eP6V/kp0HfTiUYfOO856T3dd+XDmY9AJ2sEXVNgH+zF
SQ5aT8OL3rwGRFcn/g2lwf2BsmY5Hc/WZKUKOhyfCj5HdIi4GR2mHRXSAN3+
LgqIJbpFYoxuNZxnVoPOM1YHshKdI45BTHnscMR78AWHiexd4gu0gPGFl03y
DvDRkZyvR4iPkM0RWZpP/XPtD+C7n/rJz4nvUGF5HR3Pojnt00vd+YeccpwU
nzM+rfJ4uh3e0zNPkqf+dU84JPpUvBmdXcb36/FkFxYcdHzb3vYFnxwZ2QD8
0MDaBbCv89Rjxbqmt0W4sWEP5QEW8avhevfr0vN3ZC9V4bjSs2LApQLV2vCC
Npxu0iuvEkp+zyzS6fgnOfO2Kis24/WyI067J5ux3oE2Oq/wm8Jvr3rqsZv8
iLLDmzYsG3CUctbTK2LOPKnAV34kqMB98fFVFTSOq8CdVRUa37HEaHQA7BcP
z2On49neeoivM0rEjtyLjsA56ksKRpSrb+a4f23kOXqmtMYF3m+yNDlI+fbg
sgTppVmIy0nTBs59hUp10PgnWa6Lmr0tQT6GYirwPHyX/GY6Pi5I4jxcD5m8
FrWG6wTrJysp7+zbGdQQ3ojsBZuq1Y1bsXe0L+WOc0aNDD+2IMnD7EtjHZrw
B5UZlEd5WBuBPp6482QFrKvDV95EUN5mYMMCz00E+oKfbworww96r1Ge8Mpt
GZwnyNXIefdFJhd7vG2ledp8fPMMztkrBrEMjAxF4+Zl0rT+axp6fICv3fvp
wd+haMTB/ouOX1lWuxDirDcLmCBxUIU6Lx1vKXdu5CyZ9/qc/jwyL7rPzCv1
8rw+5Kl1La6V5IkuM3lKpe/UhXXtyjopQNaF/l+X9Y8JT6jDm5KxDlIH9ISp
Qw7XRnWo271gwUvwd82KqdvxiD0zoc4xvLb74XmvYpYp5dET5ubQF8F/mvZw
DiqE6Utj9dfDLqSP+5p6oI/IguljwmbHb9D3SLvXh+DcshPTd0erSivQSUvh
96ewnzvE6ITHClWCrozWRinAfa4eo6tb/vt+gQ5bbt+VJTpExzdqUV7tWbwL
dMvuFXuO6BYdY3Q7MdX3E3Se0TzBRXSOonTTKFeWfrYBfMHvKnuW+AL9ddxH
+e4L+zjBRxlX+yYa3xYhv9pdlJ/zWPYbfDeIuTWJ79CbBCnaF+7b0z6NTiso
cBF2UnRlfMoSG/kH3lu8FFtF/Ouaus9apxHeX+R5KTYF5znHVOtWbjD/gkv8
hZqAu6i1OcM+l9t1n7IU6SJ8ceow5ZY6mQVw/f9Hzt9+7Gsl/pCzlnKxmwqT
j+1aMfp3rORh8g/swGpG4x8Iu9X3JqEJy746t0PCrhnPqFjeAHz3KG+P5+J6
/OmovcgXUo87RTNonID8fdvmDZRjw5vOT+E5wdmlQjQO541tT2Qv5uOajhYP
2D+PlPSjPGbh0KdNUQlYNfQku5pRF+Zdp0y5Tsyj1bsuP0dHnnKqwPteHv9O
Uu4VJCjf4ZiJBkXFWuEc3PubI9N8oHnipVAJkvK/KAP7AwnnymieVT5PRDm8
q9F+aU1juG56p7GIjv8l4Yc6xRtRkPkiie6iFrz7iuh0nsusRtnWtSARxdHN
RX8acVBmBo3zSDF1nPxuI97Rr0YXdWpxs9ULOr5Iqn/fmEcH2l9nYcW6sAzv
Koqn47d4sRp9ruhE58aVDwpfzcEz+F/S8dLt2yzzXboQ90/DM6WO0VhSUITy
+j0p5sCveQ/+Jhz9z0/5zD0Fcezs3weTOEhxzw0av0G7cCfM+27mnKdkXmQe
f4eOX3TryE/I80J+7E2SJ2pi8pzqmNED60riN0FkXWhF4Vnar9H51zdDHe6G
csmTOiD+UGsav37o1Wyo2/YboTakbmiRXRbllVlslVBnm8xf8qTOaGhvPI2f
ce5ETzvpS5glXxfpC4paXEHHz4h706JE+hi7qQH6iKTQdB8/ljVqbyZ9v3Bz
fCbpO3ruq0p5UOj9ZtDJ/UThG0QnqKDRjMbpxR8MQVchM+I8ia7QFaMzdPyQ
t/zSe0SHuqOIj+gQze14R/mVmIC/oFuXs0OSRLdowdVmGuc7K5r/hOi89MTx
93A+RaH0CuVydlrV4Itr/8z2E1+gWMYX6yzf3gIfCbuIhxEfIdkseRp/o0Ln
zO3Edz25QSki5l9QGgsr5XKMTzOr09RvXr+ouIfxaYp/kya8Z65rajU+NXUt
tcKulR/eu269NtUE5+8X/rx7TKYQ402PvlH+/vR9dziX8OFvks4Xo0I8XPOZ
8u3Wwf7wvMYkw6S0jqMSr3thQHlcqAgf6JjtRCI3T0495sa6lDu58dYkijXh
pffZv1o3NuE2DgnKM57fdTq1oQ6zLz7MsZ/8/QpavEoA+PifYmkfpXL85aHA
ko6z7VjzKyvlNnwvPuR4f8M6ZS9s4LyT77X1lH+P0Jg93v4Jf8reIgLvAU2J
D9P4d3f7ix4bDEarlj+qg/dzez6o0PFP+f2Hecsz0Oznyj1wbnm3BAvlrwp+
Sh19UowcXeMuwn5ukco1ykOFPF0f5lahl/quGnCfq5saRuPbHjPjgHPRXJfn
LNSQbsEVm+Io/xvOuTDxXjOSZk9ib7FuxOunlGgcfnv+jXB9qRGqKjnqXIO/
/o6k42Ndfb7DvkvJ+qXmLlaleF3FWsqz3kwcg/OIFp2z808kZWPZCEsaJ/Cx
91t4Ty/Zy9skuus9VhmYoOOtTVa+Ad7r4nM3pus9Uma4mmb3YYiT6iGz0jAp
G/mJnqX8dMw7ut8zJ6zoAZkX1Zyfrr+Kf+8ayFOT685Bkif6P0/0xo4V1jUk
PraMrAuJMOsSuhLYBeecyxYJ85I6oBjJm5QrKL47BXU7dCz+GNwX6zB1832u
tAjq7HT/6DXYL77m5TpdT7myEOjLUrsrA3COesaDX5SvLrzQoU36uPDb/np4
v7iL6eMB86oA6PtKgSFheO9JhXOQjpccCJsCneg+lrGA82Bz7LbT8QbrwnVA
VzkOZ+YQXaEDjK4ujTg9Bx2mVaZNwPXDRKMCjZMsndkGun2qO5xIdIveukzn
o3vDaj3o/GPB5hHunHqU5RVFuYZcQCj4Yma2WjTxBVrd5085l/chT/CRXlLE
bOIjNMD4yDRjpA18l+a35smWQow2Mr4bZHx6pKA1y7PBUbGU8emIYHJe/lAH
Hr/B8Q/8Kym5c84B2TYkWHd+llEoua9TTeJtSU7F3XJfKZcs+6SskNCOMUeQ
//jRAtz+rG828E3q7jo2Mm049JLtVondFdj6GC8df9nSKYf8PuMRt7iQ3dl1
eJ7rdzp+uSjP3TCfRhz3ZtFslT1N+Jc0ouPHn9x0vbG1Fu831bQj12X4SKc6
5XzVVlxat8uwUEfQ0uyXbThuZQTl50UeBrWG5+EzIddc41k7sPRUHI3/q1/q
ZjX3JywopQXvt2FjxQ7KxdxUxDvqgpDIO7bE0v4ObB3+kMZ58bXv8lLRDBTz
SPtwk2MHzjxWQrlYR8rnzxNF6FWgAfcRo3bcrahJeTs/y1j+UCXyPSOjp57a
it8nP6fx7zaez1i4/wfKLXjwM+FeM/6GpOn467nhnZ/6mtDHf5NIJbMB//LX
o1xWePdZuH9UP2Pm7ORXjQcikyhPD3qgBvuq9mo/y3q+luC+rlEav9K+k543
PpLAx5ba9xVbz59Lxzuf3BwA7+Eek/1R6lTxDn8o4KL8r80nP+BnpWJGLlW8
Q/9zHnOpUYgTLvjwIImD/o9zWlF+F8x77ZDuCJkX/T/vXPedepDnzQ2Lgkie
6P88fYPT6mFdqW/v6cF7gRfuB9PxHbE1oVCHkNz5k6QO6P86HHU+XQ11m6ed
fhqeey0XcaL82k6nZ1DnFTHNq+E8yKd7lym/valCHPrCrS6hA+9JqDvX0/iz
NknNaiN9tJ74BH1E55g+xiy0X1tD+h7MwRUM7zWevV9L+XOji7Wgk8H126/A
ec9Ps0MpD6s/IQu6cu6cMQ/2wWZ72lJuxXP/Oejwc/ccU7g/MPGZ1sPy6GJv
0K3mzYwJ5T1NaJDRrY1WeTnoXNhS2IXoHM1hdO7Me/Ak+AJd8uMhvkA79jRS
Xm43qQ4+KuE6r0x8hFoZHynp8nGA7+51fTdsTk5FLA8LKZcQmvbpjL9x11f0
OCiKMz69xecsAN+vEZadRf/+hto07ssXbUfp9X/Hn2S34ydJG3S+B6bgkKoB
yn3fR3ZytJLr2ozGiED571h8uIxyluXvHsE+0H0L87U77cqxp6eSOvBw26cj
4uT6+O7ZE6yXk2rxkeFaOr7pvGG73mgDXr74H0t/aCMWiTGj4zUVo7/oydbg
Y8LxNnBf7M+VQMfrrnza55pbip/9NciC/eJxj3l0/A+HuoH+d7n4Z8Dm4VLR
drz6axIdr7YsrkZg50csarf+FrxfPHD3PuWD1+9ZvUoORGs1bF3hux91YlGU
yy1VqlnmmI4GUtfNg/ehHh29QOOLBqjc5DxRhApSDs6Gc2Kxeb/o+OvfXTXh
fEN43MXj8PzcV2uQcrHd9U0rJOtR3HUeb7iukK+OpLy5W/kX9Jtv5vjzx/4/
8Mjf9TT+rfYrL+E5SMHYfUGdqCoc0slHuY9L7Ak4H/Dpb52CJ1cJDjQ5Q/m8
NVcuwbn5CJU9P324vmLRTYdp/EeZ7q/gfXJr3mzRCx/f4soXOnR8zlXeMOBO
bezKDh/fov/5IX0lB4gjbDkm84zrK/o/juGzTcdg3qWmYyfJvOh+wlY6XqCl
2w/yXPTpxE6SJ2KV0afjj0vdb4d1uSVafibrQn+YdfXKhmVCHbKENz6Hv1Mj
9vqU6xoZS0LddobMMoHnt/V1ojROrB3LGaizRhvrQjjXFMPU2WaBzgPoS8r5
skXwvk/YL2/KC7fNuRhK+hjydNl1+A6GSfN0nevkIk6sIX2/krTOHd7P7WX6
Pmk1JjFAdGLxIGiA6ASt/F8nU+xLrhNdzTMZTob93L+MrhJfRzaCDhcUFZ6F
+1y+z3aUf34QOQm6vasm/qcvtBGd2JVF46yLypwF94GXqoQaLiXVItOLPpQP
bNvjD774aeQ+g/iC/D2djs9y418/+EiodOVx4iMkyvioY73UFPgugfNiYn5g
CgpmfJfF+NTmYtj2538uKD5nfJozlaoA3/PR7c/8PTXlkvozfrEEfNenvZXz
KrzneDtI96mFbTL+sOUI5RU7zB/B+c+Oyi3HVi7Lx/I6qyhPe7LEG/bFflom
dlr4lWH8V4Fyd8tdv+B+QaT2ZI1ESA3+WR0pDrzw7usOwY8/sET+QQt9Uo9z
twTo+KjLOUUHNlVjnfgsB3hOsM/zIOWGTSnnrrCW4o/Psrjb2VvxPa4VlO+Y
+1VQMyoHK1excuB9bVjSWJzy2+//3RI9+QF/wzzLLVnb8TE2Jcq3ptWnzX8Y
gEJTm+dLrWvH+nM3Ut6qM6pvmZyGHBJVV8P7YaFsipRvyjZsUTxfiPj7YzfA
uTnbE59p/pd+LzHPF61AxU8mSmE/YfLVOOVi7/p+TnHUocA+p0G4ztohEEu5
UcujBPK7jW7Ofn1uo3E9TotHNP7e3Cgb1eRm9Jb97sW/MZX4YXkPHd9htP9O
7NlWJFDee/n1yWKcVLWajndp5Wdvd29DVXlr7FVks7DgXD3KO/VHLI2429G3
cw85eO+8wSLFsyl/VXTPAvjrBy8E+O68Qadr51Ae6DUyA+I8vsP2gcRBnMpe
dN4rT2a7wbwO5fOCyLzo/3mFhBpNIE+Wm3FeJE+U7+dHebKK1ltYl9+LZbfI
utD/65qtYFcJdXgnpDZO6oAUmDrwmtXvh7q9ZntdR+qGuoezKS/+ticC6qy2
2EGC1Bklf7xC41zX28sNfeGWi11D+oLyDFQpj2ztLptL+ugZ6bqA9BHpMX08
bbSdRYz0Pb9cjZP0HaV0TOtQVkfLBHRStmXhLKITtDZHnnLnpSfug66+z5yz
hOgK3WV0dXjf9V+gwwTFUQuiQ+R1IpzmKfrMl0WI6PZ4xfHD8B0gc0a3Cwcl
/oHO/3Qu/kx0jhw2aFGuE1kVCL444ronm/gCpTC+SC5c4As+6rzxejbxEclv
2kdeJsGu4DvpnbMazW2TURfPbTovCwumPnV2TRveMOOCYh/jU8uGrDH4ntrN
uX5DU1NXU6VT31bA98jCdLOE4T3zR9eGPsjJf8ZbD26nvE4/hZ6/Hxo9sPVX
Yx7+NpxG+bOLOWvgXALbiOGDOYmlOH9VPeW7v2gLwfOajq5LD0qdq/GFjDOU
D879rgo6lpU4NgF/j16+babcZSAx6xtfFX5fdX87PKdNMNhNuWiKqc8jSfJ3
SPjzQzi/9Gx/OuX+xxRmnA/MxjtuaOTAez2Ht7JVAn9w6VrXYYd4PHbsix18
76K7po2On7O+uP3pMX906Ku2IHyHqp6Lg44XcV3wxHjsC1q3548NvJ/7vbaX
jn8bVXdRlacABVi9mQfnlvW3vaH8UZWdMJzXVePdGgj7uYd1BWmcQyHRjsqV
NWjlojkccJ+r3pRJx2dGj9nB9SX7JutVD4Xq8K76i5RbTKpGwb7LbdFfY2nv
KjCv+GPK/zhlt8F5xKuHg649CCnCh3/5UZ5oZPsW3tOzNBjQENTKxO5j/pRv
sBR2gu/XGH1QkWk7GIXT7fZSvvFqtSNwvos7t7YfjEL/88aH4a8hTqJmxF0S
B50UCKf8mNW8Bpj3buCCF2ReVHfOgXLZK/dDIM9levdWpL+rQDxMni0J3Iaw
rr1rlm0h60K6vqmUH9r70wDqcFxZjd4XH/99m3KPC5kcULfIk+yvYL84bNyV
cvm3/7ZBnQPHS5bAOWo9ps7JPqLq0Jda73f28H7xN6YvmaUJDU9IH9cITEAf
UR3Tx4yd7ObapO+++4Lp90CMmzfS8TZ7RveCTnITd2bAe1KHGJ1MLfz0GXQ1
OHe1B5wf82Z05V1h0wg6nPNafjM8V//4Ygkdv/+V9inQ7fPb2a1wvfGC0W3c
LTkJ0PmOB4ftic7Rjs/TfTlWHS0Kvji70eoc8QXKZXzx5uLBDeCjg3yOQz8b
81A246Pn3Wwi4LuEjaGrie/QN/lflAcxPj31XdN6s6G9oiTj04Se4YXkPhj3
mP77Bf4dufDhOHwvcPyinW77aAsOcdy0NfFvIs58hihn2RnGb0D+3pT2Vg4H
heTi0ZEsygW+rDe+09OEpc3rX9sXluBjhwspvyFXuaBTvBFf2ZW6rlmrCpfY
61HO6iTvTX6fscu6vGFynYXfmlhSbnrwy8ieyQp8T5f9eUN4I5Zkz6ac49uJ
77x6xdgpafu6LNVmnN/wlXKTp96vM92/4qOShr3WNi34YeMXysde+2yYdIvD
Ww6s8d/G1Yp7j32mvGkNOvCV0w9Vxusa5cm24iYxe8pz7JVHDkt+QYonrsWo
lbVgLZa9lF/lfXi7JD4f+Q4VVGv2NmN7tibKb/37JDepUIass98O/rjZhFdZ
Tsc/8/pfwRnfasTCZZFzXq8Be79KmV7Xc89ouB/cbykgT3SNHfzdKbeJZj0H
+6S/1WboC4SU4xFDwRPAtXVa6PlhrYibVryfC7HSvxg6/qYt61Z4r/bHrPmt
XoYZmF++k/IPxixi8L2p9Q53D+gsjMRT7DmUX1v3YwP9DlXLTgndhZGIZfY0
P2G7WQrifDEdX/PIMAMJMHHOBg4vhnk32AS8J/MixMz75vILI8iTfaLWnuSJ
ZJyeTvd9Yk8grOuBXpMW+PUCs66B430foQ6np+rq4DmW6fKrlO96xbcK6hbG
KTZK6obep3pN6yRFfT/U+Rp7UAO892DL1Dmm2DwV+vLvr18cfA/A9Vg35Q1i
n3Em6ePlumroI2pk+hiRMjMO+v5PZ54vfL+nh+n7p6XH20Any2bN64T3Gu8z
OglKSxsAXW2WXroaznvmMroqyXBbvpfosPqH51PYBxMs3TEdX8U5HHSLQ9/T
+yT53c3TcQazuUHnHiufcxCdoyJG57wbdc+BL1R17O8TXyBtxhd58R7C4CMh
u33viI/Qb8ZHffq6+uC7MJbY6IS/icj9agfl/YxPLd/Hbkgyt1McYnza6PCm
dK9cCy4e3/5naupy6ptTm1k4vLtQ6uJqLvjejd+ILpdNVAIuznCgPKy61w3e
A3ywWu71K90cPPmGg/INd3dkPWZrwodmsO5e8qMYl2xYQLn5WMUO2Dc6cuH4
cCV3JbY0PkM59w8vbbievhq1u5HcL+BbstPzvkTxbFsry7H1aONc2C+e/IMo
nzksftfqchFW6Evjh3PUrKr8lM8Ouy2dejYLq3bXRsP7xRsH+qfmEB7o/unv
vduxOOtT2hr47tahB9P5R3Uu3L026xkaXnx0OXwPc7eGFOW7Lk8oL85IRfqH
mnjhOyEq+BeNc8RAWOi88jf0zipGGN6fknNXpuMP+PGM7ZUrRTfRNgk4VzY/
cboO/CMrJ5pI/6IOtoZz59Tjv5qqlBeLiZyA5xobPH6Lw3VI2NLp9UrEKfSa
o0bkE6bP7+ZZhpcL76D8nHsIP5yDb8Bj/Z2CBbjPXoTyiMznv/ZENqP5VqH8
v43TcftvFcrn8jXdgu+mXV1613cUR+AHeUqU9698QnlFcdC5MRyBFFTf0nWN
ZYgOQJx/fHOPkTjIvUiDjj/7sJwH5j0+10a4S7AA/T+v3oGTrZCnkLndNpIn
QjFnKS8w4VeHdZnh87vh704osy5xhfZWqMM/aafP8Dy2yI2Hck/1p01Qt4Vf
98nAOaX/66b0vr7LhtSZh1VWDN7f2cbU2ckqqnoR6cuyU76r4LsWbrZ/aP6v
Y25aC5A+bv7WC31Eu5g+yqntdrpP+l4l/lQAvkN116KJjk+JyDwDOrlXevwt
vJ8ryuhkrH1tCOjqup8mL5xbnto7rSsLa1cB0KHGmPCocmgDur1k5rT+o2ON
QbefeGoK4D7XndGtaaT0YdD5vzl/qojOUYfidN0KC92/gS+yzBaLEV+gQsYX
sp5St8FHkV8XmBMfoXHGR2xPZ/GB73LmcV6xjkpA6/PtKOd0nPapNJuGULaQ
rWIU49NN2z5xPxVvxnHetwbBvzaVKXvge7eZbAkF8P0fjeuqdp2HP+Glml2U
75Eq8oL3Ihd7Gv3yYs/Gn3xKKE+4ERsP50XZtyjc39VWhA1LGilXWzC0CPbR
xA8P3oJ6OEd7UZ6YtqEH7i+ORoQo6svWYMfAt5TrXzl4ijO8DM8wvKkV3lOP
Obkw5SYO83XLxArxsa/XO+Fced5gIeXpHKPu5dszsYm+aCi8b/3nAete4MPz
/dQsbsXg+7duL4qY14xjBBLp+A7Xztotlj5o5a/9/fB9UF7PTMoH+8J9Ylek
oM/XnmrBd1N+B36nfGZO99aUnFzELXA+mb7XuJqfxmc7+FTxqXgJWlGw+jSc
s3td1E/Hd36p1Ce/2+iUmEci7D/8y3pA+Vfj7003ttYivsaEIbguO/Eyl/IZ
asfvaif9QLtTXDyOW5XiQpF3lNvvqxPfktiI8sNZnaSv5WPWQ3WU9wyZexm8
akI6ueNi8cZp2DMviPLsMF82l9XN6LSPz/hhk3AcZzxdT7c/STOB58wRqNM2
CUcBWzbR/AXE2O9DnAOjC8+QOOj/OJIu5eth3ly/Q7FkXiTyYLrOmwtsr0Ke
6bquQSRPVMDk2fzjShGsS0ZMeXY+XxU6zqwr8PpGZajDqsTV+aQOqEkmnfJ3
edZCUDff+8PnSd1Qo+VHym2Wj7NCnY1eS6WTOiN5/TDKew2khaEvVhy3DpO+
ICODPMqnXD6wS5M+9su0Qh8RN9NHC/F1GPrulf9lAek7es/0fcWMK0mgE9dH
PC+ITtDmSzcoT8qz8wRdDSeZNf/X1JnHc/V8f7zsCqks0aZkSyJSWrxH2qxR
IbIkS5aUJCGSEFGipIWILKmQNYT3kCVbWbKEirJE+SSlRYrfPffet++vf3o8
no95nJk553Xe7tw7c4bQFaqhdcW/x8oXdPgssEsdzjvOp3V4Y3DrJOhWj01Z
kdAt8qB1G+TqLAk615jUPUboHO14WUhyl+kbJZAXdvjXSSIvEGfgMZIHjK68
CXkk8y0uh8gj9ITOo6rW6GbIu5FFawc/7i9AgnTeOdJ5KpIS3G2o5MZwpfPU
aKsu1OPGsbO8fk9PezKj7deQdbofvnihAfXUOKMYYtnf8rFcgT3Jb5wvr4Zz
5kbWD+7/96AK17brk/z39Ig17L8XvOnN7KlrxLtCNpDc+luaBexLuDrp4wd/
XxJNhEjuXLvdCd7XaH/86wXvXceRMMlLXWY7g44v1RiKxkm/wQp860l+wMNb
pWv/C5zJIzkC53T8alRIPos/xDuYpwJbn2W/BfUrhHZrk9z4eK7BbL8sbD6x
uhbqOhaWSZDcszszLJz3BmKcXiZQL/Ie39kkQ/Vb+uadhlUx6hpV1oY6VDeC
lpF86bumM0aaNUjmwqYNcD43U0CL5Dyt4xtMxZuRg+qym7BveZapLMn7+8xv
wPPlp5NWO+F77oFmcZLHlVoVwHeXbyo5PMT6EdeYSJLcbaHPV9iPqNGk4C6t
1YK5F62m7Lglr4RzetG/Ql3Tmuqw6uv9JP+4l3Mu1K9Z8t/14E2HynCItTrJ
KxVsfKGuq+/KtpifHKn44Fdjkj/ffNAH+ILstQ6/OFIRi/8M+I8b7GSaniki
7CD/G1S8SpImRaBfx9jfqUS/KKKImu8CxYcfYJwCP7lCiXEi1jjzcuXvw7w4
GZPisC5+Ts/rfOz0efCDr9SUMXwvNqH9sELWeBn47fE94xTYRz19gPLb4sdG
OuDn5TLaCM4XTy7dR/JV+c8cIS7nuAPJulv2ueEkjzJ98u8SEccvJ+IhjogV
x0pz50KIu1ZabzXUyWw4cpXkzOtnHoNOJM0FrkP9kHj5vSTncpayBV3pKE71
wrmqZXcpO31sWYGgQxPNl5yEDtGZaCmSN36tIt8zGsoedYL38MXhW0mul5Bx
AnR+cNdrW3g+uUvrvPBk33HIi1sBO0KJvEDb6by4KCTTAHmktXiWA5FHqJrO
I9l32tsh71Zs3xqf9S0fpfxzIPkZOk9dTEUsDoSfYFyl87SlYO7k9HQPbmtm
G5+e9mAmHK0ehrr4ph0xBz9F92Bvuew8i4t5eFvXvE/AdZ8mTDgefIc9/eYf
09lRiZM/DJLtbROWFtw3foPjPuyq5mK+wJunxkmefbK/nie6E780G5gH9TqK
rX6TvFi6R7BhdTuO5XE2FBXqwLEpv0g+dbW/L1qhBVuqbbODc0ynuqdI7t4n
7pfjWo+fjtb+hH3Cme0TJJfV26lo+LIcX5WYDoLnF7Ho7yRvd1Df69udiSu8
fh6B761DFZzk+COj2FJw3HX0u9lMAd57c1f+R7af7HSrd4spQqHI8R2sWyNf
sZPt6wJ+TrzOrkZJLQmL4XlgyfcPZHvFwJ5ls2Y1oXFmdeOZJ914cpibbH+O
74E8rO8Sr4kgOJe24CY1nsQD4e/gu6d/U/OQnlobnooWItuf9t+4BPYDJ7zS
moT6LqJqIiRfL62K4Zxs9APF0T/CtXiMY4C0Exi78hrUj8p60D0FdVLr3n0m
ufkZHAl1laU+XIs4dTsZfzT+RHKFjJYrwPuOmuzxuJ2MWFw7WvIy2InjkLce
SGQilh3ttvY86Ffcp3s51I37Svd72DxKAMZpvKFbEPJPhB4n/61TL2FeMQr/
/hDzQqx5TRXVioIfNBmGBrBfQ5D2Q09LFxf4LSg7+S2cY/hD+63t07UG8LOG
0tZV8PdOnPbzVp4xR4hLr6ZrH6yjr9BxKWyN38ok4rhyneZash48HcdM3Vb+
s0TcxfLF7OC9GivunQ9/HwKddAeNnYX9UYtonbRcLHgAugoVdRuB36cMWlc2
yj8mQYfsncn7Yb+nO63DX4tWrADd7jveoAHfwWJo3c5XXvsWdO5X1vcb1geF
tM6NxN9XQF48j0qKhjpjm+i8WO58gc2JyCNln7qNUGcyic6j2JaYQ5B3VzgT
NxF5hzTovBMrpPLUOW7sXs2V44y7dJ62CejuhPtO/rYm/ZqePsW8inb23Dce
QfE6fwtczN9ic7aOtPPCudismOIuOYLDChve4L6hnKGt7c+w/39bSW6VcVAK
8u1IwQijNbkea+tpkjyvX3BworoDR/25qATrYhNVKZIL3g+2h+9MKUGaPzTc
2/AOG2uS9+e2CMPz9/ZF/LthH/Vsa3WS8ynpm0r71+Lzi5P7+t91YT4uK5Ir
SIxK5l8uw2IhfXGOV99gv19aJNdPiv8olZmOT31r8CfrUafLk7xI+6ONjVwU
+hnC5wX3RGyrWEly3mR/xdkNBWjFcPkhqJ/p1UfNa7N3w/wx0Sok9ic2YGtj
N2a31iZ5jXOEP8Sj6X7NJjhv9f3QOpJH9nF5wnsKjY97DsM+tMjR7SRfG1U6
qrC9HenEqMnC+/knfzaT3OOAjAnsa18dMocXnltehm8j+UtRR3Y4772vI+r1
B8Pn+NqEGcmLrRZaQB003XiuunivErw0dR/VfkFEKtQHl3G0arSTSsJxRRRn
djKTgXO9mx9oL5WE4mke9FvCBOzwRn2Su+tVgtQkjUmObfUmmES/ub+4ePoM
nyNWv71KbTowTvOU12vg7whrnFaCRu9hXioqZ9Xg/Wo+Pa/00Xg78IPAIpMT
sO8ogvaDqFuVKfitxVh0J5zHkareQnK1CJvBr4SfZ5/qCIM6FWy0n3m5Appm
EXFpF4q1g/qNnnRcjjwLFzhMxNHr8BDEEXmkUXH8wdkUI03E3TZbyA/qLd+h
4z52dYUx6GTcq+sG1KGSXUuNp+f95wDQVTiXdBehK+TkpkbN1zNeDnS4OO2H
GuxbVppN+WeYmeYBui0LqBggdIs0ad2+U90yDjoPqlZfAuvcKPdDJEd/0xQh
Lx7+ShUl8gKx8kLgoscY5JHVK6cnRB4hPzqPWldtKIG8++b0SoPIO2RK592S
eVSems7bZH7IyIURQedpyLrQT3D/S/fmkbHpaXfmPPm9fXAPzCCvjDXUxfX0
xOxPY7LxeXY9kke0ig1BvSCfxCdsltblOOiqJcmTRY4vUNB9jWUE02RkCH9U
5+uTvKTJ4jjsL20SwFPwnmBcRpvkoVyx0fDdLTVRwQm+n28+aUHywrJXZ2A9
wp7/QMnuejteP+sQyfsWLjzFHvwc8+I8F/i71mK0j+S9+TpPPC4y8cYvlf1Q
h+xaNcXNJoWYg6ce4qQ3ArPPbu3GjQspO6OPK5BgxlU04rcjHe7NeFpnS/KC
v+c+ZX7PRyUv1CTK33fhrJUHSL6f/V//Lo8KJON/qxDqrCg1WpPcR0dIIte1
HtmODETC+TPOooMkvy1TtG7xwWbkt6PJB/blaaVR82WXt/E2DG1FChPhHfC9
Qm/KhuS2f5daWyh1oFcfP5+D57iaDqq92vKkxDT1TtSXV6m+JKCKWPdQ/nE4
+uZQTFIX4jzrKBy8/Sl+c2oHyctGeg6MmHYj00vsXYcfJGLZbC2S10ftMAEe
L4+8bR4kIjmaX7P4dBDsGHepHyHsoEYrTZLLJTvfgn7/qvI7Ef0iUbrfdtev
RjDOf5q7kohxoplxSou4wLy49kYOEvNCrHmtr9WUAD8cY5wLJfyAkh/aUfM1
Mpgk/t6h1RsCYwm/IZbfTuiKlICfJxY3lxF+RrG2u0gen6MXDXHxmH1tFREX
9JiOy6vbccMCRBzXLV6RQcQRseLY/Hy140ci7kMVnlO+W7uRfgwVd0nPR/NP
Ezq5PCn9jtAJYukk1fbKHdCVNqe4LTwnsHS1Qj48GXR4XWv7SkKHSIXW4VBw
YBLoliukw5zQLeI4ZU5yFb1vZ0HnlZxsnwido2+0zp+8j1gMeTF+ppuDyAtU
ReeF+cVvo5BHdQtWvrKwLkedItT453WusYO8M+mQSyiKyUZeTlT7ZjpPf0Ty
cP8Uc2bw0Xnq+qNHeFK4Exd5N3+ennZjZvC9KIH7q9huLdsPdcPtU4Kn7i3K
wtqL6kkuFTMrBOqpJW2P/3KpGuPN0xQfW6MZDefMc/25rYjfbfx0sInk5xZZ
HIX997Ne/vEalnyJR+/UkZwpvOoU7Ev4q3D2HOwv2jzeQHKV++UG8L7Gujz5
A5y7SerpJvloJjsP6Ni4Q1Fw7EE7HmhoI7neM46QV5+Kca5sWjvUaVzwtJ3k
P8zkdj5SSsN3srJ04f6C83GtJK+/WirsIBeJUk44VcG9Qpl8VSTfKJkuhRbk
ofRcG1Oot3xArYjkFlt9916sK0c9Pw9MQh2qqO7XJF98UGUXPF/+yg9ZDedz
99yh/GBYNbcJvrsE53F5w77lewepfstNpqdhP+IVJ87L8D3XQe8VyXsaKo/D
Ob1tgdgD1rm3dnSSvEnrmDQ8n52urjd0eFiBufe9IXl2d0Ea1HX1dDMOusBe
iFsjqPk2fNTigPtOHN2FXHilE/CWM8UkZ9+hxQZ8r47xFMER72Jq/OUTpslg
57/LWq8IO6jEroTk1t4Sy6Bfv1nPPIl+ERfd747L7nYwTkOJwzdgXcwap630
wHeY13Ir1Rj4XpytUUZymdv6WeCHPQO6wbCP2kDpOcmL92Bp8FvHyjsqcL6Y
5bfYE7flwM+NikNsUHeL5Wedl4feMIi4yF27bQ71qO0sqLjvP7pyyJ6I4/Mh
+Wq4pymdjuNjqyM9EPcwezNtuD/Cn4775YCRZtCJ2PUtzVBXk6WTFqsP8qCr
d2oZ3FBvpJ/W1Xfls56gw8bWJW1wDotRQMXro/eD86DbdB1ud9ifdka9kORC
7ileoPPcd6tM4L29499ykp8oMI2HvLgU6aAOzzM7vQpI7vij+DLkkYjy2AMi
j9AmOo/qCyRNIO9WRuSlEnmHom4NkTyTztNbQQLuvOscGY/oPO3jMyt8nd2O
QzZ8H56edmV+lKtRgPvfXiby7bxzpB1nfInge7o8A8/dWEHydvaE1s7gNtw2
4Gm+BpfgXYUU5945PG2xqBV/DzKQJ5438dzsIpKnG2ekJa1qwW/E/si77ajH
mb2NJF+W8MiA4daIj9caey60asJF6yk+6fvobklNLb5bKi/olEGsg3c0kfzL
nTIz4vcZW0Tuvjvk34qTjd+QfNjicP3tbUXYv2fBxdMNbfiVcifJ/x7JPGH3
IQUXlkz5+Ya04zMLMckf6ybxCjLCkfjRfL+VGe34qtpzkmdpFQ97y+ag6POF
w8e3EutykRaSu6Wk3zqyqAwd9d42BetWtlPlJG97qjkE6zXxmLne3vdf4aSs
epLPl7pvAd8x14hKjhtfb8bS98pIvm+2G7m/l2eWExd5DjWZ8vMB/YxncO61
sPyXiJFmDT4t8ozk1n91AqEe1OKUlNmErvHhl7UkVzIQG4A6yU0bLW0uF+Xj
WdteknxqQVkD3B+05qbo2O+NcVhY5wXJhXg96oF3z7IZm9gYh1jcvu9RL9hZ
/6XkAWEHNSdR/q+s5PSFfpUuVEtCPtnQ/Zr7SD+FcS7xHF0H75k86HH261iE
w7ykX35bBvsvvPZR8dqoo7wN/KB40XSa8AOSov1Qul3mOfhthWZMAJzXZ/nt
mvS8M+Bnh1fSHLC/47xpKck/se9Ngbj0R2b9R8QFDdsWk/z1vYkqfiKO6bon
zsG9ZxF0HF/+OMlpT8T9X4imL9zHUrugneTyG8oWxBA6+fn3cCDUqT36jRo/
jnH0BV01NKbchPo9vicoPloXXAE6fH81kTzX2PqasqNr+8IedJtamecC+z0L
ad36jPvng87vZiTOge+NQ4aVJGc8u8RtSeQF942NArAO46XzwrjGqRvySHB4
5Rwij9AOOo+cU1/thrxru2TmUrQ8A9UIdZFcnJ/KU58EvROSKfaMATpPb0iV
v9Pe0Yo9Xm/5ND19jCnXPl/U6eAX9Iet8LfYbOLv5mrhtSJsD7EmNy/J9/90
ayTW51h/+eDbN4+KMKfSIpKHFeFtUE9HzXtOEayLJ+qESd5t+UgTzhmmr/ql
C9+LjyNRkte2c5ssFmrAxkU6YrCPOvr6XJLH9/fyk9+lLvU09GY0YU5TEZK3
hvJpEM8ZODJX9q6FQQuuOkmNU/df546+8Cd4Y/zzf26er/CevUtIzu6205b7
UhKWHd7W4LGsFfOtESS5nLCphcLSMJT5+VOWkEYrDjmwgORjt4OPr96YhVrF
v5a5dr/CKVbiJJ9r19wrT/j312plbai3uVaWas/7/C0HvHeQu1MWpBTejM9n
UuNXuTRsC9/jj6t2OmH7RiycwE/y9WlLXv8xeYmaV7Y5jPXW4dpeinc6PhCG
89sJFuqfRh4QfwfWUv78YvzvBNQ1U568MBxGPOdESC8kOZYOw8EZr9DKI1xv
w4/k4jOmS0keKpA4clqlFdktdWEvFY3BPFo8JN9Y9fUTcJdNSf8IjjqOU/M6
cnJRCdiRatFccuVILhKPmkPy9891naHfrccsZeHvAqvf8nfB/DBOo6Ff7PC+
tIceZ8MJsUqYV+fQ17Owjyg0W4jk0jaqOuCHtEe+foQfkLYNZWfL/soRbcJv
g1H5l6DuBMtvs7TbksDPU8UcBlCPsT+Milcpn7UyxMUm41QlERfUGMdN8lOZ
503kiTjmv72aTcQRseJYb/+uFeIuHHKxjog7YsU9DHOEgE4iuf79JnSC9Gmd
2Px6bwm64mz+cxPqUPEcpHT7NuaRHOgwS0irAs7nctA6/KMQ5gS6zX9SwAn7
lm1PUX4YsHmrT+pcUX4tfM9l6TxykbMO5MXfnps3YZ2rxkX5f1gvvw3yKG62
3S0ij9A3L06SJ69SmYS8kxqZiBdme4hezFpM8pd0nt7q5V711NmWIUvn6eEb
V1LgXtRbSic+TE87MZf2pnnD/ajujXuUtaOaMX+jfWpKZyrmUn5EcpG89zpQ
R/ciz0vPfsIf1qNJJB+PEe2C+kKcCuu74D1BU9NDktf5nl6+yasBX6y+PAnf
z/9GU/YXzG2Ohv2oa3xKa2BfuaNLKsnTa1yb4Tudep7BvI49L7Cv2X2S83KW
scH6xelwhcYGkSZ8dTyT5D2Ra1BjUy4+Umax0lS8GZfPptq/jY2ruCyfiKVv
V7nCvVW3TSj750/avzk5FoyYxumacJ+kpwhl522ozRmGXzrK3Rr4DO7ZEBmn
7HB5JT4lfrfRtYWbVcVSm/CDZGr8l6+k1Rq+LEe/RSLuQl2W7cUPSO5xWtqy
6kI1apTJNKuNrsc2ayj/qMwrMBu4X4dSJdwiyH18EZQdGXUVcW3i79aNzU69
8H1jvhfFRUtHba4cbkI3RDmEW4nnvlhFigvGR7R2azcjwenRBefnZuNFSckk
l5IqS7uIm1HBo6Ajj0Zu4O8G1Hjs3j66D7xDxXlr+sgN9I3mywv2NYMdNs0l
uwk7yNIzheSDrfaW0G9kP7s20S+6Tfe7+x0nH4wzMb71JzFOtIAep6GFsBbM
y3GOaRIxL1RHz+s9j+pu8MOBlk/OhB+Q7Ug6yVe492SB3wyxXwbhNxRc/Jjk
nep5IeDntfICmwk/ozTazw9vTHNCXOKv+VQRcUHCdFweIJEvJ4g4Lo3S3U7E
EY2KU3GUntcsH07E/VGR0nEi7ogV94BNpzxAJ1OvBMjvVxf25pF8YvtRDdBV
TtLbTYSuENf3BJLP1pf5BDr0F576177nBVLWpvTvn/Q+FXR7OmeigNAtenaU
4mYvulRA568bnHoJnSOWzgetJgYhL4QkDz0j8gIJZVLxUtlqYAB5tNtSYjuR
R8i//R7J+UrH10PeNa6es4rIO8TKu6t0nh73/T2v9Z01YzGdp0vW4aNwD/Qc
gQ3/TU/bM+Vq+Mh7nSUusLvB/VhupxcrFt5PwptP8pPcMHDBf1A3/MP3rDTi
dxure80lueymejOop1Zdn5V216sE/8yjuLAL73k4Z/70IvMG7BeKYMwhed+f
iWuw/76+eZfzLdFq/ESJ6vdXqP0m2Jcg9rFjdblqLZaspNqn9A2xw/uaaOvO
Rqi7mCkuQHKO2NQ3/oSOFzq6RcN9BH3L5pH8maoXz4fQOHzkafe+QseXWEOf
an9yZGLDupJA1JTtsCc09iW+4E+1t0s+Z7g/IA2dK/OMhXuFlEKo9mynzL7C
8+WmrS4tUG/5QjI1nmMuex/Ad5fEz7ZjUIfqfgtl553A3u2wH3Fpvf/CQ0+f
48ZoXpK3xIsdg3N6TH+zQNi3PHWWmm/8gY2JUL/GpUUjDb7ntglQflZdflYG
6rqu4r+cB+vc+haqvVpHqT28vy1U9+0s25eBpWQpbh8bmQT3gKbfY+cQLozC
5oKUnXkBsYnAK30MqgmOjNkpvmH/t0Ng53ai6sbyfRko2oOy86Vw5VLoV9BX
agDWxax+yz84R8M4PQ5sKYbvxQvNKT8c3zjbCuYlG5l/HfZRF0hS8x2u/q0E
frgmKbcSzhdb+1P9jqsM+oHfiuye/oO6W0IRlJ8PVlhUgJ/9RMa7oB51EO1n
v/q2L/uIuAjXuyfAPU2suHzXXFyuSMRRJtzUAO4vfh5I+d8zsu45xP2X6bgB
3KuI6Lhnur7mhd871dqBK3DfRD+tE1WF30qgq7CUM1VQh/NAKDX+r7+c9EGH
DiteLiF0iGySqPEPD1+5B7qttTcwh3NbLN3aF6VEgs6zD6Weh/1sYlpU++Pj
TDvIi+ZH437wnv8HnRerzn8dhzxakRHhDc8/rDwSsQ2D++SwoEEWLrifhFh5
d5TO0yV24lFtWpYMVp6KMLo2u8XUYt6xqv7p6cPMoH9Zn+Ge8662Gwcid9Zi
sS2ZuxOPJWCb2Zkk36LTFSyhXYPjDyuHEM81WFMxh+QLrWuDHj2qxqLjK/ln
NxRgJJhNctUBz8RBz0q8WWYpm2AFE8sHUvblJW90HC0pxwPiR68JeT7D2qkU
v3kuND5bpBSvWPbLVmVBFT5pSNnfUHldKPN7PtZsEFaJW/EcK5lT9kU7LUXU
/dLxxN3PUg9u1mDzPor/m3P24pGsW/i4WaHyfedazG1B2Qn4eL+11M8fvWth
d5aIrsXndKh+t7zbU7nZNxnVeVxTnBSuxd/8HpNcUSCjENZf7zf+CAr4+hx7
r6DaTzq4HIPvksvWP1Q1XFONmUsp+3cqvxfAft1EKSE38bYK7K5L2Qn1+W8x
nGPtcXy+4sifMrx+ivKnbsHx7zipCjky14tqWBXjo8eo9pXcibVQ9/ju3oDb
jAV5+MwFyv7fU9gV7gO6JxHmSugaWw5T862Y1lOBe3KLLu48vccnEqc9oey8
GAlcBzwkrIbPwCcSRSnmklzl8a6jYKcuXb4E8uNVCTWeY8HO5dDvHmRYDu+N
uPZSdqLqVYZhnB1euhthP0WpOeUH34UJ82BehmJHFOGcwXV9ajz7e9Y9AD84
Twz5wvl773MUP/YjXxf85nnbHkFdOpbfTLYXXQM/W0bJXIZ67Sw/Y9X40xAX
9907VeC9V8kQ1T7V7ntWCRHHEqEyiCPS0KJ1e9djrQMRdy4vFSW4d5QV917r
ejvQiQlTXQLuYzGjdRLF/1sNdCVR6L4a6tSydCVcuf856HDgv3kmUL/nhStl
P/7t+AfQbXyZegica5wnSPkzx39bFuh8MKe8C/Z7rqF1voSHNwLyQkHXbBC+
g3Fto/ij1MtXII+yfUTMYH3AyqNorpcHIe+iRCfGEo4loBQ32p90np7e/Wd1
cIApg5WnafO7nMwvVuKH2pK509OWzJTLC45/ih4l1t8nuol1Cn4iGad+wiwG
q5dSXNOSM+q1dwU2EdbUJ57P8ePJhSRPWHygaefaZ/iw7YImf+FcrHqa4rnf
rf7IOJdh+dnH248/KsSaYZQdy+ebgp1OlmA583X19XGl+Pw4xfmlXPIH9xfg
u4eu4oGBMizeT/HXR8weFsZkYyf++uLuy8/wh8j5JFdYZpCaRDzfayyPCXtV
WIF7rSluJGWY9rAhCl+ztdbhsanESV0U1zq/ZOOHU2dQn+hm8UVBlXjiMWV/
SeCVR+AvoUcOkiuWVeLJAIrzdKokFC7PQNtbd7k/V67ACtMUT/lvbRTch/23
yvqMZE05Ttan7MtkT9cX/C5CpysV1VUaMf5nSrV/Yza87X0JE6Hy9982binG
61dS/pHiYEzGHyxHwWItiY+/5WMnTNnRe1ByvbTvGcrsEfySuCgLO7VTvJf9
y2jcaAWyKorIeUI8F8mnUPaV2/h/GnhWopoyjqpDrmG4r4XipflvxoEHljOy
rV3DUD/Na+9uGAE7S8/3fCHsoNW0HVHps1egX/7t9nPh/acj3e+5343fYJxZ
/DtLiHGiOyZUe2/bEQWY10O2NF61LcUo9gjFM3h25YAfIu3+7CX8gJavp+bL
I3HXE/xWobo8gPAbureR4qW9Dtbg5z79/d6En9Fa2s/v7kQ7QVwOJFdJw318
rLikzVGx7iXiGNLRDHFEmVkUL7tjJPeIiHt9kKoWEXdUxy5E8psv7N+DTkYe
mwQTOkHBm+h5rTGuBF15DibkE7pC72ldVT3KaQUd8l74m0foEHksoPgVAdVY
0G2XC6OA0C26qET1W7xvLrcsoXPBB755hM7Renq+KvJDHZAXpu+25hJ5gVh5
IVuXeAvyyLq2lg/WuRueUPb7F/m/g7y7ddsi29UsBlVeEaTiTuep+opj5RtK
9jNS6Twd4Yta4tfNxPpNO4unp42ZVZav7XdWjqLPPDnrlD2Y+KdCDlsG4Q99
fopf7+psGN9RirdneXPwXkrCkt0dJI+4+2P5/X3F+NGzmnmymenYVYNq//jq
Ka51RN723HlqGRGag0vqKC59sfQanNPUKhQwWrntCV7WRHF2Iy5pl5BsLJr8
olnGvgjn61E8PqD+A3zXS/PRHW7oLcbxxymeWHV+D6x38hK+ScQmlWLuTopP
Xbqr41IejnXjzQOI5zUcVUuNc8IjzV3vvTtaGrpvjkgbE1eyU+3Hlrbcdsy6
hbh3C+/t3MLEz65RvEbiJ9eRDymIS1fLVKarBJe7UNxuPNnMrzsT9a5JU5Mr
eoqvKVEcGxt6TwfmonO5wzZ/BwvwwBaKv5lr+q9rUQGyNhqZa3w6DzemUbxT
7U7ONaGn6PQHZSU2vyz814LilVZnf1nZlqBfDQ5X0pXSsHACxc99d7n37Ucp
OvbN4nAf8ZzIn0px12SPoN5yJtI+dzRd9m0gPjVJzfcF24MA4N/nFlvJvQ1E
HjS/22xwB+ws+nS9krCDWHZmRUv9B/1WTIwziX6REN3vl4rUVBjnZNmO7cQ4
Eeah/SMz+z+YV/TdS8uIeaF2ZYojLxMH8MMhiUI3wg9I7TXVr4mv5TrwW8gK
9R2E39DvA1T76l/bOuwJP6twGR0m/IzKaD+HnH6jCnEp2KtoQsQFseKSFh6l
pEvEUaxr5VwijqiKjuPXTsl/EPfiY2fPwXM6zxE6vkNW/qCTeQNFYoROEEsn
pzP8Fg4Rurp6p/QtoSvE0hVeEqMOOvx4IqSc0CF6Qusw69RgEuj2cs2H7YRu
0a4xal4fsj6Kgc73xr7eTugcsXQuJs4hD3kxnZ86IJOZjlh5sadpfRvk0dQz
r2aeS0ko8QTd3rJGFfIu1+JrXHpDFEpYSHE1fipPr3uen78vRp/BytMd+eNK
Hrfz8ElVe7vpaX3m1RdR110HRpG70MUxuAfaZH7IRhvi93y6h+LXt84SmB+W
i+V1JUKZojE45iHFwyVfSTmr52COw1L59lJJmKeR4nv5bSuhntqBcaP7f3Aa
Dkih+NB91Xw4Z76lbs3+008y8NzXFBeUkXE1criPuZaevvH7exaeekvxDbHe
wjYPEnFf0rcOuF/g4B+Ku21mhsP7mmS9x94atbnYs5ziait6xUHHhyRkpNnc
8/CifxRvllD++CnMGTm/DDZaG52HFXMozs7ccBCeL031zrl9WJuHdfopzlv1
TurPxjgUIuDPhHuFKp5TPC/0vjnsR+TyE2VCvWU9ur1n8aQqnNPr/7fIOHv4
MT5E8wjJn++hfo1ibeQPOJ+7sobi9iareaGua9f66TW/OFKxczfF9V2+zIX7
TsQddzTB99wDLRTftMr+PNwD6jl1xwrWuV51FF/gL3AJ/q49cdw7aXvhDE4f
pPjY7cFQ4DfmKvywu3AGRSdS3DlF9yzYmepZlQjrYm/aTuZYCCf0ezHM+Qt8
L35WSXGbBwKzYZzzepm7YB91Pz3+zq1pL2Beon2afHC+WGCCjtcT1SXgh7bX
Rs5Qdys2l+IfLl5ggN98tsdWQz3q3WkUN/aTHILvWzkOByvhnqZK2s+/55gK
QVwilQU94P5ibdqfHO5iW4eJOB49J2hMxBGtpeMY/vfDbYh7zCmjVUTckW4h
xRMXjdSATiTQEQ+4h/E0rRPOZmtV0FWdgUMT3E/h95n2wzGfK6BDRevHl6Bu
pyHtH4E5nXWg2/vDZxlQz4S3jOLjEQ6NoPMFy9nC4JwXS+f9j2XWQF50/+WM
g/1v3HReiCyfJQR5ZBIoqkHkEeqm4+W1PGqczLunH1IPE89L12Mp7kfnqfB8
xxdFztsZ1+g83fCm36I0Lhn/iDTknp5WZwbJGa43nyB+t0/kfLYzS8bZ2xUH
iOcUvEmW4sFeQk0SV5LwlfIqbvmlYfgM3V7N0uDZ+m33sP2lnjBruSicK0Nx
qwg+UQ2fBOwiqJCzvOoW/r6K4q14oT1v5B3cb3bUPakkDnOuprh65I+2dS43
seV8twK/Xwn4Pd2+zJX/C3/GVRzrPaqgkHAPz6XbG7oXurmOBeMlh/dZWb5I
wqvofpcO6a7Qfu+OPSbXGml6JuMdtJ3Kze/vuEYeRAZf8B1CR9iVHr+4Yr0t
rKdeyAecFlJJxtulKb6bcWOSjxGOgsWjM6t2JeGxNRSv+7ArpDTuOvJT3SiQ
1pWIm2k7+sXcuGJhDDJrqr24/+tdbE+Ps2Pvpvd9b+KR0VdRHHUgFrPT7Y+N
jQZkuyQindMFg2G8N3CZPMU/zUnwd/p1D93ZxSdpLxeJl9Ltf2z51GLNkYz8
qjNy15YEYn16nGVR8+USLiejV+n3d34Mc8afaT8Mf6qWAe73JXXnEKF3Fmc3
+/ES7ARc6vtO2EF7aDvzqk3PQL9/FlzQgP0Ry+h+yyyFz8A4TRYUssG5gXJ6
nKIntzTAvKZra9uJeSEOun3Q2Y4U8EO8r30c4Qf0mO43yfy9M/ittNRJBOqv
s/yWaZ5YDH7mZubkEX5Go3S8QvlmSUJcAj0qvIm4oPtrKZ4e+PTyMSKO4SrO
cfB7cJy283lpQSrEPUpv8T4i7qiSjtf1/Q8zQCc8KyfNCJ0gKXo8LQEb+AUI
XY3PuSIN97Go0jr/w/j8DXQ4sNI+g9Ah+kLPlyvFxwd0u/v7gCWhW8RFx3d3
++uVoHOvoehrhM6RJT3O5fNraiAvRsvZTxJ5gbQVKY7mL2uHPEoI88Wrl4ah
l3S/6R6hXyDvEhfamsH6QI3mx+k8jXOXu1rkrMJg5SnvfOSmdMiIyNu1oq+k
vpRMk/9GEduzaov7i42YZwfuPIldtZrJ4vN9vCbq9+1n+oRkDo2+2DTDvZ8F
cLTw7mNy+T1yVB/VnOGpUemZDG1D5ilxX4ff3loznK9aa5/1Jj2m8EY7I2cb
/RledqBRbIXUbqZWxLAxR6XhDC8Sbnjs4rmNKa35Tu+hw74ZLngkQvHVow3M
x4oWD7Wu7p/hudvucf1OlmRKJ/bKrt5kNMN7X2w+247mMM7n4owfB//H9e3L
HLL0lBgm4+tl6n/8z8646Kov+we2Mnz/PD6gzfc/3nDU47bSoR2MK7e1Tvsm
753h81q3SKdUajO+Wi+Sc4kw+J+d+S7rNM7tYRwNevg4nkP3f+MRenXp1ca9
jG0SHMqZ1Ttn+LqG/LG3pfsYu/ZdkS38ima43q8M1ZTn+xmWEwEr9virzPBi
OdXVu/cYMULnKaw7tFl8hgec+i4LXGgVY7X1ZnEGi789mbYO7IQnVdsQdmb4
TX2tz9Bvb92gHdHvDDdL+x0I43x8o0uHGOcMt1TevATmxSd48zkxrxlu9+IG
H/jh5hUeBuGHGf7eftE58JtAb/9Zwm8z3OuORg74efctS0vCzzM8L0VUFuJS
nHdqNRGXGb7uq1VXKxHH+yW7Mok4zvCrjofPQdxfe86VIeI+w20sEm1BJ+jz
jVRCJzM81YOrCXSl16a2k9DVDHfT81MGHfY/tdMndPi/eZXaOIBu868s1yB0
+7/28/YWgc5bXsvqEjqf4Q+DfPggL/Y06egQeTHDZdbkTUMebWiejiPyaIbX
nh08BHl3fWfbEiLvZrgmnaeH+RirRf36trK4S+S1rOd9oxj9mzvryK087PpV
SL0l/jr6sfh2ucnUKA7c+4loF8xM2yS2EviB/sEcaB+9X1XM/lYecqLbM5ZQ
7cPe+uTWXPFjJNLtm7dW12aHX8dvjqTO1798EAst/QHtUMZNiY+N8dexgXNC
879pBWbIEoobKV+rh/bCZlEZupcPooV0+5j1HtKEDpmTetaLbP6fDjvSf4UT
zxE46e4f7Ek8X6i4JXwJEXNh3DujFQk8Zc35rtO389CnuWkkP2z93yqw8+bT
0922/0/ng/R45L4X1hQ6SzJY4ynLbfr59fcoHqmcU3aW+P3z/zz1TexuEJJp
+e8X8LDq15y+ccnIm+aHJ/XcGmKC8FTF9dUK1zbjSu6Gx9GEffeERSeBGwcO
5Ky+thlV0fzt5avwP+5MGSf97N2XLCVO2DmupqNM/L5iixEF/zLC/uauvofh
PC6MonOl6fC702W0Ir4TzZkZPzOuzlvobhDeP0dL74nzQkYdbV/LUW4d2OnK
Edd4Roz/aHgvaUc6nOq35EYoGa+TdL8XaDvabbp/JqaXMll2WjZYkL937uEt
2R1E3rD6/T9CWuXv
      "]], {}}},
  Boxed->False,
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImagePadding->Automatic,
  ImageSize->{153.90073560096897`, 426.62978945383173`},
  ImageSizeRaw->Automatic,
  Method->{
   "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}},
  PlotRange->All,
  PlotRangePadding->{{
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-3.080204683828174, -1.295560408996745, 0.5327873237635894},
  ViewVertical->{-0.7625017551969397, -0.19301186668710568`, 
   0.6175252971656667}]], "Output",
 CellChangeTimes->{{3.801032959343029*^9, 3.801032972081943*^9}, {
   3.801033018509736*^9, 3.801033035531168*^9}, 3.801033109908179*^9, {
   3.8010331470757017`*^9, 3.8010331951980176`*^9}, 3.801033247561904*^9, {
   3.8010334130900154`*^9, 3.8010334928827906`*^9}, {3.8010335300992084`*^9, 
   3.801033607780884*^9}, 3.8010595961690135`*^9, {3.801059789392993*^9, 
   3.8010598862429676`*^9}},
 CellLabel->
  "Out[441]=",ExpressionUUID->"a61f9b9f-d80c-4fc3-96d5-617b99fae914"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"{", 
   RowBox[{"0", ",", "0", ",", "2"}], "}"}], " ", "+", " ", 
  RowBox[{
   RowBox[{"Sqrt", "[", "5", "]"}], " ", 
   RowBox[{"{", 
    RowBox[{"0", ",", " ", 
     RowBox[{"Cos", "[", 
      RowBox[{"Pi", "/", "4."}], "]"}], ",", " ", 
     RowBox[{"Sin", "[", 
      RowBox[{"Pi", "/", "4."}], "]"}]}], "}"}]}]}]], "Input",
 CellChangeTimes->{{3.801060491911869*^9, 3.8010605276931276`*^9}},
 CellLabel->
  "In[507]:=",ExpressionUUID->"8bdecc3f-ec6a-4533-8bd1-fe129d0449ca"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "1.5811388300841898`", ",", "3.58113883008419`"}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.8010605215196466`*^9, 3.8010605284391584`*^9}},
 CellLabel->
  "Out[507]=",ExpressionUUID->"cddc86e6-6b84-41c4-ba47-9f25747add26"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"t0", "=", 
   RowBox[{"Tube", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "5"}], "}"}]}], "}"}], ",", "0.3"}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"t1", "=", 
   RowBox[{"Tube", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "2"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0", ",", "1", ",", "4"}], "}"}]}], "}"}], ",", "0.3"}], 
    "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"t2", "=", 
   RowBox[{"Tube", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "2"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0", ",", "1.5811388300841898`", ",", "3.58113883008419`"}], 
        "}"}]}], "}"}], ",", "0.3"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"{", 
  RowBox[{
   RowBox[{"Graphics3D", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"Orange", ",", "t1"}], "}"}], ",", " ", 
     RowBox[{"Boxed", "\[Rule]", "False"}], ",", 
     RowBox[{"ViewPoint", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"-", "10"}], ",", "0", ",", "0"}], "}"}]}]}], "]"}], ",", 
   RowBox[{"Graphics3D", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"Orange", ",", "t2"}], "}"}], ",", " ", 
     RowBox[{"Boxed", "\[Rule]", "False"}], ",", 
     RowBox[{"ViewPoint", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"-", "10"}], ",", "0", ",", "0"}], "}"}]}]}], "]"}], ",", 
   RowBox[{"Graphics3D", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"Orange", ",", "t0"}], "}"}], ",", " ", 
     RowBox[{"Boxed", "\[Rule]", "False"}], ",", 
     RowBox[{"ViewPoint", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"-", "10"}], ",", "0", ",", "0"}], "}"}]}]}], "]"}]}], 
  RowBox[{"(*", 
   RowBox[{",", 
    RowBox[{"Graphics3D", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"CapForm", "[", "\"\<Round\>\"", "]"}], ",", "t"}], "}"}], 
     "]"}], ",", 
    RowBox[{"Graphics3D", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"JoinForm", "[", "\"\<Miter\>\"", "]"}], ",", "t"}], "}"}], 
     "]"}]}], "*)"}], "}"}]}], "Input",
 CellChangeTimes->{{3.8010600437067885`*^9, 3.801060227752406*^9}, {
   3.801060266312229*^9, 3.8010603268482447`*^9}, {3.801060368111866*^9, 
   3.801060379350788*^9}, 3.8010605378320217`*^9, {3.8063908483702965`*^9, 
   3.8063908959779797`*^9}},
 CellLabel->
  "In[1164]:=",ExpressionUUID->"c87d01c6-9124-4cd9-a12a-05c8c7d9d291"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   Graphics3DBox[
    {RGBColor[1, 0.5, 0], TubeBox[{{0, 0, 0}, {0, 0, 2}, {0, 1, 4}}, 0.3]},
    Boxed->False,
    ViewPoint->{-10, 0, 0}], ",", 
   Graphics3DBox[
    {RGBColor[1, 0.5, 0], 
     TubeBox[{{0, 0, 0}, {0, 0, 2}, {
       0, 1.5811388300841898`, 3.58113883008419}}, 0.3]},
    Boxed->False,
    ViewPoint->{-10, 0, 0}], ",", 
   Graphics3DBox[
    {RGBColor[1, 0.5, 0], TubeBox[{{0, 0, 0}, {0, 0, 5}}, 0.3]},
    Boxed->False,
    ViewPoint->{-10., 0., 0.},
    ViewVertical->{0., 0., 1.}]}], "}"}]], "Output",
 CellChangeTimes->{{3.8010600522848635`*^9, 3.8010600588393254`*^9}, {
   3.801060092030486*^9, 3.8010601628677945`*^9}, {3.801060196850005*^9, 
   3.8010602284774666`*^9}, {3.8010602746708355`*^9, 3.801060327309017*^9}, {
   3.8010603693435698`*^9, 3.801060379828519*^9}, 3.8010605385899925`*^9, {
   3.806390882083132*^9, 3.806390897033185*^9}},
 CellLabel->
  "Out[1167]=",ExpressionUUID->"ed4ee5a3-608e-451e-9840-d30f8cec528c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"small", " ", "=", " ", "120"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{" ", 
  RowBox[{"p", " ", "=", " ", 
   RowBox[{"ParametricPlot3D", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Cos", "[", "t", "]"}], ",", " ", 
         RowBox[{"Sin", "[", "t", "]"}], ",", " ", "z"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Cos", "[", 
          FractionBox["t", "small"], "]"}], ",", " ", 
         RowBox[{"Sin", "[", 
          FractionBox["t", "small"], "]"}], ",", " ", "z"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"1.001", 
          RowBox[{"Cos", "[", "t", "]"}]}], ",", 
         RowBox[{"1.001", " ", 
          RowBox[{"Sin", "[", "t", "]"}]}], ",", " ", 
         FractionBox["z", "small"]}], "}"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"t", ",", 
       RowBox[{
        RowBox[{"-", "Pi"}], "/", "4"}], ",", " ", 
       RowBox[{"Pi", "/", "4"}]}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"z", ",", 
       RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", " ", 
     RowBox[{"Boxed", "\[Rule]", "False"}], ",", 
     RowBox[{"Axes", "\[Rule]", "False"}], ",", " ", 
     RowBox[{"Mesh", "\[Rule]", "None"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"Orange", ",", " ", "Black", ",", " ", "Black"}], "}"}]}]}], 
    "]"}]}]}]}], "Input",
 CellChangeTimes->{{3.8186944540592337`*^9, 3.81869479400799*^9}, {
  3.8226667442834806`*^9, 3.822666779690159*^9}},
 CellLabel->"In[18]:=",ExpressionUUID->"eb14a162-6bc3-470d-8809-b8a1a20c6cde"],

Cell[BoxData[
 Graphics3DBox[{GraphicsComplex3DBox[CompressedData["
1:eJyFmH+slmUdxg/qbMCGMDxCRBCLMRb4TyqpVBevhSUbiPxYVoOmCSqCthQV
ExXbzB8rycqQTkox2SRph4Fk7G03Hmlr6+TwjR/SQc1zDueI4AHCrQY0ejnv
c93M6/tc64ztbB+++z7X9/Pcz3Pu5x53811zFp3X1NQ07Pympvq/psGVET99
fl0Pvjyld2r9dxr39swtZ84cTVecmPKL1y84hKuOXbp93YmuzJuePH7XgpGH
sWjhlv/eeuF7mV+yYfur1d1HcMctd1y0Y2dH5qcHdL814/I+7PvjpudmfHZP
5g/NvnRgy+ePYsYz3S+s/kF75pO2f+vHK9uP4putO/u2vFQ9d93+n2NoKn5M
PUx/mDww+WHmhfGTufh0PC2+p/W5bcsOB8/k6plcPZOrZ3L1TK6e83XFs6mH
6Q+TByY/zLwwfjJXz4anjYOHP7Ksoyd4JlfP5OqZXD2Tq2dy9ZyvK55NPUx/
mDww+WHmhfGTuXo2PPX9dvni8dd1Bs/k6plcPZOrZ3L1TK6e83XFs6mH6Q+T
ByY/zLwwfjJXz4anRf3rvCN4JlfP5OqZXD2Tq2dy9ZyvK55NPUx/mDww+WHm
hfGTuXo2vFg/NbOea2Y918x6rpn1XDPruWbWc82s51AP0x8mD0x+mHlh/GRe
vp4DL+ZqM57bjOc247nNeG4zntuM5zbjOdTD9IfJA5MfZl4YP5mXew48cQ71
TK6eidUzuXomV8/k6rnpYz/nPJv6/P/q2eTJXD2beTNXz+Tq2XCuH5j1DLOe
YdYzzHqGWc8w6xlmPWs9TH+YPDD5YeaF8ZO5Wc/K+T40nmvGc814rhnPNeO5
ZjzXjOdQD9MfJg9Mfph5Yfxkbt7PwXPx9zF4Jjf7jeCZ3Ow3gmdys98Ink09
TH+YPDD5YeaF8ZO52W+Y9dxp1nOnWc+dZj13mvXcadZzp1nPnWY9h3qY/jB5
YPLDzAvjJ3Ozfw6ei++X4JncfA8Gz+TmezB4Jjffg8GzqYfpD5MHJj/MvDB+
Mjffg8Fz8T0ePJOb843gmdycbwTP5OZ8I3g29TD9YfLA5IeZF8ZP5uZ8I3gu
zpeCZ3JzXhc8k5vzuuCZ3JzXBc+mHqY/TB6Y/DDzwvjJ3JzX4doN3x4180Av
blgy6+Arcw6mnRMfntCx7cOwryaXeph6mHr2CfeX3PQP3OXnOaSpD3mcH173
4qdemfm3ab3oXnD+rn+eOpj+9WjP0mUdfUk4DGe99mF98OD6M7/2d/nNdZM7
v+V1TZ6Qn9e9bP6Y5r/Xf+/bdfNtb7/xAL8n05Cn9px5p84XnLf3wftO3pv5
N16c0nyozieO/sq0oRPuznzi0Mr843X+8sLf7bl+/Z2Zr5rzUfp3nX9p+/dv
X3lycebXDJk9/3Sdf2fWrTfOXb8w88ub5jWfzXVi7iVXzVs/K3N9Tk09TP/M
JU/mkj9zmTdz8ZO5+HQ8Hahvrs6eA6tncvVMrp7J1TO5eiZXz+Tq2dTD9IfJ
A5MfZl4YP5mrZ8PTq2dxR0/wTK6eydUzuXomV8/k6plcPZt6mP4weWDyw8wL
4ydz9Wx4+vn46545ew6snsnVM7l6JlfP5OqZXD2Tq2dTD9MfJg9Mfph5Yfxk
rp4NT+/2r/OO4JlcPZOrZ3L1TK6eydUzuXo29TD9YfLA5IeZF8ZP5urZ8PRs
v/9a8EyunsnVM7l6JlfP5OqZXD2bepj+MHlg8sPMC+Mnc/VseFrbz9uCZ3L1
TK6eydUzuXomV8/k6tnUw/SHyQOTH2ZeGD+Zq2fDi3laq+X7utZq+b6utVq+
r2utlu/rWqvl+7rWavm+rrWqnk09TP/My/d1IX/m5fu64Cfz8n1d4OnJhn+o
Z3L1TK6eydUzuXomV8/k6tnUw/SHyQOTH2ZeGD+Zq2fD008a75PgmVw9k6tn
cvVMrp7J1TO5ejb1MP1h8sDkh5kXxk/m6tnwtK/x9zF4JlfP5OqZXD2Tq2dy
9Uyunk09TH+YPDD5YeaF8ZO5ejY8rW7s94JncvVMrp7J1TO5eiZXz+Tq2dTD
9IfJA5MfZl4YP5mrZ8PT1sb3S/BMrp7J1TO5eiZXz+TqmVw9m3qY/jB5YPLD
zAvjJ3P1bHh6q/E9HjyTq2dy9UyunsnVM7l6JlfPph6mP0wemPww88L4yVw9
G573qea8LngmN+d1wTO5Oa8Lnj/uN5zXBc+mf+bmvC54NvNmbs7rgmfyr780
fvr+Oj/SjXUbu+9Pd55d5ts+DPtqcqmHqYepT0sbPNxfcu3vuMtf8JDT8OT8
8LoTJrdP3Vvnras/N3Tn/hXpD/3vgb4kHIanxp/BPu0DcvXg+jO/9nf5zXWz
H63ndTWPy8/rrp369PW3b+jh7zSs/2dVuqJl7fBJgw9hQHvz96r/6cr88ckv
Dpk59jD2t2zqfH3Qe5lP3vTncWMOHMHq6tPjD/y1I/MnFrzztQu/2IePDv/j
4q0T92S++N2//HLN1UdxZunwH3U82p75fZVnfvib3Udx8o1jGwZtrma+pHrP
z0ZecO45NfUw/WHywOTPXObNXPxkLj4dT2N2Vz69u7IyeCZXz+TqmVw9k6tn
cvVMrp5NPUx/mDww+WHmhfGTuXo2PI167KaRj910f/BMrp7J1TO5eiZXz+Tq
mVw9m3qY/jB5YPLDzAvjJ3P1bHhqvnLV8CtX3R08k6tncvVMrp7J1TO5eiZX
z6Yepj9MHpj8MPPC+MlcPRuexvWv82XBM7l6JlfP5OqZXD2Tq2dy9WzqYfrD
5IHJDzMvjJ/M1bPhaUS//+8Gz+TqmVw9k6tncvVMrp7J1bOph+kPkwcmP8y8
MH4yV8+Gp9H9fG7wTK6eydUzuXomV8/k6plcPZt6mP4weWDyw8wL4ydz9Wx4
sY+qVMv3dZVq+b6uUi3f11Wq5fu6SrV8X1eplu/rKtXyfV2oh+kPkwcmf+bl
+7rgJ/PyfV3gaXDDP9QzuXomV8/k6plcPZOrZ3L1bOph+sPkgckPMy+Mn8zV
s+Hposb7JHgmV8/k6plcPZOrZ3L1TK6eTT1Mf5g8MPlh5oXxk7l6NjyNbPx9
DJ7J1TO5eiZXz+TqmVw9k6tnUw/THyYPTH6YeWH8ZK6eDU/DGvu94Jk8vJ8L
Ht7PBQ/v54KH93PBw/u54OH9XF4P0x8mD0x+mHlh/GQe3s/lPDU3vl+CZ/Lw
nVLw8J1S8PCdUvDwnVLw8J1S8PCdUl4P0x8mD0x+mHlh/GQevlPKefpk43s8
eCZXz+TqmVw9k6tncvVMrp5NPUx/mDww+WHmhfGTuXo2nOdj8b1RcHNeF98b
BTfndfG9UXBzXhffG+X1MP1h8sDkz9yc18X3RsHNeR26jr/8+9s6e3F686dW
TrrxYPrMqc1jT21+OOyryaUeph6mPo1p8HB/ybW/4y4/zyFNfcjj/PC68yav
Gfratb346vSubasG9KTZn1he//dI6DN605ujNr35QJJ6mHqwXvuMaPAwF58L
7WPq83Nk8itnznBdnjeG+1Jw7f9C74rne1c8FNYPPWh9S6M+5HGc91H7uPto
5s3rxNSH+/h/5nI5cUP7kntfG/sB3n929tVfeKIzP0f6HiPvbrts17QV72Pv
1ul/enxjt/OZ80h/mP4w/V2f/DyGc/uCa07eL81j+sD0yfc9fO+b5+vXOwa2
7Bj4YPDG+6hzsU84hym49mF/7cP186tty5sHrTmErpYDt3xwTZe9Lp9T5XxO
tY/xmZ9HrWfO/wHx6rgp
    "], {
     {RGBColor[1, 0.5, 0], EdgeForm[None], 
      StyleBox[GraphicsGroup3DBox[
        TagBox[Polygon3DBox[CompressedData["
1:eJwBCQX2+iFib1JiAgAAAKgBAAADAAAA4gIRESEgEwMEFAQFFQUGKhobFgYH
GgoLGwsMGAgJHAwNGQkKHQ0OIBARIRESIhITIxMUJBQVJRUWJhYXJxcYKBgZ
KRka7+XkFwcIgHBxKxscLx8gMCAhMSEiMiIjLBwdMyMkNycoOCgpNSUmOSkq
OiorOyssPCwtPy8wQDAxLR0ePi4vRzc4QTEyQzM0RDQ1RTU2RjY3QjIzNiYn
SDg5bV1eSzs8TT0+Tj4/Tz9AUEBBUUFCUkJDU0NEVERFVUVGVkZHV0dIWEhJ
WUlKWkpLXExNXU1OXk5PX09QYFBRYVFSYlJTY1NUZFRVZVVWZlZXa1tcZ1dY
aFhZSjo7bFxdbl5fb19gcGBhcWFiaVlacmJjc2NkdGRldmZnd2doeGhpempr
STk6e2tsf29wdWVmfW1ufm5vfGxtECAfNCQlEgIDhHR1hXV2jn5/g3N0hnZ3
nIyNjX1+inp7h3d4j3+AjHx9kICBmYmKk4OElISFuKipkoKDlYWGloaHmoqL
m4uMmIiJuamqi3t8iXl6nY2OoZGSopKTqpqbq5uco5OUpJSVqZmap5eYoJCR
t6eorJydrZ2etKSlsKChn4+QkYGCr5+gxra3rp6fsqKjtqanno6Ps6OksaGi
gXFyuqqr4NDRva2uvq6vx7e4vKytv6+wwLCxw7O0xbW2wbGyybm6wrKzgnJz
0cHCzLy9zb2+1cXGy7u8zr6/z7/A0sLD5sXU0MDByrq7yLi51sbH18fI2cnK
2srL28vM3MzNu6us3c3O7ejS4+IQ38/QAhIRAxMSBBQTBRUUBxcWCBgX2MjJ
BhYV3s7PCRkYCxsaDBwbDR0c5B0OChoZgpKREiIhqbm4FCQjFSUkFiYlFycm
GCgnGSkoGiopGysqHCwrHS0sHy8uIDAvITEwIjIxIzMyJDQzJTU0JjY1Jzc2
KDg3KTk4Kjo5Kzs6LDw7Lj49Lz8+M0NCMEA/MUFASVlYNERDNkZFN0dGOEhH
OUlIMkJBOkpJO0tKPU1MP09OQFBPQVFQQlJRSFhXQ1NSR1dWPk5NRVVURlZV
RFRTNUVESlpZbn59TV1cTl5dT19eUGBfUWFgUmJhU2NiVGRjVWVkVmZlV2dm
WGhnWWloW2tqXGxrXW1sXm5tX29uYHBvYXFwYnJxY3NyZHRzZXV0ZnZ1Z3d2
bHx7aHh3anp5TFxbbX18b39+cIB/cYGAcoKBa3t6c4OCdISDdYWEd4eGeYmI
eoqJe4uKgZGQfIyLgJCPdoaFfo6Nf4+OfY2Mg5OShJSThZWUipqZhpaViJiX
n6+ui5uajZ2cjp6dj5+ekKCfiZmYjJybkaGgk6OimamolaWkl6emmqqpm6uq
nq6tlKSjnKyrna2skqKhEyMioLCvorKxp7e2o7OypLSzobGwqLi3qrq5q7u6
rLy7rb28pra1rr69r7++sMC/ssLBs8PCtcXEtsbFmKint8fGu8vKscHAucnI
usrJuMjHvMzLvc3Mvs7N8OfmwNDPwdHQxdXUxtbVydnYy9vax9fWyNjXwtLR
ytrZzNzb5OUezt7dz9/e0ODf6ODRxebE7uriHeQezd3c8u7j6+QOEOIRpZWW
7ObU7/MPv8/O4uoC0ujR8+/r9fHt9+8P9PDs9u4B4+7i8eno6Ong6+/k+PDT
8PTT+fHh7vIB8fXh5ufE7vbq8Pjn7PDm7fHo7/fl8fnpqJiZp/xeKQ==
          "]],
         Annotation[#, "Charting`Private`Tag$2746#1"]& ]],
       Lighting->Automatic]}, 
     {GrayLevel[0], EdgeForm[None], 
      StyleBox[GraphicsGroup3DBox[
        TagBox[Polygon3DBox[CompressedData["
1:eJxNmHm4TlUUh+9OKs1lqpQiDdJACpUQZajIFJpRhoQGRJQhFSkRUkpSLjJ2
JdGkNJlKSgkNaBCa1J9NWu/zvec5/ljP+vbea6/1rn2+7+zfvVW63t62735F
RUUvpqKiUuE7hu8R1j3s0LB/Yu7fsIPj83Fhx4Z9Ffa3c1XCjgo7OuywVIj9
L+yI+Lw3fFH4I1PBJ2Px+7kHXyrsEHNS7/BUyMH+sq7vH1Y+rHTYAWGV3APj
zrBvw76Rr0wqsB3vOlwn6Ml9kkywVDDfgWGVXYf9RD1x5axP7UFhPcNuDatq
DzBWMw7G6nJwXqc4R51T9RXDTnYfe84wlp7OlBves/Rwna2H6xw9fZwedoz1
ajrHM6mlh/FcPTXPkxWu8/Vw1Q07zXz19NXlOtizvsA5eBvIBEttc5O3vj3A
frGeuIvCarhWw17ps6E5YL9EbnibyQRLE2vAfqke9uauw9VCf2HYlXJQv5Ws
1LncdViu0BPXNKyO9a53f0vtYvdf5x7Wrg67zH1t5G4c1lYPbwfX6aOjHt5r
5SBX67BG7u/kOn1coyfuKtmJu0EmerpRz/odYZ3Dulj/XM+rq0ztwm4ylpq3
hLW3j+6ywnirtWHs5jprPVyHsaf+Gmu29gy66KnXyxyc2W16zvVO4+Dqaw9w
3a4nX7+wm2WkZ74XfCf6OwfX3XLD1dvcnE0fPXkHGEvcQGN7ehY8H75H99gz
vENkJd995oJxcdiMsOKwh6xNvnuNJW6osfQxynXeEw/KwZ77w+6yv2HG8txG
GwvLA/bJnsnWI9/EsJGujwkbLO+jcsA7Vg/LY3rqPGxu9oxzbnjYJPPB+ISe
ehNkpd7jYSP2GfeTb7jsPM8nZaSPp+V7JOwZPYzPygfXFJmIm+r6WM94olzT
jIV3eth4WV4Ke865YmNhn6nnzGbp4ZpvDeqXuO/5sDlyPC3jEM+RO/Ap114O
e0Gu2eZjbZ69kXeBuae5NtreFlmH/XOtwx7ePbw7ef+tD3snbEXYprBVYavD
XrUHai7Vw7VMD/trenK/rofrDT19v6mHcXnYQs/vbX2J9UvkXaGn73f1fPff
078S9r5+SdgHeng/1MO7Ur/MnpbJu1oP7xo9vGv18G6V9eOwdX6G9xM9vJ/K
CuNnehg3ykH9Dc7B+7k+453p+X5pLIyb5YNrR9h2ub5OBa2DnkCbcAdyF35h
PuqhV9AYrKF90BiM/1PHMM40EHoi00CMMw3EGI1T1jFnXCwruqOca+gb9ANa
Za8aixoHOI/O4HfO+4x3WWnnytkDGgGtwPuUO6eR3NzFx8mEfkBb8JvgtzHG
GmgPtEimG86Tu4p74EMDVLVeNcfl3VMt5RrolJRrrMr2XNVc8KE9TpOJ30v1
lOsetAS6IdMRmU46U46axmUaqKa14a1trzXMm2mjWrLWdnysNeHgnucebC8T
GqGO6+iNeinXOvXNe6Fr1LnIcaar6tpDA/fU9Dk0tHZjnw0sTRxnuqeJfdY3
LxxNZSRvM8fUae6Y2uiIFinXPZeb40rHcLR0nGnNs2Rs5Vqmb9qkXG81lx0N
cJXcbRw3dK6Vz6Oh+eihnblg7eD5ZroHbcH9zX3aJ+X6qYPc1xoH93WOqXOT
+zIt0tl+rjcu00w3yN3JvJn+6Ct3Z+fg62ou+NASt8jR3XGmOXrLhJboKVMv
x+3dd3PK9VOPlGujXjL2dtzSvMzxHuG7XkkO7lvuXe5g7u6R8t5hD3ChNQZY
j/v6LusNdA0m9MAga3LvDZFrkHEwDTbuNtcH20d/83azTn/P4D5zcY5DHbP+
oKxwoCNGuH+kY5geMi77O+14OUa5Bgf36mj7HGYN+h7ueJDro2Qd4x6Y0Bi8
y7I77L2U66SxsqA9JphrnGuwojvG28Mk4zLNNMma3P1PWpO7forck40b5fpk
e55gXvZxp8+Wdco+uZibZRxaYrqs6I2p8k1zTL4XjINvhuNMD830DNj3jNzF
xmX6qTjlui3rYY58jOc6zrQFd3Z293MXosvQFQvNMc89cJe4BhO6YpE1l/hM
nneuRKbFxhW7vlj2+eal5wWOZ8mxJOWa6VU50A9vpVwnvZZynfR6yvXQcp/x
dPvItNHbKddDK1Kuw5amXIctS7l+eiflmundlOuk91OujTivTK/zTHaFbUsF
7ZPppFUp10mr5UMPfZxyPbQu5Rro05RrnQ1yrDduhevrU6631si4wf0wfuF+
NAb/S6koLzppo0ybHMO02fF2P6+Rc6tn/lPY96mgnyqYt6L9b7Tez8ahs34w
Bm1Txn1oLb4zfL/5Xv9ofs6B//n8EnZQyrXmSvdRF722Vr41xu60zm9hu1NB
6+1xnjy/+jyo87tsfxUV+H4yN/u+M+92P2827057+MM8H+l/9fOf7t9ivp/N
v1umLfa3bZ8z/N1+dpl3m3y7jN1hzu3W3+Pz2209+Ph9Pe45/g+6QVJT
          "]],
         Annotation[#, "Charting`Private`Tag$2746#2"]& ]],
       Lighting->Automatic]}, 
     {GrayLevel[0], EdgeForm[None], 
      StyleBox[GraphicsGroup3DBox[
        TagBox[Polygon3DBox[CompressedData["
1:eJxNmHm8V2Mex+99fpfptt1bJI1JapKsUU1kLLlS9pRiaowUku1GhbGTJVuT
JluWhNBCtigGETJDlkiRfalUaKJyb+nm+36d93n9+uP7es7zfLfP5znn/J7P
77QePKxPdSopKVlTWlJSiPHqmIwLuzXsD7FQG+PCsMq4bhJWiOuasHURXxbj
jmGNwyqID/s11mvCyuO6NsYNYY3ielOMdWEN4npjjL+FbR3X60uznPopi8VX
L2U1yG+Ysljyt7IvOfSk3mZ8xEAirLk4qLG9I1i2S1k/fNumDDv16hWy623w
x/VWYd/GdQvzwFU/1srDvo7rb8IWhy0Ka5kybmDZIWXcwPsnR3x/tAa+ZvYE
R+uwJmFNw/YN2yWsfdifxQLGnc3ZTn9zObXVj28fa7Uxf3ux72ZvcO3uCK52
1qPWnnLgHu7l2CpsV2uQv3fYTvboaB8wXhM2Imxk2F/ESu1O+sHY2RHffuKj
dhdjd7FeUzl31Q/2bvaG34FiBeNf5bNH2AGO+PY3D9/BYR3M30Pe8DzEevA4
VKxg7CEm7sNh8mHe0zWwDw7rE3Z82JH2A8vR4gBjb3tUhfUSBzyOkBs5x4Yd
pO8oa5B/nLHkH27PrvasEu/xjt3DBoiDGn93BEt/++E7UQ7UO0GePc3vLM9/
hB0jrn7yJ66vccwHyQ0sA+UG3lMc8Z1sjV7i7ej+nipu6l0cdmbYWWFniO9v
YUPEx3yoa/A4zTxwnRN2knir7QeW4d4b+pwnpkH2GODeDDMW37nWIP98YweL
q785I6xH/5GOp4ddJg5qXO4IlkvDztb3TzlQ7yJ5DjW/nzyvMA9cF8qfuAuM
Yz5KbmC5Sm7gvdoR35XWwMd7w/PCc3OtuKl3vT3AcoP4uA+jXWN+U9gl8ng4
7PawO8LGyBO8Y+0HlvEpe//pM05M4L3FPSLnVmPx/csa5P/bWPJvtic5t1nv
OvtfJ/aJ5tP/fkdq3yc+fHfLgXoTwm50/og87gybZN4456Pdjzvsw3yyOOj/
oFjh+pAjvgesge9eOYNjSthd9n85bEbYE2HTxHdP2GPm3Kd/opym68fXKM6Z
qTHONv9+sT9lb3A97Qiux61HrZly4B4+68gePGkN8r8T66yw51PWa5r7zfPC
s/KiWKn9gn4w/scR3xzxUfslY2dYb4KcX9EP9s1yejNsmfheD5srn2fCXnOE
x6vm4StFmIR9HNf/tQ7Y/+cIxrccwThfDuB61/sB3vfFRO139ONDE3Aeci4u
0A+u1WFfhi0J+yHso5RpofesR6116hI0xHo1DfNC4E2FjBP6hh74atQ3zGvV
Sczr1DRoBrQM15vVQ2gHNMQmtVSuiRjxodHQZGizupTpoUX2g1Mz8aEZOGfR
MWiPlDJdgwbiDN6gDiuXQzNz3nZfX0xFXdVcTGiEFqmoe3Ywv4VxDVwjDl2F
xqiQZ0tzGrveUlxojZ3sgUZoJxZ0RFs5oDHaiK+t86autZZ3O3M4TzgDjxBT
e+uCCc2wq/3QCx3M38c5+NAQu6eiTsp10576Wlijvf07mk8P9EMXcXDedhZr
J+NyndQpFbXabmLvYg7vBO/6ZHvsZ13i0BRd5dZfrrk2QlvwXr7kvQMT+qKb
/dASVdZjf3qKqco4NMQA68L1QOuCCV3QXRzk9ZBHd+vubZ9cizEetAXWw1NR
0/Qxr6/zKtd6m4OuOEZMrKE5ct0zwFrwzvUO4wnuzZH2A/fRqai5jtIHj372
7mFeP/H22qI3mgH9gS7gTB6uH12Ra5+Tjcu10UBz0AVny438wfbgrD/N/UUv
DBU7WmCIe0DsIHENMaeveafKe6g5vY09xX05y7pgOlccYKx2nuubEeagI4ZZ
43znA12rFstwfWDhrMg1ywXWyrXRZXLmfL9EjGiNi8R0sfMzXKMW5we/xzyv
3dxH9riL9+Yw+3BWXStudMSoVNRGV1nreuOoPdo5mDiv0QnoEbTDGI0zND/P
Ge8RNzriRnnc7BzcN1j3PHteKe8x1hgpxmvcs1HiAwea43b9aIrx+tEU48wZ
75zz+rmwR+0PrrvtiZ7JddlY+dykf0Iqaqnb5MDaXeK+UxznuC+XpqLGQkvk
OuMp6050j8CHjsj11CRz6IPemGyPKWJmL9EL0+33iHHV3oPL5fmgdcGO3pgq
1+nOJ7g2RT70yXXZQ+aD73H7oaNmGU8eOmF2KmqjmfaD35PWYy3/rX1G/tTi
tzPXPowvuB8z7DfJGrlee0LfNGPpPcz7BGfOa76trC3N8tAR6Am+X3D2c+6X
hX95yrQHONAjuSZ61Rw0EbpqXirqIfQR7w/6Zr6cWUN3rQj71Jq53porJ874
t+Q633muq6j7fdgnKdNgy8xlv3hf37Xf5ynTHfBYF7bK+Y9hX6VMP6GJFth3
Q9jKlGmqJWL7IOwne/Hcf2HPee7Re/ZjD6iTa7r39W2092LrLDUfPbbE+uz9
Zynb/y/kRswar1n7f8q+9cDpZ/cOLfidNZ8TO1oKHbXW+NKUPXPEPeoeoHsq
5P+VfD83nv1pYh30y47G8x3mF+N/Kc16UpNnGj281OtnvR8zxbfCvWRtufdp
tdevOy7zer1830iZvl0pl1+t82HKnuU53uePjCOmTm7w4rsZ15Up+1ZGnYLY
P5PvSnMXuv6jvJaLb4n4V4vtG+8B+1mh/p+V74d1F3uv2cOG4W9QyHTw93L7
RB4/y2WV8ZXWX2uNFXL+1Nw17kml9dDOPKu18uId3ST3RV7zzDfWV2GfjfZa
aX5BTDyXH5tXZ3ytMQvlwpznkzi4z3MfGm/xzjO+Ka86sRBb6l5x73nf5lq/
oXyW+gxRm2eNb56tjOU94R0p85oaC/SxzlqZ79Iq731eg+tK68ORd4Rnmv8X
23jPePfgyLfkSv97oHnRZOg1fvM55zhDl4vjNePL/f7MHvD7zm9bI/cEvlOd
8/7xLDT0N7bGOf/VeM/K/b+z2VqzvUf1C0V/fXvVE2eZe1vh/tf4fOR4KsRQ
7ndy8n4HsmDFVQ==
          "]],
         Annotation[#, "Charting`Private`Tag$2746#3"]& ]],
       Lighting->Automatic]}, {}, {}, {}, {}, {}, {}},
    VertexNormals->CompressedData["
1:eJztmmtIU2EYx0+aQURqmHYlMLtI6BddI1n1KqGBpZkXNGsLxLvQ0OiipZl0
AS3QoA9FlCAKUwTJzBqCXdYXc2GUlmSSbraW5QWNYl7WOWGPpxdeds4Y5odn
CMOff57939/h7IPP8U/Txme4cRy3yp3j+B9uRcSaqrvVn8lepUXFv7dzc6+d
E8qbz5daSdhYsL56wgScKx/XqtcOkwxN80zWsgHgfnX6R21vv5G89DyvJ4YP
wKeXmN9HK0bIu8eNt6IDuoGXxAUvvxMySqJvmO9VnusEHqRPvV7cOUpSmwwj
zbq2+c/98xoj//7OlVL5v38vpeYDp/oAp/oDp84LnPIDnPLJ4ugZPaNn9Iye
0TN6Rs/oGT2jZ/SMntEzekbP6Bk9o+f/6Dmq7uj6mD4LOZwbO9QSPwTnYvmn
8gs2XyKXO4fVB/KrK1pijOEWYla7d32ams9T3Ok8y4Pc+XL7y73vWH1Ckjb5
vrGPkp6utOyPr4og71nRbe/nudqt5/wZ22ngybVKXyvPAzfuC/fedhJ4oHdE
0jjPGzUN3YdqTgAvjZ9s/8lzlb4gp9iWCTzCMy5pWpgfm5WSUKMBruASfe08
n0zwC0usiXV4n1J5OBc1HzjVBzjVHzh1XuCUH5ZP9Iye0TN6Rs/oGT2jZ/SM
ntEzekbP6Bk9o2f0jJ7R8yL0vF+3JbKX58NmUl1vPgvnYvmn8gs2XyKXO4fV
B/LbgzpVPTxvqtzhbegthDzFnc6zPMidL7e/3PuO1ceoupAp/B9+7h3yB/o9
Tgn7ndffKwbF+6/I1JVHhH1QudF/c7Zo/5V/7KVO2B89bciPEe+/rhB1l7Bv
sutyOsT7rxxrioewn7oY6WYS7780PunXhH1WmjY49IGE/ReVh3NR84FTfYBT
/YFT5wVO+WH5RM/oGT2jZ/SMntEzekbP6Bk9o2f0jJ7RM3pGz+gZPS9Cz5cD
/H4c7LMQxXF3r4ei57dZ/qn8gs2XyOXOYfWB/P0p41bhOe0Xrbts4ue9WXOo
vKv6O+2H1V9iT4efy5rPur5y+0jkTl9HiXmH30usvKGwbIPPuq9kdvfV+sJL
gw6/x5S5z8pmC76Q20WhraTW7LAnNd/h9wA13+U9XdVH7nWR2MdV5wJu6vil
LamykqgBRfLMHpPDvKvmsPK/Aev0R00=
     "]], {}},
  Boxed->False,
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImagePadding->Automatic,
  Method->{
   "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}},
  PlotRange->{{Automatic, Automatic}, {Automatic, Automatic}, {
    Automatic, Automatic}},
  PlotRangePadding->{{
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.822666845188654*^9},
 CellLabel->"Out[19]=",ExpressionUUID->"1fa9e82c-48cb-43f5-b867-12d2f4c01d5c"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.822666798488885*^9, 3.8226668016285114`*^9}, {
  3.822666842060021*^9, 
  3.822666843624837*^9}},ExpressionUUID->"ed0fba97-dcfe-4d1f-ae0d-\
5ac783c3fd0c"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<Figure 2\>\""}], "}"}], "]"}], "]"}],
    ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<curvature-cartoon.pdf\>\"", ",", "p"}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8226570995501795`*^9, 3.8226571219504585`*^9}, {
  3.8226667585294056`*^9, 3.8226668050114603`*^9}},
 CellLabel->"In[16]:=",ExpressionUUID->"d5e41d8c-5ada-4cca-a2f7-577ab0ad269c"],

Cell[BoxData["\<\"curvature-cartoon.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.822657128199746*^9, {3.822666763478195*^9, 3.8226668292157106`*^9}},
 CellLabel->"Out[17]=",ExpressionUUID->"a43cf1e1-5398-4bf3-b0bc-3e0d46786589"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"yStored", "[", "t", "]"}]], "Input",
 CellLabel->
  "In[1760]:=",ExpressionUUID->"e6f7aee1-2ac1-478d-9499-76e6f720e3e7"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Series", "[", 
  RowBox[{
   FractionBox[
    RowBox[{"\[Epsilon]", " ", "\[Epsilon]z", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", 
        FractionBox[
         RowBox[{
          RowBox[{"(", 
           RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}], " ", 
          RowBox[{"L0", "[", "t", "]"}]}], "\[Epsilon]z"]}], "+", 
       RowBox[{
        RowBox[{"L0", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"\[Epsilon]", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
    RowBox[{
     RowBox[{"L0", "[", "t", "]"}], "-", 
     RowBox[{
      RowBox[{"L0", "[", "t", "]"}], " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"\[Epsilon]", " ", 
         RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}]], ",", 
   RowBox[{"{", 
    RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.801048511381956*^9, 3.801048516550128*^9}},
 CellLabel->
  "In[1761]:=",ExpressionUUID->"57e14170-59f1-4b9b-bbb3-ffeb78ed7164"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   FractionBox["\[Delta]L0", 
    RowBox[{"\[Delta]L", "[", "t", "]"}]], "-", 
   RowBox[{"\[Epsilon]z", " ", "\[Epsilon]"}], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]", "]"}], "2"],
    SeriesData[$CellContext`\[Epsilon], 0, {}, 0, 2, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon], 
   0, {$CellContext`\[Delta]L0/$CellContext`\[Delta]L[$CellContext`t], \
-$CellContext`\[Epsilon]z}, 0, 2, 1],
  Editable->False]], "Output",
 CellChangeTimes->{3.801048516887225*^9},
 CellLabel->
  "Out[1761]=",ExpressionUUID->"426c8af9-1974-43b7-a9e9-b54712d3d33f"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"Clear", "[", "L0", "]"}]], "Input",
 CellChangeTimes->{{3.8010484924496145`*^9, 3.8010484942308483`*^9}},
 CellLabel->
  "In[1759]:=",ExpressionUUID->"ae46d016-9933-44a6-9af2-f4166e518f9d"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"\[Delta]l", "[", "t", "]"}], "  ", "-", " ", 
     RowBox[{"\[Epsilon]", 
      RowBox[{"(", 
       RowBox[{"1", " ", "-", "  ", 
        FractionBox["pf", 
         RowBox[{"(", " ", 
          RowBox[{
           FractionBox["\[Delta]L0", 
            RowBox[{"\[Delta]L", "[", "t", "]"}]], "-", 
           RowBox[{"\[Epsilon]z", " ", "\[Epsilon]"}]}], ")"}]]}], ")"}]}]}], 
    " ", "\[Equal]", "  ", 
    RowBox[{"\[Delta]L", "[", "t", "]"}]}], ",", " ", 
   RowBox[{"\[Delta]L", "[", "t", "]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8010485644011173`*^9, 3.801048586110178*^9}, {
  3.801048718672473*^9, 3.801048744359769*^9}},
 CellLabel->
  "In[1768]:=",ExpressionUUID->"1562143f-9fc4-4f0e-bd0a-e33cb67a4bd4"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"\[Delta]L", "[", "t", "]"}], "\[Rule]", 
     RowBox[{"-", 
      FractionBox[
       RowBox[{
        RowBox[{"\[Delta]L0", " ", "\[Epsilon]"}], "-", 
        RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "+", 
        RowBox[{"\[Epsilon]", " ", "\[Epsilon]z"}], "+", 
        RowBox[{
         SuperscriptBox["\[Epsilon]", "2"], " ", 
         SuperscriptBox["\[Epsilon]z", "2"]}], "-", 
        RowBox[{"\[Epsilon]", " ", 
         SuperscriptBox["\[Epsilon]z", "2"], " ", 
         RowBox[{"\[Delta]l", "[", "t", "]"}]}], "-", 
        SqrtBox[
         RowBox[{
          RowBox[{"4", " ", "\[Epsilon]", " ", 
           SuperscriptBox["\[Epsilon]z", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Delta]L0", " ", "\[Epsilon]", " ", "\[Epsilon]z"}], 
             "-", 
             RowBox[{"\[Delta]L0", " ", "\[Epsilon]z", " ", 
              RowBox[{"\[Delta]l", "[", "t", "]"}]}]}], ")"}]}], "+", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "\[Delta]L0"}], " ", "\[Epsilon]"}], "+", 
             RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
             RowBox[{"\[Epsilon]", " ", "\[Epsilon]z"}], "-", 
             RowBox[{
              SuperscriptBox["\[Epsilon]", "2"], " ", 
              SuperscriptBox["\[Epsilon]z", "2"]}], "+", 
             RowBox[{"\[Epsilon]", " ", 
              SuperscriptBox["\[Epsilon]z", "2"], " ", 
              RowBox[{"\[Delta]l", "[", "t", "]"}]}]}], ")"}], "2"]}]]}], 
       RowBox[{"2", " ", "\[Epsilon]", " ", 
        SuperscriptBox["\[Epsilon]z", "2"]}]]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"\[Delta]L", "[", "t", "]"}], "\[Rule]", 
     RowBox[{"-", 
      FractionBox[
       RowBox[{
        RowBox[{"\[Delta]L0", " ", "\[Epsilon]"}], "-", 
        RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "+", 
        RowBox[{"\[Epsilon]", " ", "\[Epsilon]z"}], "+", 
        RowBox[{
         SuperscriptBox["\[Epsilon]", "2"], " ", 
         SuperscriptBox["\[Epsilon]z", "2"]}], "-", 
        RowBox[{"\[Epsilon]", " ", 
         SuperscriptBox["\[Epsilon]z", "2"], " ", 
         RowBox[{"\[Delta]l", "[", "t", "]"}]}], "+", 
        SqrtBox[
         RowBox[{
          RowBox[{"4", " ", "\[Epsilon]", " ", 
           SuperscriptBox["\[Epsilon]z", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Delta]L0", " ", "\[Epsilon]", " ", "\[Epsilon]z"}], 
             "-", 
             RowBox[{"\[Delta]L0", " ", "\[Epsilon]z", " ", 
              RowBox[{"\[Delta]l", "[", "t", "]"}]}]}], ")"}]}], "+", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "\[Delta]L0"}], " ", "\[Epsilon]"}], "+", 
             RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
             RowBox[{"\[Epsilon]", " ", "\[Epsilon]z"}], "-", 
             RowBox[{
              SuperscriptBox["\[Epsilon]", "2"], " ", 
              SuperscriptBox["\[Epsilon]z", "2"]}], "+", 
             RowBox[{"\[Epsilon]", " ", 
              SuperscriptBox["\[Epsilon]z", "2"], " ", 
              RowBox[{"\[Delta]l", "[", "t", "]"}]}]}], ")"}], "2"]}]]}], 
       RowBox[{"2", " ", "\[Epsilon]", " ", 
        SuperscriptBox["\[Epsilon]z", "2"]}]]}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.801048586491187*^9, {3.8010487194633565`*^9, 3.801048745945497*^9}},
 CellLabel->
  "Out[1768]=",ExpressionUUID->"923d8738-1df4-48fb-b52a-d79bb421d227"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Series", "[", 
  RowBox[{
   RowBox[{"-", 
    FractionBox[
     RowBox[{
      RowBox[{"\[Delta]L0", " ", "\[Epsilon]"}], "-", 
      RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "+", 
      RowBox[{"\[Epsilon]", " ", "\[Epsilon]z"}], "+", 
      RowBox[{
       SuperscriptBox["\[Epsilon]", "2"], " ", 
       SuperscriptBox["\[Epsilon]z", "2"]}], "-", 
      RowBox[{"\[Epsilon]", " ", 
       SuperscriptBox["\[Epsilon]z", "2"], " ", 
       RowBox[{"\[Delta]l", "[", "t", "]"}]}], "+", 
      SqrtBox[
       RowBox[{
        RowBox[{"4", " ", "\[Epsilon]", " ", 
         SuperscriptBox["\[Epsilon]z", "2"], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"\[Delta]L0", " ", "\[Epsilon]", " ", "\[Epsilon]z"}], "-", 
           RowBox[{"\[Delta]L0", " ", "\[Epsilon]z", " ", 
            RowBox[{"\[Delta]l", "[", "t", "]"}]}]}], ")"}]}], "+", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "\[Delta]L0"}], " ", "\[Epsilon]"}], "+", 
           RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
           RowBox[{"\[Epsilon]", " ", "\[Epsilon]z"}], "-", 
           RowBox[{
            SuperscriptBox["\[Epsilon]", "2"], " ", 
            SuperscriptBox["\[Epsilon]z", "2"]}], "+", 
           RowBox[{"\[Epsilon]", " ", 
            SuperscriptBox["\[Epsilon]z", "2"], " ", 
            RowBox[{"\[Delta]l", "[", "t", "]"}]}]}], ")"}], "2"]}]]}], 
     RowBox[{"2", " ", "\[Epsilon]", " ", 
      SuperscriptBox["\[Epsilon]z", "2"]}]]}], ",", 
   RowBox[{"{", 
    RowBox[{"\[Epsilon]", ",", "0", ",", "0"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8010485995103445`*^9, 3.8010486167282743`*^9}, 
   3.801048664218179*^9, {3.801048724217635*^9, 3.8010487511934547`*^9}},
 CellLabel->
  "In[1769]:=",ExpressionUUID->"fe1bd151-e56e-4560-a470-3c472cf7d909"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   FractionBox[
    RowBox[{
     RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
     SqrtBox[
      RowBox[{
       SuperscriptBox["\[Delta]L0", "2"], " ", 
       SuperscriptBox["\[Epsilon]z", "2"]}]]}], 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Epsilon]z", "2"], " ", "\[Epsilon]"}]], "+", 
   FractionBox[
    RowBox[{
     RowBox[{"-", "\[Delta]L0"}], "-", "\[Epsilon]z", "+", 
     RowBox[{
      SuperscriptBox["\[Epsilon]z", "2"], " ", 
      RowBox[{"\[Delta]l", "[", "t", "]"}]}], "+", 
     FractionBox[
      RowBox[{
       SqrtBox[
        RowBox[{
         SuperscriptBox["\[Delta]L0", "2"], " ", 
         SuperscriptBox["\[Epsilon]z", "2"]}]], " ", 
       RowBox[{"(", 
        RowBox[{"\[Delta]L0", "+", "\[Epsilon]z", "+", 
         RowBox[{
          SuperscriptBox["\[Epsilon]z", "2"], " ", 
          RowBox[{"\[Delta]l", "[", "t", "]"}]}]}], ")"}]}], 
      RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}]]}], 
    RowBox[{"2", " ", 
     SuperscriptBox["\[Epsilon]z", "2"]}]], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]", "]"}], "1"],
    SeriesData[$CellContext`\[Epsilon], 0, {}, -1, 1, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon], 0, {
   Rational[1, 
      2] $CellContext`\[Epsilon]z^(-2) ($CellContext`\[Delta]L0 $CellContext`\
\[Epsilon]z - ($CellContext`\[Delta]L0^2 $CellContext`\[Epsilon]z^2)^
     Rational[1, 2]), 
    Rational[1, 
      2] $CellContext`\[Epsilon]z^(-2) (-$CellContext`\[Delta]L0 - \
$CellContext`\[Epsilon]z + $CellContext`\[Epsilon]z^2 \
$CellContext`\[Delta]l[$CellContext`t] + $CellContext`\[Delta]L0^(-1) \
$CellContext`\[Epsilon]z^(-1) ($CellContext`\[Delta]L0^2 $CellContext`\
\[Epsilon]z^2)^
       Rational[
        1, 2] ($CellContext`\[Delta]L0 + $CellContext`\[Epsilon]z + \
$CellContext`\[Epsilon]z^2 $CellContext`\[Delta]l[$CellContext`t]))}, -1, 1, 
   1],
  Editable->False]], "Output",
 CellChangeTimes->{{3.8010486079178534`*^9, 3.8010486174473267`*^9}, 
   3.8010486648774147`*^9, {3.8010487250005407`*^9, 3.801048752709399*^9}},
 CellLabel->
  "Out[1769]=",ExpressionUUID->"0d9546c2-bb53-4451-9e20-76ca370b2b81"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"\n", 
  RowBox[{
   RowBox[{
    RowBox[{"y", "[", "t_", "]"}], ":=", " ", 
    RowBox[{
     FractionBox["\[Delta]L0", 
      RowBox[{"\[Delta]L", "[", "t", "]"}]], "-", 
     RowBox[{"\[Epsilon]z", " ", "\[Epsilon]"}]}]}], "\[IndentingNewLine]", 
   " ", 
   RowBox[{
    RowBox[{"\[Delta]L", "[", "t_", "]"}], " ", "=", " ", 
    RowBox[{
     RowBox[{"\[Delta]l", "[", "t", "]"}], "  ", "-", " ", 
     RowBox[{"\[Epsilon]", 
      RowBox[{"(", 
       RowBox[{"1", " ", "-", "  ", 
        FractionBox["pf", 
         RowBox[{"yStored", "[", "t", "]"}]]}], ")"}]}]}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]A", "[", "t_", "]"}], " ", "=", " ", 
    RowBox[{
     RowBox[{"\[Delta]a", "[", "t_", "]"}], "  ", "-", " ", 
     RowBox[{"\[Epsilon]", 
      RowBox[{"(", 
       RowBox[{"1", " ", "-", "  ", 
        FractionBox["pf", 
         RowBox[{"yStored", "[", "t", "]"}]]}], ")"}]}]}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     SuperscriptBox["\[Delta]A", "\[Prime]",
      MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
    FractionBox[
     RowBox[{
      RowBox[{
       RowBox[{"-", "\[Delta]L0"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"g1", " ", "\[Epsilon]z"}], "+", 
         RowBox[{"g2", " ", 
          RowBox[{"(", 
           RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}]}], ")"}], " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"2", " ", "\[Epsilon]z"}], "+", 
         RowBox[{"\[Delta]L0", " ", 
          RowBox[{"(", 
           RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}]}]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}], " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
     RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}]]}], "\n", 
   RowBox[{
    RowBox[{
     SuperscriptBox["\[Delta]L", "\[Prime]",
      MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
    FractionBox[
     RowBox[{
      RowBox[{
       RowBox[{"-", "g2"}], " ", "\[Delta]L0", " ", 
       RowBox[{"\[Delta]A", "[", "t", "]"}]}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"\[Delta]L0", " ", "\[Epsilon]z"}], "-", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}], " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
     "\[Epsilon]z"]}], "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.8010483135124063`*^9, 3.801048469735392*^9}, {
  3.8010485252877474`*^9, 
  3.801048532272087*^9}},ExpressionUUID->"cf342844-47ac-47e0-8440-\
0dfcc6f9e830"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"L0", "[", "t", "]"}], " ", "=", " ", 
   RowBox[{"Exp", "[", 
    RowBox[{"r", " ", "t"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  FractionBox[
   RowBox[{"D", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"b", "  ", "+", " ", 
         RowBox[{"c", " ", "t"}]}], ")"}], 
       RowBox[{"L0", "[", "t", "]"}]}], " ", "+", " ", 
      RowBox[{"L0", "[", "t", "]"}]}], ",", "t"}], "]"}], 
   RowBox[{
    RowBox[{
     RowBox[{"(", 
      RowBox[{"b", "  ", "+", " ", 
       RowBox[{"c", " ", "t"}]}], ")"}], 
     RowBox[{"L0", "[", "t", "]"}]}], " ", "+", " ", 
    RowBox[{"L0", "[", "t", "]"}]}]], "//", "FullSimplify"}]}], "Input",
 CellChangeTimes->{{3.801049064072296*^9, 3.801049142888375*^9}},
 CellLabel->
  "In[1775]:=",ExpressionUUID->"978402d8-48f8-4692-8e2f-54d8fd903ada"],

Cell[BoxData[
 RowBox[{"r", "+", 
  FractionBox["c", 
   RowBox[{"1", "+", "b", "+", 
    RowBox[{"c", " ", "t"}]}]]}]], "Output",
 CellChangeTimes->{{3.80104913670492*^9, 3.801049143144689*^9}},
 CellLabel->
  "Out[1776]=",ExpressionUUID->"dd1cc84f-76f7-44f9-93e7-d387062a57e2"]
}, Open  ]],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"c", " ", 
    RowBox[{"L0", "[", "t", "]"}]}], "+", 
   RowBox[{
    SuperscriptBox["L0", "\[Prime]",
     MultilineFunction->None], "[", "t", "]"}], "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"b", "+", 
      RowBox[{"c", " ", "t"}]}], ")"}], " ", 
    RowBox[{
     SuperscriptBox["L0", "\[Prime]",
      MultilineFunction->None], "[", "t", "]"}]}]}], 
  RowBox[{
   RowBox[{"L0", "[", "t", "]"}], "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"b", "+", 
      RowBox[{"c", " ", "t"}]}], ")"}], " ", 
    RowBox[{"L0", "[", "t", "]"}]}]}]]], "Input",
 CellChangeTimes->{{3.8010491248775673`*^9, 
  3.801049125709366*^9}},ExpressionUUID->"0d19766c-24c1-4115-9635-\
5756d04c6c40"],

Cell[BoxData[{
 RowBox[{
  FractionBox["y", "k0"], "==", 
  FractionBox[
   RowBox[{"l", " "}], 
   RowBox[{" ", 
    RowBox[{
     RowBox[{"l0", " ", "n0"}], " ", "+", " ", 
     RowBox[{"n1", " ", "l1", " ", 
      FractionBox["k0", "k1"]}]}]}]]}], "\[IndentingNewLine]", 
 RowBox[{"n1", " ", "\[Equal]", "  ", 
  RowBox[{"n0", " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"Exp", "[", 
      RowBox[{"r", " ", "t"}], "]"}], " ", "-", " ", "1"}], 
    ")"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"l", "\[Equal]", " ", 
   RowBox[{
    RowBox[{"n0", " ", "l0"}], " ", "+", " ", 
    RowBox[{"n1", " ", "l1"}]}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.8010565815868654`*^9, 3.8010566736366186`*^9}, {
  3.8010567646540775`*^9, 3.80105678643779*^9}, {3.801056821540862*^9, 
  3.801056828837339*^9}},ExpressionUUID->"a8c86963-f6cf-4dc5-9932-\
4cf82c37a442"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"g1", "[", 
    RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
   RowBox[{"3.1222703395011506`", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"1.7773953754129888`", " ", "G1"}], "+", 
        RowBox[{"2.566842953327386`", " ", "G2"}], "+", 
        RowBox[{"0.02747736054811321`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
  ";", 
  RowBox[{
   RowBox[{"g2", "[", 
    RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
   RowBox[{"6.188414869493781`", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "5.087715917315581`"}], " ", "G1"}], "+", 
        RowBox[{"3.523010412342576`", " ", "G2"}], "-", 
        RowBox[{"0.004793348638681677`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
  ";", 
  RowBox[{
   RowBox[{"\[CapitalSigma]", "[", 
    RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
   RowBox[{"0.00854796983106368`", " ", 
    RowBox[{"(", 
     RowBox[{"1", " ", "+", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "0.00004826861936172766`"}], " ", "G1"}], "-", 
        RowBox[{"0.000058076814571811286`", " ", "G2"}], "+", 
        RowBox[{"0.008547636249675633`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
  ";"}]], "Input",ExpressionUUID->"aba419a0-dd71-4f8f-87ec-4ccc74cb01fa"],

Cell[BoxData["predictedSlope"], "Input",
 CellChangeTimes->{{3.818317409768634*^9, 3.8183174223051353`*^9}, {
  3.8323197530984163`*^9, 3.832319754070885*^9}},
 CellLabel->
  "In[1319]:=",ExpressionUUID->"0d4f94e5-6a70-4a40-904b-287a63fc8ad5"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"conSlope", " ", "\[Epsilon]"}]], "Input",
 CellChangeTimes->{{3.8323198600691357`*^9, 3.8323198606467113`*^9}},
 CellLabel->
  "In[1320]:=",ExpressionUUID->"78f60889-d235-420b-bb08-f128b84af858"],

Cell[BoxData["0.18832742465377483`"], "Output",
 CellChangeTimes->{3.8323197549613905`*^9, 3.8323198608320365`*^9},
 CellLabel->
  "Out[1320]=",ExpressionUUID->"3dd42595-451b-410c-8897-be69ff8853eb"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{" ", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "\[Epsilon]"}], " ", "conSlope"}], "\[IndentingNewLine]", 
   RowBox[{
    FractionBox["1000", "800"], "\[Delta]L0"}]}]}]], "Input",
 CellChangeTimes->{{3.832319997373433*^9, 3.8323199975820546`*^9}},
 CellLabel->
  "In[1386]:=",ExpressionUUID->"6950fe05-2e2c-475c-ad4f-51e48209b95f"],

Cell[BoxData[
 RowBox[{"-", "0.18832742465377483`"}]], "Output",
 CellChangeTimes->{3.8323199221213765`*^9, 3.8323199979835215`*^9},
 CellLabel->
  "Out[1386]=",ExpressionUUID->"ca4a4cd4-ace4-4234-8078-c077d6c979c0"],

Cell[BoxData[
 RowBox[{"-", "0.13344575385680746`"}]], "Output",
 CellChangeTimes->{3.8323199221213765`*^9, 3.832319998018718*^9},
 CellLabel->
  "Out[1387]=",ExpressionUUID->"dabbab9e-a35c-4254-b4d2-a4a347fad161"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{"14.1", " ", "c"}], " ", "\[Equal]", " ", "0.1"}], "]"}]], "Input",
 CellChangeTimes->{{3.8500397865182858`*^9, 3.850039796347384*^9}},
 CellLabel->
  "In[765]:=",ExpressionUUID->"c09fc958-5877-4545-aadf-ee68f3f948af"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"c", "\[Rule]", "0.007092198581560284`"}], "}"}], "}"}]], "Output",
 CellChangeTimes->{3.8500397974189973`*^9},
 CellLabel->
  "Out[765]=",ExpressionUUID->"5a4f3987-d02e-4f40-993a-6e442a6e45f8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["conSlope"], "Input",
 CellLabel->
  "In[766]:=",ExpressionUUID->"e14da746-1dbe-4f8d-a36d-01bfe338b1fe"],

Cell[BoxData["1.4486724973367295`"], "Output",
 CellChangeTimes->{3.850039824963034*^9},
 CellLabel->
  "Out[766]=",ExpressionUUID->"237618b2-3fb0-40ff-8e3c-fe09e6d0877b"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Analyzing", " ", "the", " ", "decrease", " ", "in", " ", "rate", " ", 
   "from", " ", "newer", " ", "data"}], "*)"}]], "Input",
 FontSize->72,ExpressionUUID->"23c97fab-0f48-4909-a221-b50b95295008"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"400", ",", 
     RowBox[{"-", "0.00927270748023236`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"600", ",", "0.005915768766586242`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"800", ",", 
     RowBox[{"-", "0.23079125081020635`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"1000", ",", 
     RowBox[{"-", "0.3017462718145392`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"1200", ",", 
     RowBox[{"-", "0.4766745071648516`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2000", ",", 
     RowBox[{"-", "0.7679414402836716`"}]}], "}"}]}], "}"}]], "Input",Expressi\
onUUID->"9e8319b8-36ba-45d2-af6e-d139d83b676e"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "3.2244841497907073`"}], ",", 
       RowBox[{"g2", "\[Rule]", "5.65593039165689`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "  ", "2"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g1", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"strain", " ", "data"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\[Epsilon]", " ", "=", " ", "0.13"}], ";"}], " ", "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"dat0", " ", "=", " ", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", 
          RowBox[{"(*", 
           RowBox[{"1", "-"}], "*)"}], "0"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.2", ",", 
          RowBox[{"(*", 
           RowBox[{"1", "-"}], "*)"}], 
          FractionBox["0.042006447294796294`", "\[Epsilon]"]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.4", ",", 
          RowBox[{"(*", 
           RowBox[{"1", "-"}], "*)"}], 
          FractionBox["0.07979761194836375`", "\[Epsilon]"]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.6", ",", 
          FractionBox["0.11", "\[Epsilon]"]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0.8", ",", 
          FractionBox["0.135", "\[Epsilon]"]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"1", ",", 
          FractionBox["0.2", "\[Epsilon]"]}], "}"}]}], "}"}]}], ";"}], "*)"}],
    "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dat0", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0.054973821989528805`", ",", 
         RowBox[{"-", "0.0032504145936981758`"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.10994764397905761`", ",", "0.003482587064676617`"}], "}"}],
        ",", 
       RowBox[{"{", 
        RowBox[{"0.20418848167539272`", ",", "0.024610281923714762`"}], "}"}],
        ",", 
       RowBox[{"{", 
        RowBox[{"0.20811518324607334`", ",", "0.04016583747927032`"}], "}"}], 
       ",", 
       RowBox[{"{", 
        RowBox[{"0.4044502617801048`", ",", "0.07150912106135987`"}], "}"}], 
       ",", 
       RowBox[{"{", 
        RowBox[{"0.6047120418848169`", ",", "0.08404643449419569`"}], "}"}], 
       ",", 
       RowBox[{"{", 
        RowBox[{"0.8089005235602096`", ",", "0.10238805970149255`"}], "}"}]}],
       "}"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"f", " ", "=", " ", 
    RowBox[{"Fit", "[", 
     RowBox[{"dat0", ",", " ", 
      RowBox[{"{", "x", "}"}], ",", " ", "x"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Epsilon]", " ", "=", " ", "0.10"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"f", " ", "=", " ", 
     RowBox[{"0.144", "x"}]}], " ", ";"}], "\[IndentingNewLine]", 
   RowBox[{"conSlope", " ", "=", " ", 
    RowBox[{"f", "[", 
     RowBox[{"[", "1", "]"}], "]"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"predictedSlope", " ", "=", " ", 
     RowBox[{
      RowBox[{"-", "2"}], " ", "conSlope"}]}], " ", 
    RowBox[{"(*", 
     RowBox[{
      FractionBox["1000", "800"], "\[Delta]L0"}], "*)"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"predictedSlope2", " ", "=", " ", 
     RowBox[{
      RowBox[{"-", "conSlope"}], 
      RowBox[{"(", 
       RowBox[{"2", " ", "+", " ", "\[CapitalSigma]", " ", "+", " ", 
        RowBox[{
         FractionBox["g2", "g1"], "\[CapitalSigma]"}]}], ")"}]}]}], " ", 
    RowBox[{"(*", 
     RowBox[{
      FractionBox["1000", "800"], "\[Delta]L0"}], "*)"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"predictedSlope1D", " ", "=", " ", 
     RowBox[{"-", "conSlope"}]}], " ", 
    RowBox[{"(*", 
     RowBox[{
      FractionBox["1000", "800"], "\[Delta]L0"}], "*)"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dataRedt", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        FractionBox[
         RowBox[{"{", 
          RowBox[{
          "0", ",", " ", "800", ",", " ", "1000", ",", " ", "1200", ",", " ", 
           "2000"}], "}"}], "1000"], ",", " ", 
        RowBox[{"{", 
         RowBox[{"0", ",", " ", 
          RowBox[{"-", "0.23079125081020635`"}], ",", " ", 
          RowBox[{"-", "0.3017462718145392`"}], ",", " ", 
          RowBox[{"-", "0.4766745071648516`"}], ",", " ", 
          RowBox[{"-", "0.7679414402836716`"}]}], "}"}]}], "}"}], "//", 
      "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fitCRLine1", "=", " ", 
     RowBox[{"Fit", "[", 
      RowBox[{"dataRedt", ",", " ", 
       RowBox[{"{", " ", "c", "}"}], ",", " ", "c"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"fitCRLine2", "=", " ", 
     RowBox[{"Fit", "[", 
      RowBox[{"dataRedt", ",", " ", 
       RowBox[{"{", 
        RowBox[{"1", ",", " ", "c"}], "}"}], ",", " ", "c"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"rate", " ", "data"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"data", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        FractionBox[
         RowBox[{"{", 
          RowBox[{
          "0", ",", " ", "200", ",", " ", "400", ",", " ", "600", ",", " ", 
           "800", ",", " ", "1000", ",", " ", "1200", ",", " ", "2000"}], 
          "}"}], "1000"], ",", " ", 
        RowBox[{"{", 
         RowBox[{"0", ",", " ", 
          RowBox[{"-", "0.03"}], ",", " ", 
          RowBox[{"-", "0.00927270748023236`"}], ",", " ", 
          "0.005915768766586242`", ",", " ", 
          RowBox[{"-", "0.23079125081020635`"}], ",", " ", 
          RowBox[{"-", "0.3017462718145392`"}], ",", " ", 
          RowBox[{"-", "0.4766745071648516`"}], ",", " ", 
          RowBox[{"-", "0.7679414402836716`"}]}], "}"}]}], "}"}], "//", 
      "Transpose"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"data", " ", "=", " ", 
    RowBox[{"data", "[", 
     RowBox[{"[", 
      RowBox[{";;", 
       RowBox[{"-", "1"}]}], "]"}], "]"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"concentration", " ", "where", " ", "behavior", " ", "changes"}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"critPoint", " ", "=", " ", 
     RowBox[{
      RowBox[{"Solve", "[", " ", 
       RowBox[{
        RowBox[{
         FractionBox["f", "1"], "\[Equal]", "\[Epsilon]"}], ",", " ", "x"}], 
       "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"listCRplot", " ", "=", " ", 
     RowBox[{"ListPlot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{";;", "4"}], "]"}], "]"}], ",", " ", 
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{"5", ";;"}], "]"}], "]"}]}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"PointSize", "[", "0.025", "]"}], ",", "Blue"}], "}"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"PointSize", "[", "0.025", "]"}], ",", "Blue"}], "}"}]}], 
         "}"}]}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"GridLines", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", 
            RowBox[{"{", 
             RowBox[{"critPoint", ",", " ", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Opacity", "[", "0.8", "]"}], ",", "Red", ",", " ", 
                RowBox[{"Thickness", "[", "0.0075", "]"}], ",", " ", 
                "Dashed"}], "}"}]}], "}"}]}], "}"}], ",", " ", 
          RowBox[{"{", "0", "}"}]}], "}"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"predictionPlot1", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"predictedSlope", " ", "c"}], ",", " ", "fitCRLine1"}], 
        "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"c", ",", "critPoint", ",", " ", "2"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Dashed", ",", " ", "Black", ",", " ", "Thick"}], "}"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"Dashed", ",", " ", 
            RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", "Thick"}], 
           "}"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"predictionPlot2", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"predictedSlope", " ", "c"}], ",", " ", "fitCRLine2"}], 
        "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"c", ",", "critPoint", ",", " ", "2"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Dashed", ",", " ", "Black", ",", " ", "Thick"}], "}"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"Dashed", ",", " ", 
            RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", "Thick"}], 
           "}"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"predictionPlot3", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"predictedSlope", " ", "c"}], ",", " ", 
         RowBox[{"predictedSlope2", " ", "c"}], 
         RowBox[{"(*", 
          RowBox[{",", 
           RowBox[{"predictedSlope1D", " ", "c"}]}], "*)"}], " ", ",", 
         "fitCRLine1"}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"c", ",", "critPoint", ",", " ", "2"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Dashed", ",", " ", "Black", ",", " ", "Thick"}], "}"}], 
          ",", 
          RowBox[{"{", 
           RowBox[{"Dashed", ",", " ", 
            RowBox[{"Darker", "[", "Green", "]"}], ",", " ", "Thick"}], "}"}],
           ",", 
          RowBox[{"{", " ", 
           RowBox[{
            RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", "Thick"}], 
           "}"}]}], "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"zeroPlot", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{"0", ",", " ", 
       RowBox[{"{", 
        RowBox[{"c", ",", "0", ",", " ", "critPoint"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Dashed", ",", " ", "Black", ",", " ", "Thick"}], "}"}]}]}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"prateChange", " ", "=", " ", 
    RowBox[{"Show", "[", 
     RowBox[{
     "listCRplot", ",", " ", "predictionPlot3", ",", " ", "zeroPlot", ",", 
      " ", 
      RowBox[{"PlotRange", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", "1.0"}], ",", " ", "0"}], "}"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Show", "[", 
     RowBox[{
     "listCRplot", ",", " ", "predictionPlot2", ",", " ", "zeroPlot"}], "]"}],
     "*)"}]}]}]], "Input",
 CellChangeTimes->{{3.818317442249836*^9, 3.8183175707132907`*^9}, {
   3.818318894843517*^9, 3.818318895129752*^9}, {3.818319034948233*^9, 
   3.818319049825457*^9}, {3.8185858456068563`*^9, 3.8185858508282027`*^9}, {
   3.818586018654645*^9, 3.818586022580454*^9}, {3.8186736333879533`*^9, 
   3.818673673648794*^9}, {3.8194554910813093`*^9, 3.819455513986007*^9}, {
   3.81945555196836*^9, 3.8194556368741083`*^9}, {3.819456083600666*^9, 
   3.8194561273186665`*^9}, {3.819456262815134*^9, 3.819456302063098*^9}, {
   3.8194563403286905`*^9, 3.8194563469918804`*^9}, {3.819456393305932*^9, 
   3.819456447967307*^9}, {3.819456611760349*^9, 3.819456613630354*^9}, {
   3.8194566563121195`*^9, 3.819456661350611*^9}, {3.8194583075912585`*^9, 
   3.819458417378421*^9}, {3.8194585008350716`*^9, 3.819458529492401*^9}, {
   3.8194585676422815`*^9, 3.8194586439321156`*^9}, {3.8195392885203285`*^9, 
   3.8195392893510857`*^9}, {3.82135434688474*^9, 3.8213543487716937`*^9}, {
   3.821354865527173*^9, 3.8213548806198373`*^9}, {3.821430068851186*^9, 
   3.8214301114014063`*^9}, {3.821518359765979*^9, 3.8215183598616548`*^9}, {
   3.8215183938478217`*^9, 3.821518464261573*^9}, 3.8224797461917763`*^9, {
   3.8229160500281096`*^9, 3.822916106100154*^9}, {3.822919976729349*^9, 
   3.822919986848271*^9}, {3.8229200292657604`*^9, 3.8229200300716047`*^9}, {
   3.822920154553381*^9, 3.8229202071905518`*^9}, {3.822920247919531*^9, 
   3.8229203045504313`*^9}, {3.822920346559986*^9, 3.822920382937639*^9}, {
   3.822920448327159*^9, 3.8229204488068757`*^9}, {3.8229204796802874`*^9, 
   3.82292049834334*^9}, {3.822920531647193*^9, 3.8229205398303223`*^9}, {
   3.8229205822547884`*^9, 3.8229206052542195`*^9}, {3.822983053294566*^9, 
   3.8229830575013294`*^9}, {3.823337794611404*^9, 3.8233379440154734`*^9}, {
   3.8308635106603785`*^9, 3.830863513157516*^9}, {3.8308636281873875`*^9, 
   3.830863650541926*^9}, {3.8308636970299873`*^9, 3.8308637015291557`*^9}, 
   3.832317767988*^9, {3.832317964282397*^9, 3.8323180009602156`*^9}, {
   3.83231814884249*^9, 3.832318214816965*^9}, {3.8323196160547924`*^9, 
   3.832319621910931*^9}, {3.8323197191633463`*^9, 3.832319721354244*^9}, {
   3.8323197770316563`*^9, 3.832319800245205*^9}, {3.832319897481281*^9, 
   3.832319934167925*^9}, {3.832319986126327*^9, 3.8323199895097675`*^9}, {
   3.832320470334694*^9, 3.832320474243204*^9}, {3.8323206206907797`*^9, 
   3.832320759296734*^9}, {3.832320797516341*^9, 3.832320841986656*^9}, {
   3.8323208792175655`*^9, 3.832320885794033*^9}, 3.8323367730720887`*^9, 
   3.832336818510988*^9, {3.8416594904485397`*^9, 3.8416595116945553`*^9}, 
   3.847872266828065*^9, {3.8500387712066574`*^9, 3.8500387766844997`*^9}, {
   3.850038992031364*^9, 3.8500389921404486`*^9}, 3.850039034175708*^9, {
   3.8500390984631367`*^9, 3.8500391059572024`*^9}, {3.850039136679165*^9, 
   3.8500391380129275`*^9}, {3.8500391808624563`*^9, 
   3.8500392060927706`*^9}, {3.8500393088646393`*^9, 
   3.8500393233641076`*^9}, {3.850039378752716*^9, 3.8500393900224886`*^9}, {
   3.8500394345672207`*^9, 3.850039575839783*^9}, {3.8500398531097126`*^9, 
   3.850039875340415*^9}, {3.850039909109123*^9, 3.8500399118613358`*^9}, {
   3.850040159902454*^9, 3.850040376614894*^9}, {3.850040420333337*^9, 
   3.8500404207651825`*^9}, {3.8500404745984507`*^9, 
   3.8500405046685567`*^9}, {3.8500405385378666`*^9, 3.850040583125461*^9}, {
   3.850040629951762*^9, 3.8500406959661*^9}, {3.850040728943657*^9, 
   3.85004075436588*^9}, {3.850040868943161*^9, 3.850040881390319*^9}, {
   3.8500417381198773`*^9, 3.8500417411415377`*^9}, {3.8500417863842664`*^9, 
   3.850041823725686*^9}, {3.850041970848382*^9, 3.85004202521038*^9}, {
   3.850042116840952*^9, 3.8500421360248117`*^9}, {3.8500421712161055`*^9, 
   3.8500421755349083`*^9}, {3.850042251463902*^9, 3.8500422640710917`*^9}, {
   3.8500423959591875`*^9, 3.850042405334877*^9}, {3.8500424384729366`*^9, 
   3.850042487560699*^9}, {3.850042523112103*^9, 3.8500425701031713`*^9}, 
   3.850042611088372*^9, {3.8500426492395887`*^9, 3.8500426731111083`*^9}, {
   3.855478385615095*^9, 3.855478417526058*^9}, 3.8554785150654554`*^9, {
   3.855479521031351*^9, 3.855479563194503*^9}},
 CellLabel->"In[1]:=",ExpressionUUID->"4001bff2-1c66-4a2b-ba7c-a9fcb1f7419d"],

Cell[BoxData[
 RowBox[{"0.13722604270841296`", " ", "x"}]], "Output",
 CellChangeTimes->{
  3.821430112345853*^9, 3.8215183619097023`*^9, {3.8215183949569044`*^9, 
   3.8215184233412867`*^9}, 3.821518464631611*^9, 3.8224797468876557`*^9, 
   3.822657175355634*^9, 3.822661402924587*^9, {3.822916077740997*^9, 
   3.8229161065908413`*^9}, 3.8229199888170023`*^9, 3.822920030691944*^9, {
   3.822920142992319*^9, 3.822920155763172*^9}, {3.8229201881285334`*^9, 
   3.8229202082267733`*^9}, {3.8229202609706354`*^9, 
   3.8229203051109324`*^9}, {3.822920352192934*^9, 3.8229203832518206`*^9}, 
   3.8229204493404474`*^9, {3.8229204809319344`*^9, 3.822920498650493*^9}, {
   3.8229205359447207`*^9, 3.8229205406261654`*^9}, {3.8229205868414927`*^9, 
   3.822920605730972*^9}, 3.822983058287205*^9, 3.823156787021421*^9, 
   3.8233379450776763`*^9, 3.8308637027848587`*^9, 3.8323177703812647`*^9, {
   3.8323179680479493`*^9, 3.832318001257698*^9}, {3.8323181494614763`*^9, 
   3.8323181708054576`*^9}, 3.832319623046305*^9, 3.832319747218787*^9, {
   3.8323198979724283`*^9, 3.8323199347672896`*^9}, 3.8323204525277348`*^9, 
   3.832320708470872*^9, {3.832320826041781*^9, 3.8323208427832327`*^9}, 
   3.8323208955375805`*^9, 3.8323367313662987`*^9, 3.832336774350545*^9, 
   3.8323368188905993`*^9, 3.841659457939431*^9, 3.8416595127638426`*^9, 
   3.847872237742988*^9, 3.8478722684319077`*^9, {3.8500387732662926`*^9, 
   3.8500387779778776`*^9}, {3.8500390104852695`*^9, 3.8500390345718513`*^9}, 
   3.8500391681264973`*^9, 3.850039212352021*^9, 3.8500393113714037`*^9, 
   3.8500393906251736`*^9, {3.8500394360220013`*^9, 3.850039449781398*^9}, {
   3.850039503004349*^9, 3.8500395760355825`*^9}, 3.8500398759161625`*^9, 
   3.8500399125584283`*^9, {3.8500401825191593`*^9, 3.8500402811041794`*^9}, {
   3.8500403156766777`*^9, 3.8500403717755337`*^9}, {3.8500404804163046`*^9, 
   3.8500405052801027`*^9}, {3.85004055441187*^9, 3.850040583583705*^9}, {
   3.850040633833293*^9, 3.850040698738803*^9}, {3.850040729656604*^9, 
   3.850040755179165*^9}, 3.8500407945832605`*^9, 3.850040899740732*^9, 
   3.8500417466452665`*^9, 3.8500418339033055`*^9, {3.8500419766158123`*^9, 
   3.8500420253800893`*^9}, {3.8500421185818806`*^9, 3.8500421366643023`*^9}, 
   3.850042178424899*^9, {3.8500423991385655`*^9, 3.8500424057388678`*^9}, {
   3.8500424396740365`*^9, 3.8500424886024065`*^9}, {3.8500425264025645`*^9, 
   3.8500425708443174`*^9}, 3.850042611427*^9, 3.850042673363476*^9, {
   3.855478394516157*^9, 3.8554784176666555`*^9}, 3.8554785160254555`*^9, {
   3.855479546955366*^9, 3.855479564052106*^9}, 3.856586441306408*^9},
 CellLabel->"Out[5]=",ExpressionUUID->"2ad5cf89-7a64-46c8-92b8-2cde3dfab55a"],

Cell[BoxData["0.144`"], "Output",
 CellChangeTimes->{
  3.821430112345853*^9, 3.8215183619097023`*^9, {3.8215183949569044`*^9, 
   3.8215184233412867`*^9}, 3.821518464631611*^9, 3.8224797468876557`*^9, 
   3.822657175355634*^9, 3.822661402924587*^9, {3.822916077740997*^9, 
   3.8229161065908413`*^9}, 3.8229199888170023`*^9, 3.822920030691944*^9, {
   3.822920142992319*^9, 3.822920155763172*^9}, {3.8229201881285334`*^9, 
   3.8229202082267733`*^9}, {3.8229202609706354`*^9, 
   3.8229203051109324`*^9}, {3.822920352192934*^9, 3.8229203832518206`*^9}, 
   3.8229204493404474`*^9, {3.8229204809319344`*^9, 3.822920498650493*^9}, {
   3.8229205359447207`*^9, 3.8229205406261654`*^9}, {3.8229205868414927`*^9, 
   3.822920605730972*^9}, 3.822983058287205*^9, 3.823156787021421*^9, 
   3.8233379450776763`*^9, 3.8308637027848587`*^9, 3.8323177703812647`*^9, {
   3.8323179680479493`*^9, 3.832318001257698*^9}, {3.8323181494614763`*^9, 
   3.8323181708054576`*^9}, 3.832319623046305*^9, 3.832319747218787*^9, {
   3.8323198979724283`*^9, 3.8323199347672896`*^9}, 3.8323204525277348`*^9, 
   3.832320708470872*^9, {3.832320826041781*^9, 3.8323208427832327`*^9}, 
   3.8323208955375805`*^9, 3.8323367313662987`*^9, 3.832336774350545*^9, 
   3.8323368188905993`*^9, 3.841659457939431*^9, 3.8416595127638426`*^9, 
   3.847872237742988*^9, 3.8478722684319077`*^9, {3.8500387732662926`*^9, 
   3.8500387779778776`*^9}, {3.8500390104852695`*^9, 3.8500390345718513`*^9}, 
   3.8500391681264973`*^9, 3.850039212352021*^9, 3.8500393113714037`*^9, 
   3.8500393906251736`*^9, {3.8500394360220013`*^9, 3.850039449781398*^9}, {
   3.850039503004349*^9, 3.8500395760355825`*^9}, 3.8500398759161625`*^9, 
   3.8500399125584283`*^9, {3.8500401825191593`*^9, 3.8500402811041794`*^9}, {
   3.8500403156766777`*^9, 3.8500403717755337`*^9}, {3.8500404804163046`*^9, 
   3.8500405052801027`*^9}, {3.85004055441187*^9, 3.850040583583705*^9}, {
   3.850040633833293*^9, 3.850040698738803*^9}, {3.850040729656604*^9, 
   3.850040755179165*^9}, 3.8500407945832605`*^9, 3.850040899740732*^9, 
   3.8500417466452665`*^9, 3.8500418339033055`*^9, {3.8500419766158123`*^9, 
   3.8500420253800893`*^9}, {3.8500421185818806`*^9, 3.8500421366643023`*^9}, 
   3.850042178424899*^9, {3.8500423991385655`*^9, 3.8500424057388678`*^9}, {
   3.8500424396740365`*^9, 3.8500424886024065`*^9}, {3.8500425264025645`*^9, 
   3.8500425708443174`*^9}, 3.850042611427*^9, 3.850042673363476*^9, {
   3.855478394516157*^9, 3.8554784176666555`*^9}, 3.8554785160254555`*^9, {
   3.855479546955366*^9, 3.855479564052106*^9}, 3.8565864413094635`*^9},
 CellLabel->"Out[8]=",ExpressionUUID->"e95e8db4-af17-4bdb-95a1-1ec34d2923c9"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["1", "5"], ",", 
     RowBox[{"-", "0.03`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["2", "5"], ",", 
     RowBox[{"-", "0.00927270748023236`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["3", "5"], ",", "0.005915768766586242`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["4", "5"], ",", 
     RowBox[{"-", "0.23079125081020635`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"1", ",", 
     RowBox[{"-", "0.3017462718145392`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     FractionBox["6", "5"], ",", 
     RowBox[{"-", "0.4766745071648516`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2", ",", 
     RowBox[{"-", "0.7679414402836716`"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.821430112345853*^9, 3.8215183619097023`*^9, {3.8215183949569044`*^9, 
   3.8215184233412867`*^9}, 3.821518464631611*^9, 3.8224797468876557`*^9, 
   3.822657175355634*^9, 3.822661402924587*^9, {3.822916077740997*^9, 
   3.8229161065908413`*^9}, 3.8229199888170023`*^9, 3.822920030691944*^9, {
   3.822920142992319*^9, 3.822920155763172*^9}, {3.8229201881285334`*^9, 
   3.8229202082267733`*^9}, {3.8229202609706354`*^9, 
   3.8229203051109324`*^9}, {3.822920352192934*^9, 3.8229203832518206`*^9}, 
   3.8229204493404474`*^9, {3.8229204809319344`*^9, 3.822920498650493*^9}, {
   3.8229205359447207`*^9, 3.8229205406261654`*^9}, {3.8229205868414927`*^9, 
   3.822920605730972*^9}, 3.822983058287205*^9, 3.823156787021421*^9, 
   3.8233379450776763`*^9, 3.8308637027848587`*^9, 3.8323177703812647`*^9, {
   3.8323179680479493`*^9, 3.832318001257698*^9}, {3.8323181494614763`*^9, 
   3.8323181708054576`*^9}, 3.832319623046305*^9, 3.832319747218787*^9, {
   3.8323198979724283`*^9, 3.8323199347672896`*^9}, 3.8323204525277348`*^9, 
   3.832320708470872*^9, {3.832320826041781*^9, 3.8323208427832327`*^9}, 
   3.8323208955375805`*^9, 3.8323367313662987`*^9, 3.832336774350545*^9, 
   3.8323368188905993`*^9, 3.841659457939431*^9, 3.8416595127638426`*^9, 
   3.847872237742988*^9, 3.8478722684319077`*^9, {3.8500387732662926`*^9, 
   3.8500387779778776`*^9}, {3.8500390104852695`*^9, 3.8500390345718513`*^9}, 
   3.8500391681264973`*^9, 3.850039212352021*^9, 3.8500393113714037`*^9, 
   3.8500393906251736`*^9, {3.8500394360220013`*^9, 3.850039449781398*^9}, {
   3.850039503004349*^9, 3.8500395760355825`*^9}, 3.8500398759161625`*^9, 
   3.8500399125584283`*^9, {3.8500401825191593`*^9, 3.8500402811041794`*^9}, {
   3.8500403156766777`*^9, 3.8500403717755337`*^9}, {3.8500404804163046`*^9, 
   3.8500405052801027`*^9}, {3.85004055441187*^9, 3.850040583583705*^9}, {
   3.850040633833293*^9, 3.850040698738803*^9}, {3.850040729656604*^9, 
   3.850040755179165*^9}, 3.8500407945832605`*^9, 3.850040899740732*^9, 
   3.8500417466452665`*^9, 3.8500418339033055`*^9, {3.8500419766158123`*^9, 
   3.8500420253800893`*^9}, {3.8500421185818806`*^9, 3.8500421366643023`*^9}, 
   3.850042178424899*^9, {3.8500423991385655`*^9, 3.8500424057388678`*^9}, {
   3.8500424396740365`*^9, 3.8500424886024065`*^9}, {3.8500425264025645`*^9, 
   3.8500425708443174`*^9}, 3.850042611427*^9, 3.850042673363476*^9, {
   3.855478394516157*^9, 3.8554784176666555`*^9}, 3.8554785160254555`*^9, {
   3.855479546955366*^9, 3.855479564052106*^9}, 3.8565864413164077`*^9},
 CellLabel->"Out[16]=",ExpressionUUID->"e0696725-d04d-4492-9820-ff070db26698"],

Cell[BoxData[
 GraphicsBox[{{{}, {{
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"], 
       PointBox[{{0., 0.}, {0.2, -0.03}, {0.4, -0.00927270748023236}, {0.6, 
        0.005915768766586242}}]}, 
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"], 
       PointBox[{{0.8, -0.23079125081020635`}, {1., -0.3017462718145392}, {
        1.2, -0.4766745071648516}, {2., -0.7679414402836716}}]}}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, 
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}, {}, {}}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, 
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}, {}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[Large], Opacity[1.], Dashing[{Small, Small}], 
       LineBox[CompressedData["
1:eJwVz3k41HkcwPGJKEdpiw5ZNbYnjBQbrUIfSqVCjpG2R6MotWnIU5S2Uo8j
13p2NoVyFFuOXdW2wq7jQ9YytDTjGOfEr/xmKcM004z7u+0f7+f994sZGOZ9
So3BYLh/7v8/bovPemtHw3cm+sWZmXwMPnjU18KBBrc0luaJbD5ubLRcegFo
2KLpHGj2kI+Pazqi1fbSoBzhGpYX8rGgxCSI6UND7G+NSR3lfCxMrjEP4NLw
wOn7EL0uPhbvU5b1PqShm0NtilvejE/xlECgLQHX+8+enk9uxt69drfOSCUg
Fa9i5/JaUDgR5jL68l+oymtihsa/wt+3O/Q73R4Bmr37TljkP/hizawCIkah
S5BQ0HSlFWONmAYs1/cw1rrqbR23DSPKtpdVbfoAwS0VnMQdr/HQOG29YckY
xDxuNm6pfI3KA1OlkeIxKHW+Kfe3EWCNI6kIr5OC667sdMNyAfr4nP3L7844
TKhxPM2shTiibuub+PUE/P2nun9boRArip4sts+fACJa+k0eqx2lg70QqCuD
gy9qNjbkt+OLtzfKj12XwYyqfXiFaQdO2IZn7ZbKoMe6VTVT0IG8NfoauYc/
At+Ca2yzvhPrm6yetDZ+BOPkcP2MvE7012L0XbCWQ3yx4To3oy6MN9jvOpYv
B+8t5lMWD7pwQ3i/iZe+Atx+Mdr4iClCM47JTdY1BXwrKT0dek+E1Supdd1S
BfATnl8O+rIb/zjO3jVz5BO4j7JzCtO70Xx6mXBx3Sdg7O5feUuvB1kB+/JG
rZVgsIDP4fF6kOdrpXS+r4Sd0Ucr32v3YuKq20ncJSpoDvSShKf2otLMKSXm
mgriHC2DeXp9yG/J/UKPVgG7u2SKkdCHljuiRKF+kxDXfds/S7sfVds1mC51
k9CcYdxxK7YftyX2idTNp2CnZ2qO7mw/av5s0ZaeOQUG3CC76msD6OC5+cBD
tWkg+wfoauUAqjcVa0RfnAb3lKqTo1FitBL0uAjF01CS6qQKVohRaO4j09s3
A44JRf1Xz71BDY+9YmbFDFhJLvFqpG8wR/2DRxFzFtbGRFia2QxiU6wOQyNt
FjwbhqY0Iwcx2DfC+ODCOTCKqQ17XjaIIeW8Wk3uHMgeyMY15IO4YNg0/654
DqLCO/3CbIZwLv+8VpbrPGjn6TTfCB/C0OfqA8nP5mGrR+kwp2QIw1KWyQ4x
CeiW6I14S4dQpGpLSEwiMBFSrZSyKFxv9GNgQAoBW/tFmXMWFJ5x8nSwTSUQ
pe1lr2tJ4WTC6/FBHoEFRe+izbdQaGgoOGyXSWAFraN1ciuFHAfhBkkBgW3H
j67tsaeQvtFR69JA4CpbBfVuFG5+lHbPsJFA7VfOlMCdwkt89sWJJgIa8qTY
QQ8KFy/vNM16ReAHnjF/zpNCVn5nqrydQG7rHm87Xwq5DV3+eRSBOte0kyXH
KCwbubvt8jsCmqvFmlUcCueX+C3zoAkckJgWNQdQmHpYVD81QkAYVzkmOUHh
M4mI5SUj8O4lFWkS/Nmjk7HQVE7A7KdNa6xPU+hsdUQ8qyDAPRFZCWcoFF7u
5hVOEvhEtBjHzn72ZmeEXJ8msKPNJy8khMKguiN72LMErudku1w5R+Gvw6vX
seYJ1HMldAKXQoVWzyQhBBY5Wiemh1L4H5FEohY=
        "]]},
      Annotation[#, "Charting`Private`Tag$3077#1"]& ], 
     TagBox[
      {RGBColor[0, 
        NCache[
         Rational[2, 3], 0.6666666666666666], 0], Thickness[Large], Opacity[
       1.], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwVz3k41HkcwPH5YTxUw9Qz7dakGCWZnK0pZeoj61YoV9likTZZ11NKT4+0
0UFSs6JrJKZSPevocO2z+X6tPPS0hUkNZWVrGzNyzDDmYPhu+8f7ef/94sSl
7kwwoNFo27/2/+92nhF+cpMCu4vx4Y6xDO0PjApfy5fCsGEJdpknQ6vbHcwO
gRR+37Ci4ilDhu4292Qb+Eghqswx4Q1LhiqrrOM5oVK4kRL8xWilDN0732wX
kyyF5QyBJh5k6IGvuv5duRSsAlhM60wZqkEJ3d3zhmDNM/bWm3IZeufjdvbA
2BCcRiHM6g9yJFakeg3/KQNuAz8ntW0YPd7I7/cokkPq7qh1NXe/oLqlehVk
DANlWB5kfGME5VpwFnP9vkD/vVIz8+xRlFG/sf4P+xGgR7S6Ox0ZQ8HjUpdV
jFF4VcW+8/LAOFIH6J4cGRgFBY3VV2ijQM2bSWN6yxjccnQq8bylQKGhB59F
Fo/DoSgbm85FSiQ35IXnrVPA1R9cxewcJWq8X23iLlJA7KCEN6FXorHBdxC3
QAkh8RFJFSkTqO7TyYa9J5QgTUyMHJBPIAUvXfj9mBJeeBfH9sVNIsFSFr0s
YgJ6LIWbq15PotYO5+pX7ROQm7Wha0GQCu0xpb0/5DIJu/uqXL2xCp1Z7O83
KpqEt42Nwab8KbQqvd96B0sF5cn95wrqptCaaOtfuFkqEFi9L5KtVqOn33y0
7B1TgW1kSnhXuRo1/RjmObNrCj6d75ddYmmQ3TRTbNIyBaPF8deZpzWIG+Nb
MeyihrKV2QYWRIME4c7qrTfUkFGTwaela1Het0X5yQwNTDTTHNJGtEi9xqMg
J0sDSHTbvSxBh56/KFtoLtVA7ZmVFpVvdchh0zFJSqQW/EfXP960YxppNtI5
Xi1aoO+0sahsnUbr895LDO10sLDAXiT+bgYZ317beeWaDtr8OwbzqmYQP8Qx
oNxgGkrpoFhqqUeGHQ/o2YenYZl3QD3vuh45d/d5iQemofmUcxCXMYvEdqFK
c98ZeFjsZDSQNYvoQT4DnMYZCLRvTVuunUU3DUeC7nP0YNriUsM7OIc6cufT
6Jf1kNLnervv8xzaH56xItBoFqzbQxr4MQQlNQiwcfIszDzyFWZ2EUR9thWV
DMzCFoF82S0bGp4VpZkK/eaA2SHcqYim4ZRHhn+fr52D/MQ9S6yu0HBqAVMZ
zCHQu21/0+IeGpZoOs/l5RNwq9nbqllAYSuLS3ExBQRiO5+3TDEofMAjhM8r
JJA/zsOTZhTWnusaHxQQ6HcyezrOpDCb3R3hdo3Aqdrm+iEWhaP54lVDlQRe
PrR8ILGgsPRkD/ZqIxD/5J9LDfYUdrxz+Tq7nUBBz/aLdQ4UPvo87LCig0Cd
qunCY0cKmyx6Yyv8i4AJ79f8GmcKc0VvCidfE6iu88ytdKVwctvbPRUfCWjr
RUev8ClcLy9Zn/kvAWuJ+ZHizRSeY0Qyg6QEAjXHDxdtoXBhhKRVJydQuiEs
/aIHhWuHJNwdSgKejUZJZ72+euZfNbKdJPBzb1riaW8Kb3XeNaBXESjW9v+U
40NhcWav4J6WgMytbl+231dv6dWkE9MEFu7mxGf5Uzi+ZZd3mJ6A+7ELsccD
KPzb5yWW3DkC+67pYo4FUlhl2qclhMCFpoToo9so/B9q8oeF
        "]]},
      Annotation[#, "Charting`Private`Tag$3077#2"]& ], 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
       Thickness[Large], Opacity[1.], LineBox[CompressedData["
1:eJwVz3s0lHkcgHHRWCqlLW1aYUQxlYw9WaLzVbmLisgWsWylrFuStnNINzVq
w1FKSJlUOmp1k9rMNybl0qkxZsxgmpjhfaPIoGHcftv+8Zzn7w8zMj5gj7aW
lpbf9/7/rfcZhUpHClx/Xaa/wFuAe313Bq10oUCVPxFz1FeAy9+snpsEFHAn
W951+QnwFk90TNuDAkbtqYsVAQK8fc8iihlIQdNmysw/VIB3zvFswmMpCI4s
c+DEC/Cup7qy/QYFMX+v+YNcEuA/uKe5eRYNV5TO+FkhwHYPxzPRAzSYL8jw
fsJpRuFgvFtf7Sd4URkflGglxEdOLjLX3F5otBYFmvGE+MR4cgSS+0DP9MBy
XlQLnjJhGrG8PsNvZ4qPbpluweRKp8oXq76ALEmX21wqwi1fKbalQT8IbD9V
u/uIUe2jeXxY3g/SsP07y5Vi5K0nVYk1A2BoaNKkk9mKgYEHXu249BV2OcRV
+1lJsFdnbRDHfhCMVzqXcKolWFV2X8+ZOwi6XKddlZFSHOhsh8g5KtDNklwS
T0rxiTL9aViaChynb93s4bbh4NrEwk0DKuhwVpXSnu2YY7yQURw8BDn97day
znbk19vdf/dmCFIs1MdqMjowVF+rI4k9DAebKkLymTLMMPL26ucOQ9FoISOy
QYaWiTKLbQtHYN2QTqlJ3Ae03m1xnJU6An0Rs143/CDH6kUKM+nACDQGbPx3
3305PovYvnEi5Bvwqoztx7w/os24oVCv5htY9scUHFV8RFa4Z0kfWw1hwpQv
6k2dmBNkp95QoAb7aP23NjmdyPkpNzPWYBSK8ZGRuLsT1dau50+mjoJ7WkGI
xqELG5qK58+jRuGbOkCWd7ILV6/7SxK3YwzWs5c1lrd24agTg+lWMwZZVvwx
Z0sFOnA6JDo2GjA+ft3cLUGBujdXvr+cr4H11/IevqpVoMtWW58b2uOwPzn0
NG+eEnXq7zKOHRoH27nOtXZRSrRrbnMTysdhKqIXTB4oUWgTqJrnOQEzfxZX
pk8pkeHvIWdWTUBpXtvlsK3deE3ni38ZcxL839579qioG+tPzdZiXJyEbP5V
9xOqbtwblGzqO3MKZlvUNTZs6sGYpzkvdWOnIGsdZmdm9+CMnhXcPPkUlC8U
vuQre3CKm6Bf6DUNLXcesw+zKYx7qPPhXMU0/HJTVHAjlcL484aqLUwCrN8N
EtwFFEpG35/lZBJYJTU6HbmURnOT7Mjw8wRuu2mkz01pjHbd6rL2AgGLB7JV
C8xpHDsr+NqZQ2BxJlfEt6BxyZLmYMd8AgwXtqWVNY27XYSW9G0CH4s382l7
Gql00Uu3OgK5+07OiPWi0bb04tUlbwgYiPYG1XnTmNKw/dBgPQGOq0/ZUl8a
9X4Uryh8SyDdeP62d340srjiC8MtBGKbrl1fE0hjbF1raImCgMea5zAURmNl
b57DkW4CNQVFuT7hNE4b7DD0pwi46B2nSyJovBAs4Wt6Cdh3eWYFRtFYQUtY
21QEzHLF8sfR3z2zr8xcMUzgKqmyNzhA4wa7EPnkCAGjPwsz9sTQKDwizbkz
RmCOe5Ttorjv3qIrMWnjBM488DgRF09jVE2I+/ZJAtqmrNbXCTSW9yw2Y00T
SMs0YJkdpHFEv22MEAIa9WBqShKN/wEFT6L/
        "]]},
      Annotation[#, "Charting`Private`Tag$3077#3"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[Large], Opacity[1.], Dashing[{Small, Small}], 
       LineBox[CompressedData["
1:eJxF0XtI0wEQB/C5mK4sywc+WmoyH+lmpT00I0XK5hyznKWYtZZhCppCujAN
YmjWbJVgiwS1Ih/pqokmlSGpy1S2lraHtqXls/wtsdKk1poV1N3BcXz+uD/u
vj5pubx0MolE4v7pv1OVWE/wcuMjSf/qu9TUaG9iRP23rDNGqSZ2gin6r6nN
BAfcImD73iZSwdT6/IuVRBa4NbasXUoUgZevlWoqiEtgd8uNGrpbNZgcVHGQ
XlUHPjterIgQ3wNrTCmxXNsW8M1bYyWvLrSBn89TvwgPPAEHcSkJR1d3gI83
FxSviukE88WRp38FdIPzoywVekKB9xfUMgZre8AOonXGIyW9YMkJSZtmdz84
jKZqMG5QgpclLjpTKC/BRIa7zK1LDV7yowTzEwbA123NHn6hg2CFWu/U5vca
LBq+26dz0YBVA4vOpnn0g2ZmVv+UFux5bjS5qleHvnrehlSnx3xKXR4xpUNg
fbY3OV44DC6PcEoJz3wDNrDN2a1JBsyfxXelbzOC1wc3KVP934JpNqdcxXYj
4AbXTV6sSXS/szZErRkFn1laMLBb34EFM1ZWL+89OC4uenZCgbZwrJ/7Qsdw
P1pe6CRD79rotS+JNo7/chA1Wq+h6eX8tNyVE+AuqjndUIQOEornGhfQhmG9
Ii99EswbqVmkaNFS3SG5hTMF9u7Rtsw+Re+dppeNdaCz7fKO6Z6h29mOazoU
6CQ196REiZYMvQhgGNHmmcdVmWa0jz01/7AFHctM5uy3oqU5336EkafBm+dD
ku1WoDMsTY71HugrnuaPlTT0w0h252VPNFn0IUfog66h+Kr2BKJ7/PPuhDPQ
n1jdhcxg9I4yQaBLCFogk5OoW9ClKuvQz63o+7Nc+dx2tNahunQiHP0bJ9c2
ig==
        "]]},
      Annotation[#, "Charting`Private`Tag$3126#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0, {0.6944444444444445, {
       Opacity[0.8], 
       RGBColor[1, 0, 0], 
       Thickness[0.0075], 
       Dashing[{Small, Small}]}}}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{-1., 0},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.821430112345853*^9, 3.8215183619097023`*^9, {3.8215183949569044`*^9, 
   3.8215184233412867`*^9}, 3.821518464631611*^9, 3.8224797468876557`*^9, 
   3.822657175355634*^9, 3.822661402924587*^9, {3.822916077740997*^9, 
   3.8229161065908413`*^9}, 3.8229199888170023`*^9, 3.822920030691944*^9, {
   3.822920142992319*^9, 3.822920155763172*^9}, {3.8229201881285334`*^9, 
   3.8229202082267733`*^9}, {3.8229202609706354`*^9, 
   3.8229203051109324`*^9}, {3.822920352192934*^9, 3.8229203832518206`*^9}, 
   3.8229204493404474`*^9, {3.8229204809319344`*^9, 3.822920498650493*^9}, {
   3.8229205359447207`*^9, 3.8229205406261654`*^9}, {3.8229205868414927`*^9, 
   3.822920605730972*^9}, 3.822983058287205*^9, 3.823156787021421*^9, 
   3.8233379450776763`*^9, 3.8308637027848587`*^9, 3.8323177703812647`*^9, {
   3.8323179680479493`*^9, 3.832318001257698*^9}, {3.8323181494614763`*^9, 
   3.8323181708054576`*^9}, 3.832319623046305*^9, 3.832319747218787*^9, {
   3.8323198979724283`*^9, 3.8323199347672896`*^9}, 3.8323204525277348`*^9, 
   3.832320708470872*^9, {3.832320826041781*^9, 3.8323208427832327`*^9}, 
   3.8323208955375805`*^9, 3.8323367313662987`*^9, 3.832336774350545*^9, 
   3.8323368188905993`*^9, 3.841659457939431*^9, 3.8416595127638426`*^9, 
   3.847872237742988*^9, 3.8478722684319077`*^9, {3.8500387732662926`*^9, 
   3.8500387779778776`*^9}, {3.8500390104852695`*^9, 3.8500390345718513`*^9}, 
   3.8500391681264973`*^9, 3.850039212352021*^9, 3.8500393113714037`*^9, 
   3.8500393906251736`*^9, {3.8500394360220013`*^9, 3.850039449781398*^9}, {
   3.850039503004349*^9, 3.8500395760355825`*^9}, 3.8500398759161625`*^9, 
   3.8500399125584283`*^9, {3.8500401825191593`*^9, 3.8500402811041794`*^9}, {
   3.8500403156766777`*^9, 3.8500403717755337`*^9}, {3.8500404804163046`*^9, 
   3.8500405052801027`*^9}, {3.85004055441187*^9, 3.850040583583705*^9}, {
   3.850040633833293*^9, 3.850040698738803*^9}, {3.850040729656604*^9, 
   3.850040755179165*^9}, 3.8500407945832605`*^9, 3.850040899740732*^9, 
   3.8500417466452665`*^9, 3.8500418339033055`*^9, {3.8500419766158123`*^9, 
   3.8500420253800893`*^9}, {3.8500421185818806`*^9, 3.8500421366643023`*^9}, 
   3.850042178424899*^9, {3.8500423991385655`*^9, 3.8500424057388678`*^9}, {
   3.8500424396740365`*^9, 3.8500424886024065`*^9}, {3.8500425264025645`*^9, 
   3.8500425708443174`*^9}, 3.850042611427*^9, 3.850042673363476*^9, {
   3.855478394516157*^9, 3.8554784176666555`*^9}, 3.8554785160254555`*^9, {
   3.855479546955366*^9, 3.855479564052106*^9}, 3.8565864418009586`*^9},
 CellLabel->"Out[23]=",ExpressionUUID->"005312a8-4482-4921-bbab-ed7b255cad57"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
   ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Export", "[", 
    RowBox[{"\"\<rate-vs-shock-data.txt\>\"", ",", "data"}], "]"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp", " ", "=", " ", "prateChange"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<rate-vs-shockMag.pdf\>\"", ",", "ppp"}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8226571541114492`*^9, 3.8226571884955125`*^9}, {
   3.822661345057344*^9, 3.822661386556385*^9}, 3.8226614511245546`*^9, 
   3.822920782376318*^9, {3.8308637187843714`*^9, 3.8308637203638372`*^9}, {
   3.8323208588589416`*^9, 3.8323209065162616`*^9}},
 CellLabel->"In[24]:=",ExpressionUUID->"88e686de-fcbb-49cb-8c44-1b78b54c627a"],

Cell[BoxData["\<\"rate-vs-shockMag.pdf\"\>"], "Output",
 CellChangeTimes->{3.8565864483404727`*^9},
 CellLabel->"Out[26]=",ExpressionUUID->"f93f4abc-af7f-47e1-9f39-9e6396a4100c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "rate", " ", "data", " ", "as", " ", "computed", " ", "below", " ", "in", 
    " ", "the", " ", "next", " ", "block", " ", "along", " ", "with", " ", 
    "standard", " ", "deviation"}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", " ", 
  RowBox[{"(*", 
   RowBox[{
   "number", " ", "of", " ", "cells", " ", "in", " ", "a", " ", 
    "measurement"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"numCells", " ", "=", " ", "50"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"factor", " ", "=", " ", 
     RowBox[{"Sqrt", "[", "numCells", "]"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"rateData", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0", ",", "0", ",", "0.00000001"}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"0.4", ",", 
         RowBox[{"-", "0.00927270748023236`"}], ",", 
         FractionBox["0.4533915973780178`", "factor"]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.6", ",", "0.005915768766586242`", ",", 
         FractionBox["0.20000233822460314`", "factor"]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.8", ",", 
         RowBox[{"-", "0.23079125081020635`"}], ",", 
         FractionBox["0.22172047314442492`", "factor"]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"1.0", ",", 
         RowBox[{"-", "0.3017462718145392`"}], ",", 
         FractionBox["0.13483704006686628`", "factor"]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"1.2", ",", 
         RowBox[{"-", "0.4766745071648516`"}], ",", 
         FractionBox["0.2792496773309272`", "factor"]}], "}"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"{", 
        RowBox[{"2.0", ",", 
         RowBox[{"-", "0.7679414402836716`"}], ",", 
         FractionBox["0.2962233885651782`", "factor"]}], "}"}]}], "}"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{"nlm", "=", 
    RowBox[{"NonlinearModelFit", "[", 
     RowBox[{
      RowBox[{"rateData", "[", 
       RowBox[{"[", 
        RowBox[{
         RowBox[{"4", ";;"}], ",", " ", 
         RowBox[{"{", 
          RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}], ",", 
      RowBox[{"a", " ", "x"}], ",", 
      RowBox[{"{", "a", "}"}], ",", "x", ",", 
      RowBox[{"VarianceEstimatorFunction", "\[Rule]", 
       RowBox[{"(", 
        RowBox[{"1", "&"}], ")"}]}], ",", 
      RowBox[{"Weights", "\[Rule]", 
       RowBox[{"1", "/", 
        RowBox[{"rateData", "[", 
         RowBox[{"[", 
          RowBox[{
           RowBox[{"4", ";;"}], ",", "3"}], "]"}], "]"}]}]}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"nlm", "[", 
    RowBox[{"{", 
     RowBox[{"\"\<BestFit\>\"", ",", "\"\<ParameterTable\>\""}], "}"}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.8554796634022045`*^9, 3.8554797533855367`*^9}, {
   3.8554798120690084`*^9, 3.855479813189356*^9}, {3.8554799817367105`*^9, 
   3.855480001359907*^9}, {3.8554808759348693`*^9, 3.855480981230154*^9}, {
   3.8564282945146494`*^9, 3.856428294624032*^9}, 3.8564283814659643`*^9},
 CellLabel->"In[6]:=",ExpressionUUID->"fed5bc90-9bb4-4fb2-898b-41b10db97b55"],

Cell[BoxData[
 TagBox[
  RowBox[{"FittedModel", "[", 
   TagBox[
    PanelBox[
     TagBox[
      RowBox[{
       RowBox[{"-", "0.35576053209257924`"}], " ", "x"}],
      Short[#, 2]& ],
     FrameMargins->5],
    Editable -> False], "]"}],
  InterpretTemplate[
  FittedModel[{
    "Nonlinear", {$CellContext`a -> -0.35576053209257924`}, \
{{$CellContext`x}, $CellContext`a $CellContext`x}}, {{31.89181274775426, 
    52.44158287929564, 25.321668692515075`, 23.870727582030966`}}, {{
    0.8, -0.23079125081020635`}, {1., -0.3017462718145392}, {
    1.2, -0.4766745071648516}, {2., -0.7679414402836716}}, 
    Function[Null, 
     Internal`LocalizedBlock[{$CellContext`a, $CellContext`x}, #], {HoldAll}],
     VarianceEstimatorFunction -> (1& )]& ],
  Editable->False,
  SelectWithContents->True,
  Selectable->True]], "Output",
 CellChangeTimes->{{3.855479710749601*^9, 3.8554797198552284`*^9}, {
   3.8554797504472685`*^9, 3.8554797539792585`*^9}, 3.8554798138659525`*^9, 
   3.855480002000557*^9, 3.8554809822279463`*^9, 3.8564282955076494`*^9, 
   3.85642838159212*^9},
 CellLabel->"Out[9]=",ExpressionUUID->"31fc138f-47ea-4d21-b600-546cda7c3e27"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{
    RowBox[{"-", "0.35576053209257924`"}], " ", "x"}], ",", 
   StyleBox[
    TagBox[GridBox[{
       {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\
\[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"},
       {"a", 
        RowBox[{"-", "0.35576053209257924`"}], "0.06987738765404679`", 
        RowBox[{"-", "5.091211106143522`"}], "0.014647158429148502`"}
      },
      AutoDelete->False,
      GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}},
      GridBoxDividers->{
       "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, 
        "RowsIndexed" -> {2 -> GrayLevel[0.7]}},
      GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
      GridBoxSpacings->{
       "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}],
     "Grid"], "DialogStyle",
    StripOnInput->False]}], "}"}]], "Output",
 CellChangeTimes->{{3.855479710749601*^9, 3.8554797198552284`*^9}, {
   3.8554797504472685`*^9, 3.8554797539792585`*^9}, 3.8554798138659525`*^9, 
   3.855480002000557*^9, 3.8554809822279463`*^9, 3.8564282955076494`*^9, 
   3.856428381638997*^9},
 CellLabel->"Out[10]=",ExpressionUUID->"2847be1e-535b-4906-8195-3a3434c5bde9"]
}, Open  ]],

Cell[BoxData[{"predictedSlope", "\[IndentingNewLine]", "fitCRLine1"}], "Input",
 CellChangeTimes->{{3.855479307012809*^9, 3.8554793080155416`*^9}, {
  3.8554794456713057`*^9, 3.8554794457494316`*^9}},
 CellLabel->
  "In[415]:=",ExpressionUUID->"e78acb19-2ea2-4448-bd38-7286de148f14"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"rateData", "[", 
  RowBox[{"[", 
   RowBox[{
    RowBox[{"4", ";;"}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}]], "Input",
 CellLabel->
  "In[497]:=",ExpressionUUID->"f9b3f208-a823-4762-9c99-ad2ed7726176"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"0.8`", ",", 
     RowBox[{"-", "0.23079125081020635`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"1.`", ",", 
     RowBox[{"-", "0.3017462718145392`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"1.2`", ",", 
     RowBox[{"-", "0.4766745071648516`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2.`", ",", 
     RowBox[{"-", "0.7679414402836716`"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.8554792944618263`*^9, 3.8554793087186975`*^9}, 
   3.85547944623031*^9, 3.855479775208548*^9},
 CellLabel->
  "Out[497]=",ExpressionUUID->"ba9eb4af-65db-49aa-8d36-6ae4afd0675f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"ListPlot", "[", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"rateData", "[", 
        RowBox[{"[", 
         RowBox[{"n", ",", " ", "1"}], "]"}], "]"}], ",", " ", 
       RowBox[{"Around", "[", 
        RowBox[{
         RowBox[{"rateData", "[", 
          RowBox[{"[", 
           RowBox[{"n", ",", "2"}], "]"}], "]"}], ",", " ", 
         RowBox[{"rateData", "[", 
          RowBox[{"[", 
           RowBox[{"n", ",", "3"}], "]"}], "]"}]}], "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"n", ",", "1", ",", " ", 
       RowBox[{"Length", "[", "rateData", "]"}]}], "}"}]}], "]"}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.8554785514976325`*^9, 3.855478584542331*^9}, {
   3.8554786312634835`*^9, 3.855478654196005*^9}, {3.855478721843417*^9, 
   3.8554787743150153`*^9}, {3.855478845396864*^9, 3.8554790075931816`*^9}, 
   3.855479669077981*^9},
 CellLabel->
  "In[504]:=",ExpressionUUID->"5c4a09e8-f555-4689-a036-a5efa388f646"],

Cell[BoxData[
 GraphicsBox[{{{
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{{}, {LineBox[{{0., -1.*^-8}, {0., 0.}}], 
         LineBox[{{0., 0.}, {0., 1.*^-8}}]}},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{{}, {
         LineBox[{{0.4, -0.05461186721803414}, {0.4, -0.00927270748023236}}], 
         LineBox[{{0.4, -0.00927270748023236}, {0.4, 0.03606645225756942}}]}},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{{}, {
         LineBox[{{0.6, -0.014084465055874074`}, {0.6, 
          0.005915768766586242}}], 
         LineBox[{{0.6, 0.005915768766586242}, {0.6, 
          0.025916002589046555`}}]}},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{{}, {
         LineBox[{{0.8, -0.25296329812464885`}, {
          0.8, -0.23079125081020635`}}], 
         LineBox[{{0.8, -0.23079125081020635`}, {
          0.8, -0.20861920349576385`}}]}},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{{}, {
         LineBox[{{1., -0.31522997582122586`}, {1., -0.3017462718145392}}], 
         LineBox[{{1., -0.3017462718145392}, {1., -0.2882625678078526}}]}},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{{}, {
         LineBox[{{1.2, -0.5045994748979443}, {1.2, -0.4766745071648516}}], 
         LineBox[{{1.2, -0.4766745071648516}, {1.2, -0.4487495394317589}}]}},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{{}, {
         LineBox[{{2., -0.7975637791401894}, {2., -0.7679414402836716}}], 
         LineBox[{{2., -0.7679414402836716}, {2., -0.7383191014271538}}]}},
       Antialiasing->False]}}, {
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{
        GeometricTransformationBox[
         LineBox[{}], {{{1., 0.}, {0., 1.}}, {0., 0.}}], 
        GeometricTransformationBox[
         LineBox[{{{0., 1.*^-8}, Offset[{3, 0}, {0., 1.*^-8}]}, {{0., 1.*^-8},
             Offset[{-3, 0}, {0., 1.*^-8}]}, {{0., -1.*^-8}, 
            Offset[{3, 0}, {0., -1.*^-8}]}, {{0., -1.*^-8}, 
            Offset[{-3, 0}, {0., -1.*^-8}]}}], {{{1., 0.}, {0., 1.}}, {0., 
          0.}}]},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{
        GeometricTransformationBox[
         LineBox[{}], {{{1., 0.}, {0., 1.}}, {0., 0.}}], 
        GeometricTransformationBox[
         LineBox[{{{0.4, 0.03606645225756942}, 
            Offset[{3, 0}, {0.4, 0.03606645225756942}]}, {{0.4, 
            0.03606645225756942}, 
            Offset[{-3, 0}, {0.4, 0.03606645225756942}]}, {{
            0.4, -0.05461186721803414}, 
            Offset[{3, 0}, {0.4, -0.05461186721803414}]}, {{
            0.4, -0.05461186721803414}, 
            Offset[{-3, 0}, {0.4, -0.05461186721803414}]}}], {{{1., 0.}, {0., 
          1.}}, {0., 0.}}]},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{
        GeometricTransformationBox[
         LineBox[{}], {{{1., 0.}, {0., 1.}}, {0., 0.}}], 
        GeometricTransformationBox[
         LineBox[{{{0.6, 0.025916002589046555`}, 
            Offset[{3, 0}, {0.6, 0.025916002589046555`}]}, {{0.6, 
            0.025916002589046555`}, 
            Offset[{-3, 0}, {0.6, 0.025916002589046555`}]}, {{
            0.6, -0.014084465055874074`}, 
            Offset[{3, 0}, {0.6, -0.014084465055874074`}]}, {{
            0.6, -0.014084465055874074`}, 
            Offset[{-3, 0}, {0.6, -0.014084465055874074`}]}}], {{{1., 0.}, {
          0., 1.}}, {0., 0.}}]},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{
        GeometricTransformationBox[
         LineBox[{}], {{{1., 0.}, {0., 1.}}, {0., 0.}}], 
        GeometricTransformationBox[
         LineBox[{{{0.8, -0.20861920349576385`}, 
            Offset[{3, 0}, {0.8, -0.20861920349576385`}]}, {{
            0.8, -0.20861920349576385`}, 
            Offset[{-3, 0}, {0.8, -0.20861920349576385`}]}, {{
            0.8, -0.25296329812464885`}, 
            Offset[{3, 0}, {0.8, -0.25296329812464885`}]}, {{
            0.8, -0.25296329812464885`}, 
            Offset[{-3, 0}, {0.8, -0.25296329812464885`}]}}], {{{1., 0.}, {0.,
           1.}}, {0., 0.}}]},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{
        GeometricTransformationBox[
         LineBox[{}], {{{1., 0.}, {0., 1.}}, {0., 0.}}], 
        GeometricTransformationBox[
         LineBox[{{{1., -0.2882625678078526}, 
            Offset[{3, 0}, {1., -0.2882625678078526}]}, {{
            1., -0.2882625678078526}, 
            Offset[{-3, 0}, {1., -0.2882625678078526}]}, {{
            1., -0.31522997582122586`}, 
            Offset[{3, 0}, {1., -0.31522997582122586`}]}, {{
            1., -0.31522997582122586`}, 
            Offset[{-3, 0}, {1., -0.31522997582122586`}]}}], {{{1., 0.}, {0., 
          1.}}, {0., 0.}}]},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{
        GeometricTransformationBox[
         LineBox[{}], {{{1., 0.}, {0., 1.}}, {0., 0.}}], 
        GeometricTransformationBox[
         LineBox[{{{1.2, -0.4487495394317589}, 
            Offset[{3, 0}, {1.2, -0.4487495394317589}]}, {{
            1.2, -0.4487495394317589}, 
            Offset[{-3, 0}, {1.2, -0.4487495394317589}]}, {{
            1.2, -0.5045994748979443}, 
            Offset[{3, 0}, {1.2, -0.5045994748979443}]}, {{
            1.2, -0.5045994748979443}, 
            Offset[{-3, 0}, {1.2, -0.5045994748979443}]}}], {{{1., 0.}, {0., 
          1.}}, {0., 0.}}]},
       Antialiasing->False]}, 
     {RGBColor[0.368417, 0.506779, 0.709798], 
      StyleBox[{
        GeometricTransformationBox[
         LineBox[{}], {{{1., 0.}, {0., 1.}}, {0., 0.}}], 
        GeometricTransformationBox[
         LineBox[{{{2., -0.7383191014271538}, 
            Offset[{3, 0}, {2., -0.7383191014271538}]}, {{
            2., -0.7383191014271538}, 
            Offset[{-3, 0}, {2., -0.7383191014271538}]}, {{
            2., -0.7975637791401894}, 
            Offset[{3, 0}, {2., -0.7975637791401894}]}, {{
            2., -0.7975637791401894}, 
            Offset[{-3, 0}, {2., -0.7975637791401894}]}}], {{{1., 0.}, {0., 
          1.}}, {0., 0.}}]},
       Antialiasing->False]}}}, {
    {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.011000000000000001`],
      AbsoluteThickness[1.6], 
     PointBox[{{0., 0.}, {0.4, -0.00927270748023236}, {0.6, 
      0.005915768766586242}, {0.8, -0.23079125081020635`}, {
      1., -0.3017462718145392}, {1.2, -0.4766745071648516}, {
      2., -0.7679414402836716}}]}, {
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
      0.011000000000000001`], AbsoluteThickness[1.6]}, {}}, {
     {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
      0.011000000000000001`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0, 2.}, {-0.7975637791401894, 0.03606645225756942}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.855478771552559*^9, {3.8554788481869183`*^9, 3.8554789069561987`*^9}, {
   3.8554789815266666`*^9, 3.8554790079494305`*^9}, 3.8554800197282057`*^9},
 CellLabel->
  "Out[504]=",ExpressionUUID->"d20ff660-a51a-4408-86e1-9f515d6ad1ad"],

Cell[BoxData["\<\"rate-vs-shockMag.pdf\"\>"], "Output",
 CellChangeTimes->{{3.8226571845141735`*^9, 3.8226571890739474`*^9}, 
   3.8226614593325815`*^9, 3.8229207903409777`*^9, 3.822983066071375*^9, 
   3.823337972961836*^9, 3.8308637337455444`*^9, 3.8323208605860424`*^9, {
   3.8323208934635344`*^9, 3.8323209067522917`*^9}, 3.8416595276488266`*^9, 
   3.8478723644524813`*^9, 3.850042063717519*^9, 3.850042685963874*^9},
 CellLabel->
  "Out[555]=",ExpressionUUID->"f151afba-7f72-4793-90f2-a261f6bb0cd0"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", "\"\<z old Figures\>\"", ",", " ", 
       "\"\<Supplimentary Figs\>\""}], "}"}], "]"}], "]"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"indx", " ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"molarVals", "  ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
    "400", ",", " ", "600", ",", " ", "800", ",", " ", "1000", ",", " ", 
     "1200", ",", "2000"}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"rateVSTime", " ", "=", " ", 
    RowBox[{"Import", "[", 
     RowBox[{
      RowBox[{"\"\<rate-vs-time-\>\"", " ", "<>", " ", 
       RowBox[{"ToString", "[", 
        RowBox[{"molarVals", "[", 
         RowBox[{"[", "indx", "]"}], "]"}], "]"}], " ", "<>", 
       "\"\<mM.txt\>\""}], ",", "\"\<Data\>\""}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ShockInds", " ", "=", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"52", ",", "82"}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"19", ",", "24"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"20", ",", "25"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"20", ",", "25"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"20", ",", "25"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"20", ",", "25"}], "}"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"smoothing", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{"15", ",", " ", "1", ",", "1", ",", "1", ",", "1", ",", "1"}], 
     "}"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"rateVSTime", "[", 
     RowBox[{"[", 
      RowBox[{";;", ",", "2"}], "]"}], "]"}], " ", "=", " ", 
    RowBox[{"3600", " ", 
     RowBox[{"rateVSTime", "[", 
      RowBox[{"[", 
       RowBox[{";;", ",", "2"}], "]"}], "]"}]}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"averagePlot", " ", "=", " ", 
    RowBox[{"ParametricPlot", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           RowBox[{"rateVSTime", "[", 
            RowBox[{"[", 
             RowBox[{
              RowBox[{"ShockInds", "[", 
               RowBox[{"[", 
                RowBox[{"indx", ",", "1"}], "]"}], "]"}], ",", "1"}], "]"}], 
            "]"}], "t"}], ",", 
          RowBox[{"Mean", "[", 
           RowBox[{"rateVSTime", "[", 
            RowBox[{"[", 
             RowBox[{
              RowBox[{";;", 
               RowBox[{"ShockInds", "[", 
                RowBox[{"[", 
                 RowBox[{"indx", ",", "1"}], "]"}], "]"}]}], ",", "2"}], 
             "]"}], "]"}], "]"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           RowBox[{"rateVSTime", "[", 
            RowBox[{"[", 
             RowBox[{
              RowBox[{"ShockInds", "[", 
               RowBox[{"[", 
                RowBox[{"indx", ",", "2"}], "]"}], "]"}], ",", "1"}], "]"}], 
            "]"}], " ", "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"rateVSTime", "[", 
               RowBox[{"[", 
                RowBox[{
                 RowBox[{"-", "1"}], ",", "1"}], "]"}], "]"}], "-", 
              RowBox[{"rateVSTime", "[", 
               RowBox[{"[", 
                RowBox[{
                 RowBox[{"ShockInds", "[", 
                  RowBox[{"[", 
                   RowBox[{"indx", ",", "2"}], "]"}], "]"}], ",", "1"}], 
                "]"}], "]"}]}], ")"}], " ", "t"}]}], ",", 
          RowBox[{"Mean", "[", 
           RowBox[{"rateVSTime", "[", 
            RowBox[{"[", 
             RowBox[{
              RowBox[{
               RowBox[{"ShockInds", "[", 
                RowBox[{"[", 
                 RowBox[{"indx", ",", "2"}], "]"}], "]"}], ";;"}], ",", "2"}],
              "]"}], "]"}], "]"}]}], "}"}]}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", "1"}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Darker", "[", "Red", "]"}], "}"}], ",", " ", 
         RowBox[{"Darker", "[", "Orange", "]"}]}], "}"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "moving", " ", "average", " ", "parameter", " ", "is", " ", "15", " ", 
    "for", " ", "the", " ", "400", " ", "shock"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"llpRateVSTime", " ", "=", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"MovingAverage", "[", 
       RowBox[{"rateVSTime", ",", 
        RowBox[{"smoothing", "[", 
         RowBox[{"[", "indx", "]"}], "]"}]}], "]"}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"deviation", " ", "=", " ", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"molarVals", "[", 
     RowBox[{"[", "indx", "]"}], "]"}], ",", " ", 
    FractionBox[
     RowBox[{
      RowBox[{"Mean", "[", 
       RowBox[{"rateVSTime", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{
           RowBox[{"ShockInds", "[", 
            RowBox[{"[", 
             RowBox[{"indx", ",", "2"}], "]"}], "]"}], ";;"}], ",", "2"}], 
         "]"}], "]"}], "]"}], " ", "-", " ", 
      RowBox[{"Mean", "[", 
       RowBox[{"rateVSTime", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{";;", 
           RowBox[{"ShockInds", "[", 
            RowBox[{"[", 
             RowBox[{"indx", ",", "1"}], "]"}], "]"}]}], ",", "2"}], "]"}], 
        "]"}], "]"}]}], 
     RowBox[{"Mean", "[", 
      RowBox[{"rateVSTime", "[", 
       RowBox[{"[", 
        RowBox[{
         RowBox[{";;", 
          RowBox[{"ShockInds", "[", 
           RowBox[{"[", 
            RowBox[{"indx", ",", "1"}], "]"}], "]"}]}], ",", "2"}], "]"}], 
       "]"}], "]"}]], ",", " ", 
    FractionBox[
     RowBox[{
      RowBox[{"StandardDeviation", "[", 
       RowBox[{"rateVSTime", "[", 
        RowBox[{"[", 
         RowBox[{
          RowBox[{
           RowBox[{"ShockInds", "[", 
            RowBox[{"[", 
             RowBox[{"indx", ",", "2"}], "]"}], "]"}], ";;"}], ",", "2"}], 
         "]"}], "]"}], "]"}], " "}], 
     RowBox[{"Mean", "[", 
      RowBox[{"rateVSTime", "[", 
       RowBox[{"[", 
        RowBox[{
         RowBox[{";;", 
          RowBox[{"ShockInds", "[", 
           RowBox[{"[", 
            RowBox[{"indx", ",", "1"}], "]"}], "]"}]}], ",", "2"}], "]"}], 
       "]"}], "]"}]]}], "}"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"rateVSTime", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"ShockInds", "[", 
       RowBox[{"[", 
        RowBox[{"indx", ",", "2"}], "]"}], "]"}], ",", "1"}], "]"}], "]"}], 
   " ", "-", 
   RowBox[{"rateVSTime", "[", 
    RowBox[{"[", 
     RowBox[{
      RowBox[{"ShockInds", "[", 
       RowBox[{"[", 
        RowBox[{"indx", ",", "1"}], "]"}], "]"}], ",", "1"}], "]"}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp", " ", "=", " ", 
   RowBox[{"Show", "[", 
    RowBox[{"llpRateVSTime", ",", "averagePlot"}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{
   RowBox[{"\"\<rate-vs-time-\>\"", " ", "<>", " ", 
    RowBox[{"ToString", "[", 
     RowBox[{"molarVals", "[", 
      RowBox[{"[", "indx", "]"}], "]"}], "]"}], " ", "<>", "\"\<mM.pdf\>\""}],
    ",", "ppp"}], "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.823073299159144*^9, 3.8230733737644415`*^9}, {
   3.8230734477815094`*^9, 3.8230735536139183`*^9}, {3.8230736207733774`*^9, 
   3.823073704796401*^9}, {3.823073959278636*^9, 3.823074006781031*^9}, {
   3.8230740709193954`*^9, 3.823074161677523*^9}, {3.8230752418469296`*^9, 
   3.823075281724676*^9}, {3.8230753700380225`*^9, 3.8230754148215885`*^9}, {
   3.823075599750649*^9, 3.8230756516941757`*^9}, {3.8230757535736103`*^9, 
   3.823075763653057*^9}, {3.8230759613086805`*^9, 3.823076202460312*^9}, {
   3.8230762682777023`*^9, 3.8230764876861873`*^9}, {3.823076525935602*^9, 
   3.8230765606616526`*^9}, {3.8230766087482643`*^9, 3.823076707628488*^9}, {
   3.8230767518407965`*^9, 3.8230768023243084`*^9}, {3.8230768614211626`*^9, 
   3.8230768631567364`*^9}, {3.8230769042691402`*^9, 3.823076915668149*^9}, {
   3.823076946254076*^9, 3.8230770833414326`*^9}, {3.823336124241791*^9, 
   3.823336182355109*^9}, {3.8233362349860687`*^9, 3.823336262026047*^9}, {
   3.8233363829794908`*^9, 3.823336456401986*^9}, {3.8233364870650682`*^9, 
   3.823336491392004*^9}, {3.8233365228105836`*^9, 3.8233367050146956`*^9}, {
   3.823336763744948*^9, 3.8233368151592164`*^9}, {3.8233368469207087`*^9, 
   3.8233370010007963`*^9}, {3.823337036968584*^9, 3.823337250118681*^9}, {
   3.823337323777881*^9, 3.823337444535819*^9}, {3.8233374822155423`*^9, 
   3.8233374929664164`*^9}, {3.823337578903367*^9, 3.82333769839218*^9}, 
   3.823338210262371*^9, {3.855470091381289*^9, 3.8554700937311354`*^9}, {
   3.8554701369802847`*^9, 3.855470138980282*^9}, {3.8554776347671876`*^9, 
   3.8554776878724966`*^9}, 3.8554779492138853`*^9, {3.855477991400598*^9, 
   3.855478058291607*^9}, 3.855480630669397*^9},
 CellLabel->
  "In[730]:=",ExpressionUUID->"8752d8d7-aa28-40f1-8f03-4ffb444644e6"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"400", ",", 
   RowBox[{"-", "0.00927270748023236`"}], ",", "0.4533915973780178`"}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.82333657331966*^9, 3.823336705301325*^9}, {
   3.8233367644713564`*^9, 3.8233367910350685`*^9}, {3.8233369294377604`*^9, 
   3.823337001920794*^9}, {3.823337042169291*^9, 3.8233370791197605`*^9}, 
   3.823337254244278*^9, {3.8233373251485424`*^9, 3.8233373858279114`*^9}, {
   3.8233374174455295`*^9, 3.8233374448073325`*^9}, {3.823337600911871*^9, 
   3.823337698542478*^9}, 3.8233382141007605`*^9, 3.855470066458599*^9, 
   3.8554701426833797`*^9, 3.855477418492922*^9, 3.855477689056695*^9, 
   3.8554779501640573`*^9, {3.8554779918380995`*^9, 3.855478059163554*^9}, 
   3.8554806308568754`*^9},
 CellLabel->
  "Out[739]=",ExpressionUUID->"af3eeb00-c6ce-4e88-8248-bf1ce2f2af88"],

Cell[BoxData["300"], "Output",
 CellChangeTimes->{{3.82333657331966*^9, 3.823336705301325*^9}, {
   3.8233367644713564`*^9, 3.8233367910350685`*^9}, {3.8233369294377604`*^9, 
   3.823337001920794*^9}, {3.823337042169291*^9, 3.8233370791197605`*^9}, 
   3.823337254244278*^9, {3.8233373251485424`*^9, 3.8233373858279114`*^9}, {
   3.8233374174455295`*^9, 3.8233374448073325`*^9}, {3.823337600911871*^9, 
   3.823337698542478*^9}, 3.8233382141007605`*^9, 3.855470066458599*^9, 
   3.8554701426833797`*^9, 3.855477418492922*^9, 3.855477689056695*^9, 
   3.8554779501640573`*^9, {3.8554779918380995`*^9, 3.855478059163554*^9}, 
   3.855480630888126*^9},
 CellLabel->
  "Out[740]=",ExpressionUUID->"922d8157-ab35-4eba-9334-84cfac6d2409"],

Cell[BoxData[
 GraphicsBox[{{{}, {{{}, {}, 
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 90], 0.011111111111111112`]], AbsoluteThickness[1.6], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJxN2Hk4ldvbB3BJlMoQpURpIEWlEuU49c2RVFKhRJRMEcmcVKZjnmfapm3b
kymRE02adFJpPE7RQWmUZChFSG+/9r2v6/WP6+N7r7WetdbzPHtt8+yPmDmJ
ioiIWI0TEfnf718/V83wMiXgmJ7lj/W/jF2YMRTrcVlNBILcEubvcoIYbGFu
jbYJ6VlGbeSrNljRp7taQ0eY74f3yJu06TfGBH5hB4PAWKX5HpSr2OOMZ+rb
JFfq384BiSFXz/sdJjMd8W/txxWbNpJfOOGxcYb3RGeyykHsF3cwZD0UtnfB
6XUuUZOqqX+mK9QsPAM2GArbH4L1RIWs7ceF7d2x/j9pZd5UYfvD+GfohcyE
RLpepgfWem8OvMyk/l4cwcUck1Cv6eRkT8yellsQFUz1Wl5on/W/P1D+0AuH
FUOq7udR7ukN47u6KduDyDI+GJynqvnCgnzGBz3Mhs0KO8k7fBGksLe8tu27
wH2+YNdP4tl1kpP9UOM0W+7yQbp+LX9smlnqbbSW/NAfKq535e9vJnsehaO0
sXKADFkmAM4JWiMaiuQzAUhsn+5s9Jquf8cx2LqYKz45RnnfMSRGTdx8Joyc
HIivJc8zWyqF4x/Hv09Ne3+vEY5/HJeXiI9xhfvleQKcFdabdsmNo/FPItw4
UmnvA+H4J5HBs5/1qIy8Iwg245Zci9IVjh8EA96TShEbWp/kYIjcnKZi8ZnW
Y2YI2KfdDiXdI7uEwEX65rKcLTSf2hDI/8M/KFtB+cRQ7G612aX29NuVX94T
Cun2xeWW9qJXf5kfitTAeeW32eMEHgrF8im+twzfUG4cBtkrLbPPO1KeHYYE
C2aG6DRyZximtL5TWh5DXvMnGtZImIqtEBE4+k9kW/eE+F/+IRi/+U8UaS1S
mlA3JrB6ON4k7w40+EoOCEd2z2BMM29U4IZwLJMa7hCfSp4ZAf5Lq5SajyMC
u0SgM4HdI39pWODaCCQynCb4hYzS/CPhsqjdxpI3XrC+eyKR5+m0fsNMMj8S
mYNhdgV3yEORCP1nxsqq9aICG0dheVrWhwVc2s/sKNw4HzlLcTu5Mwoao75Z
c+Vo/9ZEwzrLcdkFcXJ0NB58PKLYnUX70xwN/XHjBz/1k9Vj8JmX0OWrQvsV
EAObsT+GP34YEbghBqH75JY2fSHPjIVhIJIkZGl+LrEwP/9abmr5MO1/LMR2
Sy2tyiNPjINldt1TGSVqvycOsuvSXW6/opwfBzH/Z1csZ1E+FIcjqz/E98aR
jePxyaHRdmsDOTseolKFW+7NofE74zEiGthxP4L6W5OA/LCq57dtydEJeP6c
eXk4gNycgNd9PYcLhsnqiZDyzD1ScIb6D0gEx0+Sr3aU8oZEuBh9iV+lL5x/
ErqnBbKSJ9Hz4ZKEyi3vT+2zp/WrTcLerCvvNPeQxZKxuNLt+EVVWm/NZLyc
Wj/V/By1t0hGruLUCF9lyk8ko03m1eqKLjI7GdJHGV5XOsmNyYj0bKxaFEr7
O5AMt9oFgw9Ok5VSkBR8Jm/tarJhCuqvLra/tZruF/cUGM6zvSWnRE5PwcCc
6+YLHpAv/XTw2bU+2qICv07BhbBpk+fFUz4lFa2MWayKm2TtVIie2Zo/yqN6
m1Rc/lK6xT2a8vBUbJytE3J4FeVlqTi7xsz94hVyUypqnoa1z75BHk1F01aD
5ucN5IVpcPj1PqXnwyQNCmZJQRuNyb5pWHhK64vpC3JuGpQd2pZ13SbXp+F7
XfDnl/Xk7jSs66qw3ONJlk/H8SfB79QfkfXTIbrxEd8pmeyYDvVr/nGzU8nx
6ZC1Lc3mBJCr07GnXNQtbh65NR06vT01mhlksQzoLRfrZRiRNTPQKH//9tsJ
ZIsMiJor6F21JZ/IQF7ATPYSXTI7A1mPDd8rbSM3ZsCPv9UtYC55IAPS/FQb
q++0XkqZUPT3MfHSotwwEwdavFx0tMnumeipmDNYvpvq0zOxxe3g5zThfl7K
xMobHwpMhOv/OhOVW7/9xWAI9z8Lv3VOk7p8k3LtLBxKlDjHcSXbZMFPQ894
nRM5PAsnb+k5d12h9mVZMFlwraLblvKmLHzXeJj29Ajlo1lo1Np89Y8y8sJs
RBjrJ+ET2SQbX+6Iv+ofo/vbNxum+33nXLhJzs3G7/J2Z2t6yfXZkOxb5Mv3
pPbd2ejlybTsdKbx5U9h6aYFwzIVlOufwowDy89/XUK54ynIv1+QcV+THH8K
19lDQ+HuVF99Cq8utm8K/kZuPYWmF7deGq+gejEGyg74MS6aUK7JgKV7m0JH
DdmCgUArj/qeTPIJBi4ctC16AzKbgdy5z+bXC6+/kQHxmr8i3nHIAwzcikpa
l+tPVsrBijurlkfZkg1zsPC/iv7t+4XPfw66Lso2Rj0RPv85CG6XVOCP0Hpd
ysGiItUuuz3k1znIH/B1zIklT8lFk49STIc2vY+0c6ES/vOOF54fbHJxz+Nx
i8cicnguCl6u6TskPC+V5SLuxbPXW8eTm3KhGu/sNJJM/Y3m4pVsaJLzI/LC
PARbJSsVBFO9SR40JepXR6sI9z8PasX9R9N7qT43D9yljo7BSeT6PDB1Pe2L
JOh9252HOY2tKzMLyPL5eL/43gaNOLJ+PpZyXx1PrqD2jvmo3uqU42RHeXw+
7v32WWHuZBq/Oh8NUdoRizn0vm/Nhxf/eUS5FdWLFaDGrzVDdJByzQL8uWpo
5KYmtbcogK+XE2NYUvj+L0CzXpjTuS9Uzy5AQpTZkztzqb6xAONiU1R9yqj/
gQI0MLqH7QbIUkzwDT6Fy3tTf/OZkDSY49zUQe11mJBgS+lPjCNvYaLu7WSZ
i07kfUwoS+xbelSN7g9vJlgbJPMNllF/kUxsKy9PfLyXcgYTURt3N3CF55PT
TDTFhlg0lZCvM3HCnKVz8Qf1/4SJN/d4FQ5nyV1MaNRdH7tuSx5jQvvRffHu
MhpvWiF2rNE9yQ+kXK0QFSMWOupeZL1CME4bNygI18e0EG+tdz6pNKD29oUY
le3PNRV+PvoXwnBGbJ+48P6LLQR7SfOUlO3k/EKEvPGpvnuWrr+qEAdt6z8v
riL/XYieh4/U9j0kPyuEHKOrS3IquacQyj0FQWGPqD9RFt5t0Po+Tvh+ncGC
W3gQd5+uqMBLWMjdER3yB5/ydSzca/z5Y0K5GQsGFetjHiiTnVlQNYpgWjVQ
fSALrGXlHSfPkBNZ0DLhShqpklksKIZYTteoJp9jIS/KY+e1S+Q7LAxMiG57
LPz+186C+ZQP8/wyaf0+sTDNynrUZgFZvOjn+cPrW3UF1SsW4Y1yv5+D8H5a
VoTBWlV1beHzalAE+VHVbJUWar+7CKbaxtfMG8iHiuDO3utks4ju36CfeaPr
BP25lKcWIbrK5r8QXzK3CE89U45fuED1F4og9//7v1+EudUuWw96Uf6yCJ2W
4WW1YfQ8fS3CaZz60DKTckk2TDLZJ8x0KZ/DBlPisYrdRDrvrWSjY/ia5DhJ
Og8asaFfNX6oNuSbwNZsbMkqctcZGRTYg42drq5yjb9THsZG8bWuILFqciYb
2ycGLD3RPCRwCRui9bX+39vIdWycdVggU/GB/JiN5ZaM3t86yG/ZMNvYv8Qt
hzzMBvvuTp2ck9S/FAeV3WkfE9zo+udzILrw2Er1Tsp1OJhukHutrpDms4WD
ACv92PIfVL+Pg2uT+xRSsyj35iAmr67Z2oHySA4Mj+eEqbrT+ZvBwWbOtJPX
w6j+NAe3yr11LDXJ1zkwqM3y6B+g9k84kNl1wt3OifIuDsIWXKxc+J48xkHW
dYmC47dpftO4yBFf+EbBh6zGhXT3vIoNdWQ9Lk5bhvZ6Mmj9Tbko72h2tZ5J
87XnIro6Yf3OFsr9ufgtdBdj7W1yLBf/2VY+nDlI/eVzEWru+u9QJl1PFRfV
j9uvfC+m/G8uNLeaR3seoPzZz/Fmdp6f9I7m18NFvs70IxGaNL4oD5Xi7Kbk
IPIMHjYamkV193wReAkPKW6KRhIbKV/Hg45G1cS4Uro+Mx4+um6Tz9P/KrAz
Dz3yYVHLtal9IA+tb8071ySSE3n4+6WUuONDMouHDvmlpf4e1P4cD+NVJ8y4
mj4g8B0eyt3nfsos/SRwOw+dCoUVcS5U/4mHI0/dD3y0pv7E+ahuFePEfP4s
sCIfP17Ibt+lSvXL+Ag/f0Bs/hjZgA/1Wt0/GEa0Xrv5aC3MafWJofU6xAez
R1N6yg+6n4L4eCudIxqQRM9nKh9H+BMnPJcjc/nw3p4y/9xrqr/wc3yHvW8S
LpHv88GS5E9w5VD/L/n4yybls9U3yr/yoZJddKv3MFmyGLsjDsw2mUP1c4qR
Mq5LQUde+PwXQ1rZpEnpENUbFWNUImXK2nM0H+tiMLfHJO8XXo9HMfrK0t5H
2pDDinEjUWb5KV/qL7MY3xxvevqJ0PumpBgiYmW7LqrR/OqKobvtfUms8P32
uBg+7FVan6roffq2GI0r57oVCs/Tw8Vgd+qK8paKCixVgvrJJycbidB5f34J
XFrY3etkyTolWOPGXSFzgbylBF/reOrbzpP3lUC5Zeuko8pk7xKUt83uNDpJ
jiyBTo/64sl6NB6jBFoa8u+DTMmnS1B7r2LDBeH3veslsHwUaN59Q/j5X4L+
W0WSq4X/7+oqgZppz1H1WJrPWAmCnO43WM8Xfv6XgnM3rmOh8LyjVorBtqdf
brfQ+uqVwnyHlbOvNq2naSlqNlr27x9P9falYEYcPPfeknL/Uvj9rs3M7Rtb
/39c5c/m
        "]]}}, 
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 90], 0.011111111111111112`]], AbsoluteThickness[1.6], 
      CapForm["Butt"]}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 90], 0.011111111111111112`]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 90], 0.011111111111111112`]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0, 0], AbsoluteThickness[1.6], 
       Opacity[1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQDQN/VvzaMf/4f/vbc4+IrDMXcUDlq8D5R88Hv4gS
NIXzi46Zi3/xsYfzL1ssNJu6ygXOT1TPO90m7QXn3wzYwtGs7w/nL+F8eF0r
IgjO/zPdsHQ3dyicf/LwvrSLE8LhfME9+r1BPlFw/rnAu+yRN2Pg/LVTQs60
RcbD+SyXrj/i50iE83NWLOaU90lCmJf68FTy6mQ43+0Hs6ENSyqcb37LxfG6
axqcn7Lo++vli9LhfJ+dJxysX2QgwmMbtwGLZxacr9FlfCRhcTacP2tNJVPD
sxw4332r4e0rLnlw/gYejrg33flwfujch4e80wrg/AL1H8o2IoVw/ssbsrd6
tyH4DbU1sVVpRXB+Qq/vZgPhYjh/7hHdOI8tCP7Pd27XfiWVwPmbHPIX87GV
wvmb/3I6v1mK4F9ee3d9SnAZnB/QeqDQ7iuC/8b/DsPmJeVw/lNH9qcdHhVw
vtr8JbM1XiL47e+r5JOnV8L5LukJP/5ZVsH5Cpfq5pm+QvBdV/CLm02vhvOP
LV3/ZLpFDZyfPq2jfspzBD9lXUH+p65aOH+V4WlDKe06OJ9/RdzBOzcQ/Auu
jMsYquvh/BeLGIIbriL44Mwi0QDnAwDHae7j
        "]]},
      Annotation[#, "Charting`Private`Tag$90118#1"]& ], 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
       AbsoluteThickness[1.6], Opacity[1.], FaceForm[Opacity[0.3]], 
       LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQDQYVnQ4RTtNc9Wv+26+5ZWtfE9gF50dsra77odUN
54eL9UW3M/XC+dGFP5Ku7eqD85WupWs4mk6A87NOzvNLkp8I52/dydj1+CeC
f/n/+i/rn02C8x9vnXJJ6/xkOP9bxtKjrCumwPl3ChlfaE+eCucfK++U35Q3
Dc5f+Nb91DPX6XB+4M7AJWn6M+B85qb2yW6cM+H8jgUcmwq/IvgM+gecve/O
gvOrdy1+1bJ1Npx/YvalA5wL5sD5klW6a95VzYXzbdddPiaXMQ/ODw7aEPI3
YD6cv63yzm9Z0QVwvk4p29NHXQi+Sv6xG9d/IPgiCxXZlqQshPPf1SqdnnoT
wfeK3Dlru9siOH/C/a+M//cg+Ofnnl0ka7gYzu+PsvbLmYvgWx7ym/hAaAmc
n6Lx415LA4LfccwmjeENgj+NX711YcJSOF81fPm6orMI/jzPs/mZzsvg/BlW
ndYTNiL4PckPHPpkl8P5meZ3726chOAf5yxoZWVYAefzt684UleG4Afa1Nie
f4Xgi3x4esA/fCWcf8Dv6+2vZxD8d6tnMZ6xWgXnizreTqhchuCrNh4M95Fe
Dedv328b6d+B4N++P2+N+lEEH5xfmNbA+QAFg3j6
        "]]},
      Annotation[#, "Charting`Private`Tag$90118#2"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{3.3333333333333366`, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{3.3333333333333366`, 3515.}, {-2.3619475919999995`, 
   2.4845255999999996`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.82333657331966*^9, 3.823336705301325*^9}, {
   3.8233367644713564`*^9, 3.8233367910350685`*^9}, {3.8233369294377604`*^9, 
   3.823337001920794*^9}, {3.823337042169291*^9, 3.8233370791197605`*^9}, 
   3.823337254244278*^9, {3.8233373251485424`*^9, 3.8233373858279114`*^9}, {
   3.8233374174455295`*^9, 3.8233374448073325`*^9}, {3.823337600911871*^9, 
   3.823337698542478*^9}, 3.8233382141007605`*^9, 3.855470066458599*^9, 
   3.8554701426833797`*^9, 3.855477418492922*^9, 3.855477689056695*^9, 
   3.8554779501640573`*^9, {3.8554779918380995`*^9, 3.855478059163554*^9}, 
   3.8554806309350023`*^9},
 CellLabel->
  "Out[741]=",ExpressionUUID->"c2b19ae5-04cb-4403-b340-0a56c9a1f8f5"],

Cell[BoxData["\<\"rate-vs-time-400mM.pdf\"\>"], "Output",
 CellChangeTimes->{{3.82333657331966*^9, 3.823336705301325*^9}, {
   3.8233367644713564`*^9, 3.8233367910350685`*^9}, {3.8233369294377604`*^9, 
   3.823337001920794*^9}, {3.823337042169291*^9, 3.8233370791197605`*^9}, 
   3.823337254244278*^9, {3.8233373251485424`*^9, 3.8233373858279114`*^9}, {
   3.8233374174455295`*^9, 3.8233374448073325`*^9}, {3.823337600911871*^9, 
   3.823337698542478*^9}, 3.8233382141007605`*^9, 3.855470066458599*^9, 
   3.8554701426833797`*^9, 3.855477418492922*^9, 3.855477689056695*^9, 
   3.8554779501640573`*^9, {3.8554779918380995`*^9, 3.855478059163554*^9}, 
   3.85548063110804*^9},
 CellLabel->
  "Out[742]=",ExpressionUUID->"05cf7119-6d1e-4903-a927-0ad561d8ad6a"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"rateData", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{"400", ",", 
     RowBox[{"-", "0.00927270748023236`"}], ",", "0.4533915973780178`"}], 
    "}"}]}], ",", 
  RowBox[{"{", 
   RowBox[{"600", ",", "0.005915768766586242`", ",", "0.20000233822460314`"}],
    "}"}], ",", 
  RowBox[{"{", 
   RowBox[{"800", ",", 
    RowBox[{"-", "0.23079125081020635`"}], ",", "0.22172047314442492`"}], 
   "}"}], ",", " ", 
  RowBox[{"{", 
   RowBox[{"1000", ",", 
    RowBox[{"-", "0.3017462718145392`"}], ",", "0.13483704006686628`"}], 
   "}"}], ",", 
  RowBox[{"{", 
   RowBox[{"1200", ",", 
    RowBox[{"-", "0.4766745071648516`"}], ",", "0.2792496773309272`"}], "}"}],
   ",", "\[IndentingNewLine]", 
  RowBox[{"{", 
   RowBox[{"2000", ",", 
    RowBox[{"-", "0.7679414402836716`"}], ",", "0.2962233885651782`"}], 
   "}"}]}]], "Input",
 CellChangeTimes->{{3.8554779741338654`*^9, 
  3.8554780692776833`*^9}},ExpressionUUID->"7b1c6adf-729f-46de-b4aa-\
e789ce9dec48"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Cyclic", " ", "shock", " ", "Data"}], "*)"}]], "Input",
 CellChangeTimes->{{3.8188439492223473`*^9, 3.818843968169693*^9}, 
   3.822661422308369*^9},
 FontSize->72,ExpressionUUID->"8f01c4b9-a8fa-4086-b193-98d183d77785"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"Plot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListPlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"PointSize", "[", "0.02", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetOptions", "[", 
   RowBox[{"ListLinePlot", ",", 
    RowBox[{"LabelStyle", "->", 
     RowBox[{"Directive", "[", 
      RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
    " ", 
    RowBox[{"PlotStyle", "\[Rule]", " ", 
     RowBox[{"{", 
      RowBox[{"Blue", ",", 
       RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"SetOptions", "[", 
    RowBox[{"ParametricPlot", ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"Directive", "[", 
       RowBox[{"Black", ",", " ", "Bold", ",", " ", "Medium"}], "]"}]}], ",", 
     " ", 
     RowBox[{"PlotStyle", "\[Rule]", " ", 
      RowBox[{"{", 
       RowBox[{"Blue", ",", 
        RowBox[{"Thickness", "[", "0.006", "]"}]}], "}"}]}], ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"R0", " ", "=", " ", "0.00041"}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"youngs75", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"21.1", ",", "0.6"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"34.0", ",", "0.54"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"44.2", ",", " ", "0.47"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"58.0", ",", "0.45"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"109", ",", " ", "0.46"}], "}"}]}], "}"}], ".", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"R0", ",", " ", "0"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", " ", "1"}], "}"}]}], "}"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"strain75", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{
     "0.0115", ",", " ", "0.0108", ",", " ", "0.014", ",", " ", "0.0107", ",",
       " ", "0.0117"}], "}"}]}], ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"youngs200", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"2.28", ",", "0.91"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"18.31", ",", " ", "0.64"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"29.11", ",", " ", "0.5632"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"45.76", ",", " ", "0.58"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"58.11", ",", " ", "0.6123"}], "}"}]}], "}"}], ".", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"R0", ",", " ", "0"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", " ", "1"}], "}"}]}], "}"}]}]}], ";"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"youngs200", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"15.08", ",", "0.91"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"30.67", ",", " ", "0.64"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"46.1", ",", " ", "0.5632"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"62.06", ",", " ", "0.58"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"75.01", ",", " ", "0.6123"}], "}"}]}], "}"}], ".", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"R0", ",", " ", "0"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"0", ",", " ", "1"}], "}"}]}], "}"}]}]}], ";"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"youngs200", " ", "=", " ", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"27", ",", "0.91"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"43", ",", " ", "0.64"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"63", ",", " ", "0.5632"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"78", ",", " ", "0.58"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"92", ",", " ", "0.6123"}], "}"}]}], "}"}], ".", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"R0", ",", " ", "0"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", " ", "1"}], "}"}]}], "}"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"strain200", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{
     "0.0416", ",", " ", "0.0322", ",", " ", "0.0331", ",", " ", "0.0297", 
      ",", " ", "0.0329"}], "}"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot", "[", "youngs75", "]"}], "\[IndentingNewLine]", 
 RowBox[{"ListPlot", "[", "youngs200", "]"}]}], "Input",
 CellChangeTimes->{{3.8188439696517315`*^9, 3.81884427318547*^9}, {
  3.818845868890641*^9, 3.8188458982750854`*^9}, {3.8188520019592333`*^9, 
  3.818852047670027*^9}, {3.818853708533161*^9, 3.818853781637746*^9}, {
  3.8188646150727577`*^9, 3.8188646436653385`*^9}, {3.8188657833307104`*^9, 
  3.8188657848576293`*^9}},
 CellLabel->
  "In[283]:=",ExpressionUUID->"283c173c-f692-4477-ba7d-61f891937889"],

Cell[BoxData[
 GraphicsBox[{{}, {
    {RGBColor[0, 0, 1], PointSize[0.02], AbsoluteThickness[1.6], 
     PointBox[{{0.008651, 0.6}, {0.01394, 0.54}, {0.018122, 0.47}, {0.02378, 
      0.45}, {0.04469, 0.46}}]}, {
     {RGBColor[0, 0, 1], PointSize[0.02], AbsoluteThickness[1.6]}, {}}, {
     {RGBColor[0, 0, 1], PointSize[0.02], AbsoluteThickness[
      1.6]}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0.007900187500000223, 0.44166666666666693`},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[
    GrayLevel[0], Bold, Medium],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0.007900187500000223, 0.04469}, {0.44166666666666693`, 0.6}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8188458696815033`*^9, 3.818845898882467*^9}, {
   3.8188520036706553`*^9, 3.818852048342208*^9}, 3.8188537830918627`*^9, 
   3.818865785337347*^9},
 CellLabel->
  "Out[293]=",ExpressionUUID->"10d53ce4-a96f-4bc9-b7ff-6bda9af3f4dd"],

Cell[BoxData[
 GraphicsBox[{{}, {
    {RGBColor[0, 0, 1], PointSize[0.02], AbsoluteThickness[1.6], 
     PointBox[{{0.01107, 0.91}, {0.01763, 0.64}, {0.02583, 0.5632}, {0.03198, 
      0.58}, {0.03772, 0.6123}}]}, {
     {RGBColor[0, 0, 1], PointSize[0.02], AbsoluteThickness[1.6]}, {}}, {
     {RGBColor[0, 0, 1], PointSize[0.02], AbsoluteThickness[
      1.6]}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{True, True},
  AxesLabel->{None, None},
  AxesOrigin->{0.010514791666666889`, 0.5439333333333336},
  DisplayFunction->Identity,
  Frame->{{False, False}, {False, False}},
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{None, None},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[
    GrayLevel[0], Bold, Medium],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{0.010514791666666889`, 0.03772}, {0.5439333333333336, 0.91}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8188458696815033`*^9, 3.818845898882467*^9}, {
   3.8188520036706553`*^9, 3.818852048342208*^9}, 3.8188537830918627`*^9, 
   3.818865785388211*^9},
 CellLabel->
  "Out[294]=",ExpressionUUID->"14be8711-b412-4b51-968b-58c44869fb38"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"(*", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"widthError", "[", 
      RowBox[{
      "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", ",", " ", 
       "\[Epsilon]z_"}], "]"}], ":=", 
     RowBox[{
      RowBox[{
       RowBox[{"Total", "[", 
        RowBox[{
         RowBox[{"Range", "[", "endIndex", "]"}], 
         SuperscriptBox[
          RowBox[{"(", " ", 
           RowBox[{
            RowBox[{"filteredWidData", "[", 
             RowBox[{"[", 
              RowBox[{
               RowBox[{";;", "endIndex"}], ",", "2"}], "]"}], "]"}], " ", "-", 
            RowBox[{"(", " ", 
             RowBox[{
              RowBox[{"storedWidthFunction", "[", 
               RowBox[{
               "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", 
                "\[Epsilon]z"}], "]"}], " ", " ", "/@", " ", 
              RowBox[{"(", 
               RowBox[{"normalizedTime", "[", 
                RowBox[{"[", 
                 RowBox[{";;", "endIndex"}], "]"}], "]"}], ")"}]}], ")"}]}], 
           "  ", ")"}], "2"]}], "]"}], "\[IndentingNewLine]", 
       "\[IndentingNewLine]", "\[IndentingNewLine]", 
       RowBox[{"lengthError", "[", 
        RowBox[{
        "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", ",", " ", 
         "\[Epsilon]z_"}], "]"}]}], ":=", " ", 
      RowBox[{
       RowBox[{
        RowBox[{"Total", "[", 
         RowBox[{
          RowBox[{"Range", "[", "endIndex", "]"}], 
          SuperscriptBox[
           RowBox[{"(", "  ", 
            RowBox[{
             RowBox[{"filteredLenData", "[", 
              RowBox[{"[", 
               RowBox[{
                RowBox[{";;", "endIndex"}], ",", "2"}], "]"}], "]"}], " ", 
             "-", 
             RowBox[{"(", " ", 
              RowBox[{
               RowBox[{"storedLengthFunction", "[", 
                RowBox[{
                "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", 
                 "\[Epsilon]z"}], "]"}], " ", "/@", " ", 
               RowBox[{"(", 
                RowBox[{"normalizedTime", "[", 
                 RowBox[{"[", 
                  RowBox[{";;", "endIndex"}], "]"}], "]"}], ")"}]}], ")"}]}], 
            "  ", ")"}], "2"]}], "]"}], "\[IndentingNewLine]", 
        "\[IndentingNewLine]", "regularizer"}], " ", "=", " ", 
       "0.00000"}]}]}], ";", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"totalError", "[", 
      RowBox[{
      "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", ",", " ", 
       "\[Epsilon]z_"}], "]"}], ":=", " ", 
     RowBox[{
      RowBox[{"lengthError", "[", 
       RowBox[{
       "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", "\[Epsilon]z"}], 
       "]"}], " ", "+", 
      RowBox[{"0.05", 
       RowBox[{"widthError", "[", 
        RowBox[{
        "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", "\[Epsilon]z"}], 
        "]"}]}]}]}]}], " ", " ", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"+", " ", "regularizer"}], 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox["g1", "2"], " ", "+", " ", 
       SuperscriptBox["g2", "2"], " ", "+", " ", 
       SuperscriptBox["\[CapitalSigma]", "2"]}], ")"}]}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
   "(*", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"gRule", " ", "=", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"g1", "\[Rule]", "3.1222703395011506`"}], ",", 
        RowBox[{"g2", "\[Rule]", "6.188414869493781`"}], ",", 
        RowBox[{"\[CapitalSigma]", "\[Rule]", "0.00854796983106368`"}]}], 
       "}"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"g1", " ", "=", " ", 
      RowBox[{"gRule", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
     RowBox[{"g2", " ", "=", " ", 
      RowBox[{"gRule", "[", 
       RowBox[{"[", 
        RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
     RowBox[{"\[CapitalSigma]", " ", "=", " ", 
      RowBox[{"gRule", "[", 
       RowBox[{"[", 
        RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";"}], "*)"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Clear", "[", 
    RowBox[{"g1", ",", "g2", ",", "\[CapitalSigma]"}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
      RowBox[{"g1", "[", 
       RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
      RowBox[{"3.1222703395011506`", " ", 
       RowBox[{"(", 
        RowBox[{"1", "+", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"1.7773953754129888`", " ", "G1"}], "+", 
           RowBox[{"2.566842953327386`", " ", "G2"}], "+", 
           RowBox[{"0.02747736054811321`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
     ";", 
     RowBox[{
      RowBox[{"g2", "[", 
       RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
      RowBox[{"6.188414869493781`", 
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "5.087715917315581`"}], " ", "G1"}], "+", 
           RowBox[{"3.523010412342576`", " ", "G2"}], "-", 
           RowBox[{"0.004793348638681677`", " ", "G3"}]}], ")"}]}], ")"}]}]}],
      ";", 
     RowBox[{
      RowBox[{"\[CapitalSigma]", "[", 
       RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
      RowBox[{"0.00854796983106368`", " ", 
       RowBox[{"(", 
        RowBox[{"1", " ", "+", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"-", "0.00004826861936172766`"}], " ", "G1"}], "-", 
           RowBox[{"0.000058076814571811286`", " ", "G2"}], "+", 
           RowBox[{"0.008547636249675633`", " ", "G3"}]}], ")"}]}], ")"}]}]}],
      ";"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"g1", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
     RowBox[{"3.1222703395011506`", " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "0.08336178001420615`"}], " ", "G1"}], "+", 
          RowBox[{"0.008894441223598058`", " ", "G2"}], "+", 
          RowBox[{"0.3091129700312998`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
    ";", 
    RowBox[{
     RowBox[{"g2", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
     RowBox[{"6.188414869493781`", 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"0.028347844712845453`", " ", "G1"}], "+", 
          RowBox[{"0.15905674309004092`", " ", "G2"}], "+", 
          RowBox[{"0.0030681531807021305`", " ", "G3"}]}], ")"}]}], ")"}]}]}],
     ";", 
    RowBox[{
     RowBox[{"\[CapitalSigma]", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], "=", 
     RowBox[{"0.00854796983106368`", " ", 
      RowBox[{"(", 
       RowBox[{"1", " ", "+", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"111.07469724415829`", " ", "G1"}], "-", 
          RowBox[{"20.385388794158857`", " ", "G2"}], "+", 
          RowBox[{"30.541264956646692`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Clear", "[", 
    RowBox[{"(*", 
     RowBox[{"g1", ",", " ", "g2", ",", "\[CapitalSigma]", ","}], "*)"}], 
    "\[Epsilon]z", "]"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"min", " ", "=", " ", 
     RowBox[{"NMinimize", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"totalError", "[", 
          RowBox[{
           RowBox[{"g1", "[", 
            RowBox[{"0", ",", "G2", ",", "G3"}], "]"}], ",", " ", 
           RowBox[{"g2", "[", 
            RowBox[{"0", ",", "G2", ",", "0"}], "]"}], ",", 
           RowBox[{"\[CapitalSigma]", "[", 
            RowBox[{"0", ",", "G2", ",", "0"}], "]"}], ",", 
           "0.030821256038647344`"}], "]"}], " ", ",", 
         RowBox[{
          RowBox[{"-", "0.5"}], "<", "G1", "<", "0.5"}], ",", 
         RowBox[{
          RowBox[{"-", "5"}], "<", "G2", "<", "5"}], ",", " ", 
         RowBox[{
          RowBox[{"-", "4"}], "<", "G3", "<", "8"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"G1", ",", "G2", ",", " ", "G3"}], "}"}]}], "]"}]}], ";"}]}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"g1", " ", "=", " ", 
     RowBox[{"min", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"min", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"min", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "3", ",", "2"}], "]"}], "]"}]}], ";", " ", 
    RowBox[{"\[Epsilon]z", "=", 
     RowBox[{"min", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "4", ",", "2"}], "]"}], "]"}]}], ";"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "11.755475689507291`"}], ",", 
       RowBox[{"g2", "\[Rule]", "3.6478323495222624`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "18.778429197618312`"}], ",", 
       RowBox[{"\[Epsilon]z", "\[Rule]", "0.12503130977950452`"}]}], "}"}]}], 
    ";", "\[IndentingNewLine]", 
    RowBox[{"g1", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";", " ", 
    RowBox[{"\[Epsilon]z", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"4", ",", "2"}], "]"}], "]"}]}]}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"\[Epsilon]z", " ", "=", " ", 
    RowBox[{
     RowBox[{"min", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}], "\[IndentingNewLine]", 
     RowBox[{"GraphicsRow", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Show", "[", 
         RowBox[{"widthConfidence", ",", 
          RowBox[{"plotStoredWid", "[", 
           RowBox[{
           "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", "\[Epsilon]z"}],
            "]"}], ",", " ", 
          RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
        RowBox[{"Show", "[", 
         RowBox[{"lengthConfidence", ",", 
          RowBox[{"plotStoredLen", "[", 
           RowBox[{
           "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", "\[Epsilon]z"}],
            "]"}], ",", " ", 
          RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], " ", "}"}], 
      "]"}], "\[IndentingNewLine]", 
     RowBox[{"Clear", "[", 
      RowBox[{
      "g1", ",", " ", "g2", ",", "\[CapitalSigma]", ",", "\[Epsilon]z"}], 
      "]"}]}]}], "*)"}], "\[IndentingNewLine]", "*)"}]], "Input",
 CellChangeTimes->{{3.800886366618013*^9, 3.800886507496746*^9}, {
   3.800886618931081*^9, 3.8008866424022784`*^9}, {3.8008892266917734`*^9, 
   3.800889227611291*^9}, 3.8008945324280987`*^9, 3.8008946234675236`*^9, {
   3.800898276632612*^9, 3.8008982777426224`*^9}, 3.800898345200626*^9, 
   3.8009468427369742`*^9, {3.800950828514821*^9, 3.8009508347052364`*^9}, 
   3.8009529338388796`*^9, {3.8009543223640456`*^9, 3.800954336665778*^9}, {
   3.8009719180125036`*^9, 3.800971930856501*^9}, {3.8009719826519146`*^9, 
   3.8009720113650684`*^9}, {3.800972109891049*^9, 3.8009721408272705`*^9}, {
   3.8009722663005347`*^9, 3.8009722664431777`*^9}, {3.8009725482736597`*^9, 
   3.8009725856586037`*^9}, {3.800972627151605*^9, 3.8009726337300014`*^9}, {
   3.8010363668640575`*^9, 3.801036375181801*^9}, 3.801036418563745*^9, {
   3.801036450495304*^9, 3.8010364796033945`*^9}, {3.801036529568699*^9, 
   3.801036560526883*^9}, {3.801037055166328*^9, 3.801037108061945*^9}, {
   3.8010371451576867`*^9, 3.8010371861250963`*^9}, {3.801037372141385*^9, 
   3.8010373854138994`*^9}, {3.801037468029838*^9, 3.801037496380972*^9}, {
   3.801037639166891*^9, 3.8010376434604025`*^9}, {3.801037922572792*^9, 
   3.80103792286899*^9}, {3.8010380015025673`*^9, 3.801038004660147*^9}, {
   3.801041526687255*^9, 3.8010415675967627`*^9}, {3.8010418056221066`*^9, 
   3.8010418130761895`*^9}, {3.801126024863827*^9, 3.8011260765586586`*^9}, {
   3.8011261288897657`*^9, 3.8011261319595585`*^9}, {3.801238484702177*^9, 
   3.8012385201414623`*^9}, 3.8012396888003755`*^9, 3.8065027983398056`*^9},
 CellLabel->
  "In[1410]:=",ExpressionUUID->"5c898fa7-5834-40ba-8fd1-3f303a083248"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Checking", " ", "the", " ", "sensitivity"}], "*)"}]], "Input",
 CellChangeTimes->{{3.800958293251132*^9, 
  3.800958301785296*^9}},ExpressionUUID->"b22d5718-b05c-4f23-9878-\
1f056b679af8"],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"Clear", "[", 
    RowBox[{
    "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "G1", ",", " ", "G2", 
     ",", " ", "G3"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"g1", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], ":=", 
     RowBox[{"2.869403642609392`", 
      RowBox[{"(*", "3.1222703395011506`", "*)"}], " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "0.08336178001420615`"}], " ", "G1"}], "+", 
          RowBox[{"0.008894441223598058`", " ", "G2"}], "+", 
          RowBox[{"0.3091129700312998`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
    ";", 
    RowBox[{
     RowBox[{"g2", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], ":=", 
     RowBox[{"6.763107950731276`", 
      RowBox[{"(*", "6.188414869493781`", "*)"}], 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"0.028347844712845453`", " ", "G1"}], "+", 
          RowBox[{"0.15905674309004092`", " ", "G2"}], "+", 
          RowBox[{"0.0030681531807021305`", " ", "G3"}]}], ")"}]}], ")"}]}]}],
     ";", 
    RowBox[{
     RowBox[{"\[CapitalSigma]", "[", 
      RowBox[{"G1_", ",", "G2_", ",", "G3_"}], "]"}], ":=", 
     RowBox[{
      RowBox[{"-", "0.12219815117835163`"}], 
      RowBox[{"(*", "0.00854796983106368`", "*)"}], " ", 
      RowBox[{"(", 
       RowBox[{"1", " ", "+", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"111.07469724415829`", " ", "G1"}], "-", 
          RowBox[{"20.385388794158857`", " ", "G2"}], "+", 
          RowBox[{"30.541264956646692`", " ", "G3"}]}], ")"}]}], ")"}]}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\[Epsilon]z", " ", "=", " ", "0.07010485707688846`"}], ";"}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"G2", " ", "=", " ", 
      RowBox[{
       RowBox[{"1.17", " ", "and", " ", "\[Epsilon]z"}], " ", "=", " ", 
       RowBox[{
        RowBox[{"0.038", " ", "gives", " ", "a", " ", "good", " ", 
         RowBox[{"fit", ".", " ", "G1"}]}], " ", "=", "0"}]}]}], ",", " ", 
     RowBox[{"G3", " ", "=", " ", 
      RowBox[{"0", " ", 
       RowBox[{"(", "sloppy", ")"}]}]}]}], "*)"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"\[Epsilon]z", " ", "=", " ", "0.038"}], ";"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotStoredWid", "[", 
     RowBox[{
     "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
      "\[Epsilon]z_", ",", " ", "option_"}], "]"}], ":=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"storedWidthFunction", "[", 
        RowBox[{
        "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
         "\[Epsilon]z"}], "]"}], "[", 
       RowBox[{"t", " ", "-", " ", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", " ", "endTime"}], 
       "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", "option"}], 
        "}"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotStoredLen", "[", 
     RowBox[{
     "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
      "\[Epsilon]z_", ",", " ", "option_"}], "]"}], ":=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"storedLengthFunction", "[", 
        RowBox[{
        "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
         "\[Epsilon]z"}], "]"}], "[", 
       RowBox[{"t", " ", "-", " ", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"normalizedTime", "[", 
         RowBox[{"[", "indexOfShock", "]"}], "]"}], ",", "endTime"}], "}"}], 
      ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", "option"}], 
        "}"}]}]}], "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"widthConfidence", " ", "=", " ", 
     RowBox[{"ListLinePlot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"filteredWidData", "[", 
          RowBox[{"[", 
           RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}], ",", 
         RowBox[{"nFilteredWSTD1", "[", 
          RowBox[{"[", 
           RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}], ",", 
         RowBox[{"nFilteredWSTD2", "[", 
          RowBox[{"[", 
           RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], 
       ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Blue", ",", " ", 
            RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], ",", " ", 
          "None", ",", " ", "None"}], "}"}]}], ",", " ", 
       RowBox[{"Filling", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"3", "\[Rule]", 
          RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
       RowBox[{"FillingStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}]}], 
      "]"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"lengthConfidence", " ", "=", " ", 
     RowBox[{"ListLinePlot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"filteredLenData", "[", 
          RowBox[{"[", 
           RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}], ",", 
         RowBox[{"nFilteredLSTD1", "[", 
          RowBox[{"[", 
           RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}], ",", 
         RowBox[{"nFilteredLSTD2", "[", 
          RowBox[{"[", 
           RowBox[{"indexOfShock", ";;", "endIndex"}], "]"}], "]"}]}], "}"}], 
       ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Blue", ",", " ", 
            RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], ",", " ", 
          "None", ",", " ", "None"}], "}"}]}], ",", " ", 
       RowBox[{"Filling", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"3", "\[Rule]", 
          RowBox[{"{", "2", "}"}]}], "}"}]}], ",", 
       RowBox[{"FillingStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"Opacity", "[", ".3", "]"}], ",", "Pink"}], "]"}]}]}], 
      "]"}]}], ";"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "*)"}]], "Input",
 CellChangeTimes->{{3.800958290312993*^9, 3.8009582908036804`*^9}, {
   3.8009583214427185`*^9, 3.8009583231291857`*^9}, {3.8009583541862593`*^9, 
   3.8009583752977705`*^9}, {3.8009584116036243`*^9, 
   3.8009584214422984`*^9}, {3.800962554395401*^9, 3.8009625683962436`*^9}, 
   3.8009627067560005`*^9, 3.801036437529003*^9, 3.801036507017067*^9, {
   3.8010365926240063`*^9, 3.801036607191001*^9}, {3.8010367805601077`*^9, 
   3.8010367996520224`*^9}, {3.8010378321974597`*^9, 
   3.8010378838204556`*^9}, {3.8010417703983774`*^9, 
   3.8010417779481792`*^9}, {3.8010574885260267`*^9, 3.801057556718546*^9}, 
   3.801125710688171*^9, {3.80112627584789*^9, 3.801126276569981*^9}, {
   3.801126379073944*^9, 3.801126379527752*^9}, {3.8011264236986523`*^9, 
   3.8011264994790936`*^9}, 3.801126557793187*^9, {3.8011266764829807`*^9, 
   3.801126692008497*^9}, {3.801127271393979*^9, 3.801127304989159*^9}, {
   3.801127350033305*^9, 3.801127353183859*^9}, {3.8011274090654755`*^9, 
   3.8011274461842775`*^9}, {3.8011275481386733`*^9, 3.801127621755857*^9}, {
   3.801127654218078*^9, 3.801127683240523*^9}, {3.8011277792183475`*^9, 
   3.801127813297224*^9}, {3.8011280634345503`*^9, 3.8011280727127705`*^9}, {
   3.8011281622424383`*^9, 3.8011281752716084`*^9}, {3.8011282141476603`*^9, 
   3.8011282544838614`*^9}, {3.8011283786110134`*^9, 3.80112838336034*^9}, {
   3.801128665115778*^9, 3.801128747581975*^9}, {3.8011288489240446`*^9, 
   3.8011288987718134`*^9}, {3.8011470121977725`*^9, 3.801147037595877*^9}, 
   3.801149370878542*^9, 3.8012291632201753`*^9, {3.8012294778870316`*^9, 
   3.8012294845412235`*^9}, {3.801239755043292*^9, 3.801239801600833*^9}, {
   3.8063889521889677`*^9, 3.806389017318855*^9}, {3.806389203975765*^9, 
   3.8063892614301357`*^9}, {3.806389359808061*^9, 3.8063893938450885`*^9}, {
   3.806390157213795*^9, 3.806390161902259*^9}, 3.806390295221784*^9, {
   3.806502579464723*^9, 3.8065025946880393`*^9}, {3.8065027003468237`*^9, 
   3.806502720593712*^9}},
 CellLabel->
  "In[1414]:=",ExpressionUUID->"5481c314-3c05-49e0-8418-433ed4ba0227"],

Cell[CellGroupData[{

Cell[BoxData[
 FractionBox["100", "3600."]], "Input",
 CellChangeTimes->{{3.818865098243161*^9, 3.818865112233735*^9}},
 CellLabel->
  "In[282]:=",ExpressionUUID->"07206beb-adb0-4ba7-882b-18d540a6c0a4"],

Cell[BoxData["0.027777777777777776`"], "Output",
 CellChangeTimes->{{3.8188651049083195`*^9, 3.8188651123584023`*^9}},
 CellLabel->
  "Out[282]=",ExpressionUUID->"e8b62b63-f8dd-4ea3-bdc4-33caab2a2889"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Eigenvalues", " ", "of", " ", "equations", " ", "with", " ", "hidden", " ",
    "growth"}], "*)"}]], "Input",
 CellChangeTimes->{{3.821436094419245*^9, 3.8214361075281878`*^9}},
 FontSize->36,ExpressionUUID->"91dfb976-c481-4470-834f-64bf87a4f11e"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[CapitalSigma]", " ", "=", " ", "0.22596007807663557`"}], ";", 
   RowBox[{"g1", " ", "=", " ", "4.356076133639439`"}], ";", 
   RowBox[{"g2", "=", "5.9646572643958535`"}], ";", " ", 
   RowBox[{"\[Delta]L0", " ", "=", 
    RowBox[{"-", "0.10675660308544596`"}]}], ";", " ", 
   RowBox[{"\[Epsilon]", " ", "=", " ", "0.1"}], ";"}], "\[IndentingNewLine]",
   "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Clear", "[", 
    RowBox[{
    "\[CapitalSigma]", " ", ",", "g1", " ", ",", "g2", ",", " ", "\[Delta]L0",
      " ", ",", " ", "\[Epsilon]"}], " ", "]"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"rateMat", " ", "=", " ", 
   RowBox[{"-", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"g1", " ", "+", " ", 
         RowBox[{"pf", " ", "g2"}]}], ",", " ", 
        RowBox[{
         FractionBox["pf", 
          RowBox[{"1", " ", "-", " ", "pf"}]], " ", 
         RowBox[{"(", 
          RowBox[{"\[CapitalSigma]", " ", "-", " ", 
           RowBox[{"pf", " ", 
            RowBox[{"(", 
             RowBox[{"2", " ", "+", " ", "\[CapitalSigma]"}], ")"}]}]}], 
          ")"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"-", "g2"}], " ", 
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", "pf"}], ")"}]}], ",", " ", 
        RowBox[{"pf", " ", 
         RowBox[{"(", 
          RowBox[{"2", " ", "+", " ", "\[CapitalSigma]"}], ")"}]}]}], "}"}]}],
      "}"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"eigs", " ", "=", " ", 
    RowBox[{"Eigenvalues", "[", "rateMat", "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"prateVSpf1", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"eigs", "[", 
       RowBox[{"[", "1", "]"}], "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"pf", ",", 
        RowBox[{"-", "1"}], ",", " ", "1"}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"{", 
         RowBox[{"Black", ",", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], "}"}]}], ",", 
      " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"prateVSpf2", " ", "=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"eigs", "[", 
      RowBox[{"[", "2", "]"}], "]"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"pf", ",", "0", ",", " ", "1"}], "}"}], ",", " ", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"{", 
        RowBox[{"Black", ",", 
         RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], "}"}]}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
     RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"prateVSpf3", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"eigs", "[", 
       RowBox[{"[", "2", "]"}], "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"pf", ",", 
        RowBox[{"-", "1"}], ",", " ", "0"}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"{", 
         RowBox[{"Red", ",", 
          RowBox[{"Thickness", "[", "0.007", "]"}], ",", " ", "Dashed"}], 
         "}"}], "}"}]}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"noCurvaturePlot", " ", "=", " ", 
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"-", 
      FractionBox["p", 
       RowBox[{"1", " ", "-", " ", "p"}]]}], ",", 
     RowBox[{"{", 
      RowBox[{"p", ",", 
       RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
     RowBox[{"PlotStyle", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Darker", "[", "Purple", "]"}], ",", 
        RowBox[{"Thickness", "[", "0.007", "]"}], ",", " ", "Dashed"}], 
       "}"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{" ", 
  RowBox[{"Show", "[", 
   RowBox[{"prateVSpf1", ",", "prateVSpf2", ",", "prateVSpf3", 
    RowBox[{"(*", 
     RowBox[{",", "noCurvaturePlot"}], "*)"}], ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.8214361403124943`*^9, 3.8214362882665515`*^9}, {
   3.8214364758805633`*^9, 3.8214365980674286`*^9}, {3.8214370204250917`*^9, 
   3.821437020535795*^9}, 3.821437054831604*^9, {3.8214386719447107`*^9, 
   3.8214386783675165`*^9}, {3.8230709810868363`*^9, 
   3.8230709852938013`*^9}, {3.82307108654128*^9, 3.823071098901395*^9}, {
   3.823074192725424*^9, 3.8230741980693445`*^9}, {3.8230801839257355`*^9, 
   3.8230801868368263`*^9}, {3.8230802964211416`*^9, 
   3.8230803574439125`*^9}, {3.823080394582266*^9, 3.823080480380418*^9}, {
   3.83086384669991*^9, 3.830863847010737*^9}, {3.8321706852715907`*^9, 
   3.832170743086935*^9}, {3.8321707816377497`*^9, 3.8321708287646933`*^9}, 
   3.8321717401519623`*^9, 3.832234280892537*^9, {3.8322343180113664`*^9, 
   3.832234347740179*^9}},
 CellLabel->"In[94]:=",ExpressionUUID->"e857b41d-60f9-43dd-8256-9e826b31ea8a"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.007], Opacity[1.], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwt1P831XccwPF7XSLWvVToyvfL5xYxLCxlb+kSSsMyOooIdS6llDAnpbRM
jOlaKlnlOxtTZFd4v9zcc9XIcom68uWGXHXv55a+YLq2nbMfnufxHzwtohKC
YtQoFIr/v/2nPTKYWVoi8d81HpTXTSqcMM/Kml8gcUNHOudEswr/fseRmH1P
4s+beGqf/lBhp3X+UVOvSKy0Z8oZrSrsqpf5rHuQxF1oa8ZmgQp7vHjz8Eo9
ibsH/furH6lw0IWe2i8iSLzxHO36xEsVTu7NPHywXYGPhhwQj6xdwv39OjMd
kXLciaVnqbwlbAIJq12NX+PtmulhhCYFmuI6NRjPZ/Doggc/3ocC+3MclU/P
yvC34frtbwopMFeQloXRNO7ST7sePUmBUvoIs2h8CtcMFyAOhwrFfo6J4h8m
sbJ4OvS7WiqcjY9MWe87gYNPc6mz+mqQRqtJTpRL8fyAKJv6sxpEnum1elI1
jmX06BKZEQ0K2yaLirljeMauL8mvlgYto+s++9VyBFd6OQdd26MOLF0Pz90l
Eiy9eGr2Dl0DbttkcaUvhrDxbcPGrTINGBU2mLu4PMHLA7+aOTq0DCY3FDrh
u2JcVmcQvqlXE/TSq13sqY+xbe5odOgHLdjgQm4on+3G2+ztjCqttOEcR/4X
P0WEGXylPStbB/R31+XvMRRgdc1K/kHNFXD7g5DRZdWCuTouqSXn6VAumcyV
ZdbhVVcq9k2b6cK+QONGyQEefpBbdbFmQRf42mkDgqRLyOJWQdOoRA+cpVTT
jNB6FMkNu+smWQks5b15NwEfJTBu5ir6VoFv6dOeXaEC1Jcn97s8vRq8/FfS
3jeJEKMi50QK1QDyIgbPODR3o2XHot3U6YYg2mWyImDlY1S2uPO3Atc1ILfQ
T++7KkZPDQWfioKYkHTCNjLP4AlK2tJYeCjeCAaHdYNiu4bQjltiu+9vrYX9
qVteau6UoNlD/W4nRcZw39Y1+77GCPpoXWVzSssUiOWt02U+Y8g7yiXA2tUM
TFrjvDSyxlHL4tfvWI7mQFlQq06UShGbOljC6zeHj4Ft4ULrCXS8miu0OGIB
ko0Ra60zJxHRk6+TqW8JR0N09SyHp1CzXLilvcUSmLyJUHWTaTRwmPPV5WAW
1IXdqJxNkaEA7+3dTioWhLif9ulqm0EcrfxR52IraAg/bOm2+Ardm/Pj3XC1
hjntbTR+sBwRW92TOsesIejxZheTIgVykDEZOqcJ0N6s09F6XYEYxUfuPsog
oKPs2Y69pQr0E+dqTEEmAQ4pqZHX6hTIOYYrYWYTQDdrzmEKFUjQdsVqfSEB
D+KdXui/VSC9A0U2vrUEeGitz6fvJFETI1354yABc8fmjOoCSXTwwrucb54R
UC8RlfuHkMjOdsJhzXMCTOtj7+VEkaismJV3U0rAYnDZlHYqiQrmxWWNcgKa
S83cNStINF513mmYxoYjK0hRRS2J3Ne4e91cxgYiuT3Iu4FEai89ImKXs4Hn
t+/Q+VYS6f5iWa2ksyHxzdVLNDGJzKuoPA0jNtiEcU1Lh0gU+2Xv2ENjNox3
bqr2HCGRj6d4Y74ZGwKKhtozZCTylB1/a2TNBi21Kl8LkkSzxjp7x9hswHHJ
/fCORDEferrLbdhwcsA7Yv8CiSaEfE6cHRv+/xd6+Cel08GBDf8AoSh0ng==

        "]]},
      Annotation[#, "Charting`Private`Tag$6093#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.007], Opacity[1.], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwVx3k41HkcwHEitMrVpiapZ1q1qehAm9CnoiVFSI/VNVMjx7QhK0c3Uams
qWe2yFHOlKJCYdTHM9lmsxLGlZhhTGPO74+iedQu2/7xfl7Pm34oKuDwNB0d
HZ9v/a/3YXlbg2L3xgKxQssQHHmh7z4/WkxzhGQLIqxN2IYOtzNzKmke4Bad
3644Hozb33Q/yaUFQnFdiUFedAQGhWifX6eFwB5zRo5DaCL2r7ronk6LhR7n
vx4k+afhnTk7L1ympcCsgbFs5rIsTDKq/DGNxoXIIb6PQXcp/hKcXzEyWgRa
nXZLjX0tGk8l7fNcWAE1TquDLrjycYk/kb+8UgXPFtQ1cE4LML7FGTLHaqHs
vtYwRtqMc6vMRbq6CNUmzj7Fna34VOLe/NaVD3YN5ULWNiHy2blWwepGsFoT
UBjB6cTxpW6mD48KgPM57O/N3G6cNlFmZrWkCexNK3YPlLzDdVPMp7vKm0Hp
cpouPPUem1McW14tfwuHDUfFVg79uIijmrhHWoHfosMw0IpQpRWLOle3w7Uz
jutV7gNYpOQ1mfwuBBOFr3GixSCaWN+lpNIOoF20tJwvHMSrEdWhd2y6gEkc
A93OSPDzpjJp+NluIGwrvcWrhjB2bWOV5csecBMyOy41D6G4vPFKG70XXBza
tzpESfEruyPb9sR74A/qsUINP+CKzYaTobw+ePCY7z4n4wN6FtDDHs8VQYc9
/1aNlQzjrRmLB/eJodDvqp1PlgxXqncbd/sMgCLipSDYdBhnm44YNX4ZgKcf
SzaaXR5Gfcyu+CFnEBxrecoO7TAeceS9m7FdAnaKLKkyQo5l2w7defFZAn6F
RqGbO+U4rppvJrsxBJ0FBgejnBRYvctTj+shBVHL8+kPsxR41iv1dpVMCq9T
Yj4WfFIgvd+7pzD1A3wqduXkeilxw08pXNpaGRjvZHiz85W4b+HbCV2hDF5d
zFq0YVSJ403pkuikYRhJrUm55aHCTP0DsQE2cthC1c67m6HC2aLqgmmNcghj
PWuv61Lh9NNJgc7HFHA9md9oS1ejzr0DFRILJYj2FHtsClFjzK2KdAu+Eqz/
TDt/8r4an6+4ZGQeqYKvIuVsE40azb1jViabqCGM4cGj22qwz65VmFivhnRX
4T/LwzX4KA9spAc0YBkEkfR8De6vWGduPakBo6+d4V7dGjyXmp/Ud59A6R6X
Imczgg/l1tkmOyio144QnjvBS7mpTJEvBc3a3oQ8D4IhAZol5f4UtN7slZ7b
SnBBff0jnyAKZsatYW31JHg5Y++rq4coWH+zb6LZm2D4uqzR7xIpEDtbcbv8
CS5O+d7LsISCg5BWKGQQnFx/alZ3KQULu8xPPmESfKcZai8po6CXzXK6dpAg
J6hy/8+PKTiTGx/gyyI4tTzgt9R6Cvr3TtoLQgn2tWXk6QkpkO4NiKs8SrDm
gpYl7KTAZt7kKU4kQa4Lw7awhwLzuKbQo1EEtxfbV20RUSCY7B1aeoxgXcKb
10kKCma0xaRkxhK8YeeU4a+mIPs1ryj2OMFjkpxAOkXBAoFfqV8cwWU7fhU3
jFHg6x8bbJRAUF+3o4ijpWDsj1mG0m8/UO3CZn6hwPm8USYmEqxnF65a/S8F
Mi57ZvYJgjcXGY9PTVHAG50TH3eS4H/uIaDh
        "]]},
      Annotation[#, "Charting`Private`Tag$6140#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAlx8L9f//778mK3/sDAQXQLj8EcR8
/e+/WIvwbKsBF0DY2RiT+frvvxLI/fRJ/xZAGpQmMfP1778VXPIbh/oWQJwI
Qm3m6++/dKhxxQHxFkCg8XjlzNfvvzQHOIj43RZAqsPm1Zmv77/c3HPY67cW
QLxnwrYzX++/5ZCSAeprFkBq6gX14LDuv5CJ71yMxxVAD+A3ihsO7r8+cn13
oy4VQNs14oKHbu2/HNFSoUmZFEAxxhj4bMHsv8FLtuvw9xNAfck9xN8f7L/e
mpZ3BWITQFIH7wzMcOu/x3XrJlDAEkBPpRi56cTqv93pEMhfIhJAQrYwvJQk
6r/By70W1I8RQL8B1Tu5dum/GbfmqdLxEEAywGcSa9Tov40/fWg3XxBAzN5y
TE416L8aI2L8x6APQPA3CgOriOe/ujuTO/tsDkAKBJAQlefmv+HQmxvoTw1A
rgqimvg45r8Jn7chXh0MQHlxLIiNjeW/FFswDhnzCkA6S6XMr+3kv7c7GBV2
3wlAhV+qjUtA5L85IhEYcrcIQMbmnaV0nuO/UiOuXRamB0CRqB06F+/iv/mz
ACpKgQZAg8oVMutC4r+DZwhXfWUFQGtf/IBMouG/FDhWbjZgBEDdLm9MJ/Tg
v9cEgQf3SANARXHQbo9R4L8vg5NkQEgCQKknVOlRZN+/YtyVKI5QAUDb4R/u
dwrevzk5HcOKSABA+oHIoLjH3L8/r7enoa3+PyyXiUzsadu/fA28IFas/D+s
bDu/ghLav3BZ0fDCv/o/GSjK3zPS2L+sFWvk8P74P5lYcfnXdte/wAiP2U0k
9z8Gb/XAljLWvy0HLUMJdfU/wUVqT7j01L/IR/UQt9nzP5CR99bMm9O/iLkK
lJ8o8j9Lw2EM/FnSv2Bv5/pMofA/GWrkOh790L/stl3kpQ7uP6jthy62bs+/
VhcGuzss6z+8hyh19e/Mv7z7wgErcug/9gv6rRo7yr/7sTohLprlPwlchUJ1
tMe/By7lsT8O4z9DlkHJtffEvxwfCmOyaeA/GlHf3btHwr8zy21ZEt/bP5Sv
bZzui7+/H/zDdPp01z9BkX5hMRy6v6OFaMt45NI/oAoD3t4Itb/QQhGRmavN
PzqFSnYXD7C/ahNoqYAWxj9AqOflN1Klv1Xu8BVRiLw/4OpCnCx+lr8TrfzE
7latP2lPTO8zJJa/scKqLUberD/ys1VCO8qVv+l7gsu4Zaw/BH1o6EkWlb85
2MOT73SrPygPjjRnrpO/wf7t0aKUqT9wM9nMod6QvzhZ7Nwb2aU///fe+i1+
hr8syFGBbeycPxDB8aA8yoW/NJ42KNcBnD8iigRHSxaFv9NTcwd2F5s/Rhwq
k2iug78hCElIU0OZP45AdSuj3oC/kIxjxIqdlT88Ehe4MH52vx5pEVPKt4w/
YKQ8BE4Wdb8B/6yVO+mKP4Q2YlBrrnO/4n1QEhYbiT/MWq3opd5wv2C7pGsG
gIU/tkaHMjZ+Zr9K/0z3pJ18P/5q0spwrmO/xs1w1xYHeT9Gjx1jq95gvyXu
8/JZcXU/qq9nJ0F+Vr+MP79+ppBsPzr4/Ve23lC/T2K/QxJqZT+SgSgRV35G
v0mUuIs+ilw/YyWq5IJ+Nr9Q3lTaNIdMP0pl6NHA6VW+772LC2DHaz4U6neW

        "]]},
      Annotation[#, "Charting`Private`Tag$6187#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, -11.59412205228536},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-10., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-5., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {5., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-15., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-14., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-13., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-12., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-11., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-9., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-8., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-7., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-6., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-4., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-3., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-2., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {4., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {6., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {7., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {8., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {9., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {10., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8321708133080077`*^9, 3.8321708291542425`*^9}, 
   3.832171740832691*^9, 3.8322342819025106`*^9, 3.8322343188016324`*^9, 
   3.8322343490902796`*^9},
 CellLabel->
  "Out[102]=",ExpressionUUID->"a7cfe9ac-806a-4cff-a55b-1869a5c6b303"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
   ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"Export", "[", 
    RowBox[{"\"\<stored-growth-rate-vs-pf.txt\>\"", ",", "data"}], "]"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{"ppp", " ", "=", " ", 
  RowBox[{"Show", "[", 
   RowBox[{"prateVSpf1", ",", "prateVSpf2", ",", "prateVSpf3", ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<stored-growth-rate-vs-pf.pdf\>\"", ",", "ppp"}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8214363947428455`*^9, 3.8214364287206736`*^9}, {
  3.821438528384317*^9, 3.8214385357446537`*^9}, {3.821438690816228*^9, 
  3.821438718094283*^9}, {3.821438983439802*^9, 3.8214390310155764`*^9}, {
  3.823071081173503*^9, 3.8230711251487756`*^9}, {3.8230711764453125`*^9, 
  3.8230712005983305`*^9}, {3.823080361932042*^9, 3.8230803696369047`*^9}, {
  3.823080485725361*^9, 3.823080496547875*^9}, {3.830863887043*^9, 
  3.830863888880229*^9}},
 CellLabel->
  "In[149]:=",ExpressionUUID->"ca1f988b-f9e3-40aa-b706-592dd26e021f"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.007], Opacity[1.], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwt1P831XccwPF7XSLWvVToyvfL5xYxLCxlb+kSSsMyOooIdS6llDAnpbRM
jOlaKlnlOxtTZFd4v9zcc9XIcom68uWGXHXv55a+YLq2nbMfnufxHzwtohKC
YtQoFIr/v/2nPTKYWVoi8d81HpTXTSqcMM/Kml8gcUNHOudEswr/fseRmH1P
4s+beGqf/lBhp3X+UVOvSKy0Z8oZrSrsqpf5rHuQxF1oa8ZmgQp7vHjz8Eo9
ibsH/furH6lw0IWe2i8iSLzxHO36xEsVTu7NPHywXYGPhhwQj6xdwv39OjMd
kXLciaVnqbwlbAIJq12NX+PtmulhhCYFmuI6NRjPZ/Doggc/3ocC+3MclU/P
yvC34frtbwopMFeQloXRNO7ST7sePUmBUvoIs2h8CtcMFyAOhwrFfo6J4h8m
sbJ4OvS7WiqcjY9MWe87gYNPc6mz+mqQRqtJTpRL8fyAKJv6sxpEnum1elI1
jmX06BKZEQ0K2yaLirljeMauL8mvlgYto+s++9VyBFd6OQdd26MOLF0Pz90l
Eiy9eGr2Dl0DbttkcaUvhrDxbcPGrTINGBU2mLu4PMHLA7+aOTq0DCY3FDrh
u2JcVmcQvqlXE/TSq13sqY+xbe5odOgHLdjgQm4on+3G2+ztjCqttOEcR/4X
P0WEGXylPStbB/R31+XvMRRgdc1K/kHNFXD7g5DRZdWCuTouqSXn6VAumcyV
ZdbhVVcq9k2b6cK+QONGyQEefpBbdbFmQRf42mkDgqRLyOJWQdOoRA+cpVTT
jNB6FMkNu+smWQks5b15NwEfJTBu5ir6VoFv6dOeXaEC1Jcn97s8vRq8/FfS
3jeJEKMi50QK1QDyIgbPODR3o2XHot3U6YYg2mWyImDlY1S2uPO3Atc1ILfQ
T++7KkZPDQWfioKYkHTCNjLP4AlK2tJYeCjeCAaHdYNiu4bQjltiu+9vrYX9
qVteau6UoNlD/W4nRcZw39Y1+77GCPpoXWVzSssUiOWt02U+Y8g7yiXA2tUM
TFrjvDSyxlHL4tfvWI7mQFlQq06UShGbOljC6zeHj4Ft4ULrCXS8miu0OGIB
ko0Ra60zJxHRk6+TqW8JR0N09SyHp1CzXLilvcUSmLyJUHWTaTRwmPPV5WAW
1IXdqJxNkaEA7+3dTioWhLif9ulqm0EcrfxR52IraAg/bOm2+Ardm/Pj3XC1
hjntbTR+sBwRW92TOsesIejxZheTIgVykDEZOqcJ0N6s09F6XYEYxUfuPsog
oKPs2Y69pQr0E+dqTEEmAQ4pqZHX6hTIOYYrYWYTQDdrzmEKFUjQdsVqfSEB
D+KdXui/VSC9A0U2vrUEeGitz6fvJFETI1354yABc8fmjOoCSXTwwrucb54R
UC8RlfuHkMjOdsJhzXMCTOtj7+VEkaismJV3U0rAYnDZlHYqiQrmxWWNcgKa
S83cNStINF513mmYxoYjK0hRRS2J3Ne4e91cxgYiuT3Iu4FEai89ImKXs4Hn
t+/Q+VYS6f5iWa2ksyHxzdVLNDGJzKuoPA0jNtiEcU1Lh0gU+2Xv2ENjNox3
bqr2HCGRj6d4Y74ZGwKKhtozZCTylB1/a2TNBi21Kl8LkkSzxjp7x9hswHHJ
/fCORDEferrLbdhwcsA7Yv8CiSaEfE6cHRv+/xd6+Cel08GBDf8AoSh0ng==

        "]]},
      Annotation[#, "Charting`Private`Tag$4909#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.007], Opacity[1.], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwVx3k41HkcwHEitMrVpiapZ1q1qehAm9CnoiVFSI/VNVMjx7QhK0c3Uams
qWe2yFHOlKJCYdTHM9lmsxLGlZhhTGPO74+iedQu2/7xfl7Pm34oKuDwNB0d
HZ9v/a/3YXlbg2L3xgKxQssQHHmh7z4/WkxzhGQLIqxN2IYOtzNzKmke4Bad
3644Hozb33Q/yaUFQnFdiUFedAQGhWifX6eFwB5zRo5DaCL2r7ronk6LhR7n
vx4k+afhnTk7L1ympcCsgbFs5rIsTDKq/DGNxoXIIb6PQXcp/hKcXzEyWgRa
nXZLjX0tGk8l7fNcWAE1TquDLrjycYk/kb+8UgXPFtQ1cE4LML7FGTLHaqHs
vtYwRtqMc6vMRbq6CNUmzj7Fna34VOLe/NaVD3YN5ULWNiHy2blWwepGsFoT
UBjB6cTxpW6mD48KgPM57O/N3G6cNlFmZrWkCexNK3YPlLzDdVPMp7vKm0Hp
cpouPPUem1McW14tfwuHDUfFVg79uIijmrhHWoHfosMw0IpQpRWLOle3w7Uz
jutV7gNYpOQ1mfwuBBOFr3GixSCaWN+lpNIOoF20tJwvHMSrEdWhd2y6gEkc
A93OSPDzpjJp+NluIGwrvcWrhjB2bWOV5csecBMyOy41D6G4vPFKG70XXBza
tzpESfEruyPb9sR74A/qsUINP+CKzYaTobw+ePCY7z4n4wN6FtDDHs8VQYc9
/1aNlQzjrRmLB/eJodDvqp1PlgxXqncbd/sMgCLipSDYdBhnm44YNX4ZgKcf
SzaaXR5Gfcyu+CFnEBxrecoO7TAeceS9m7FdAnaKLKkyQo5l2w7defFZAn6F
RqGbO+U4rppvJrsxBJ0FBgejnBRYvctTj+shBVHL8+kPsxR41iv1dpVMCq9T
Yj4WfFIgvd+7pzD1A3wqduXkeilxw08pXNpaGRjvZHiz85W4b+HbCV2hDF5d
zFq0YVSJ403pkuikYRhJrUm55aHCTP0DsQE2cthC1c67m6HC2aLqgmmNcghj
PWuv61Lh9NNJgc7HFHA9md9oS1ejzr0DFRILJYj2FHtsClFjzK2KdAu+Eqz/
TDt/8r4an6+4ZGQeqYKvIuVsE40azb1jViabqCGM4cGj22qwz65VmFivhnRX
4T/LwzX4KA9spAc0YBkEkfR8De6vWGduPakBo6+d4V7dGjyXmp/Ud59A6R6X
Imczgg/l1tkmOyio144QnjvBS7mpTJEvBc3a3oQ8D4IhAZol5f4UtN7slZ7b
SnBBff0jnyAKZsatYW31JHg5Y++rq4coWH+zb6LZm2D4uqzR7xIpEDtbcbv8
CS5O+d7LsISCg5BWKGQQnFx/alZ3KQULu8xPPmESfKcZai8po6CXzXK6dpAg
J6hy/8+PKTiTGx/gyyI4tTzgt9R6Cvr3TtoLQgn2tWXk6QkpkO4NiKs8SrDm
gpYl7KTAZt7kKU4kQa4Lw7awhwLzuKbQo1EEtxfbV20RUSCY7B1aeoxgXcKb
10kKCma0xaRkxhK8YeeU4a+mIPs1ryj2OMFjkpxAOkXBAoFfqV8cwWU7fhU3
jFHg6x8bbJRAUF+3o4ijpWDsj1mG0m8/UO3CZn6hwPm8USYmEqxnF65a/S8F
Mi57ZvYJgjcXGY9PTVHAG50TH3eS4H/uIaDh
        "]]},
      Annotation[#, "Charting`Private`Tag$4956#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0, 0], Thickness[0.007], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAlx8L9f//778mK3/sDAQXQLj8EcR8
/e+/WIvwbKsBF0DY2RiT+frvvxLI/fRJ/xZAGpQmMfP1778VXPIbh/oWQJwI
Qm3m6++/dKhxxQHxFkCg8XjlzNfvvzQHOIj43RZAqsPm1Zmv77/c3HPY67cW
QLxnwrYzX++/5ZCSAeprFkBq6gX14LDuv5CJ71yMxxVAD+A3ihsO7r8+cn13
oy4VQNs14oKHbu2/HNFSoUmZFEAxxhj4bMHsv8FLtuvw9xNAfck9xN8f7L/e
mpZ3BWITQFIH7wzMcOu/x3XrJlDAEkBPpRi56cTqv93pEMhfIhJAQrYwvJQk
6r/By70W1I8RQL8B1Tu5dum/GbfmqdLxEEAywGcSa9Tov40/fWg3XxBAzN5y
TE416L8aI2L8x6APQPA3CgOriOe/ujuTO/tsDkAKBJAQlefmv+HQmxvoTw1A
rgqimvg45r8Jn7chXh0MQHlxLIiNjeW/FFswDhnzCkA6S6XMr+3kv7c7GBV2
3wlAhV+qjUtA5L85IhEYcrcIQMbmnaV0nuO/UiOuXRamB0CRqB06F+/iv/mz
ACpKgQZAg8oVMutC4r+DZwhXfWUFQGtf/IBMouG/FDhWbjZgBEDdLm9MJ/Tg
v9cEgQf3SANARXHQbo9R4L8vg5NkQEgCQKknVOlRZN+/YtyVKI5QAUDb4R/u
dwrevzk5HcOKSABA+oHIoLjH3L8/r7enoa3+PyyXiUzsadu/fA28IFas/D+s
bDu/ghLav3BZ0fDCv/o/GSjK3zPS2L+sFWvk8P74P5lYcfnXdte/wAiP2U0k
9z8Gb/XAljLWvy0HLUMJdfU/wUVqT7j01L/IR/UQt9nzP5CR99bMm9O/iLkK
lJ8o8j9Lw2EM/FnSv2Bv5/pMofA/GWrkOh790L/stl3kpQ7uP6jthy62bs+/
VhcGuzss6z+8hyh19e/Mv7z7wgErcug/9gv6rRo7yr/7sTohLprlPwlchUJ1
tMe/By7lsT8O4z9DlkHJtffEvxwfCmOyaeA/GlHf3btHwr8zy21ZEt/bP5Sv
bZzui7+/H/zDdPp01z9BkX5hMRy6v6OFaMt45NI/oAoD3t4Itb/QQhGRmavN
PzqFSnYXD7C/ahNoqYAWxj9AqOflN1Klv1Xu8BVRiLw/4OpCnCx+lr8TrfzE
7latP2lPTO8zJJa/scKqLUberD/ys1VCO8qVv+l7gsu4Zaw/BH1o6EkWlb85
2MOT73SrPygPjjRnrpO/wf7t0aKUqT9wM9nMod6QvzhZ7Nwb2aU///fe+i1+
hr8syFGBbeycPxDB8aA8yoW/NJ42KNcBnD8iigRHSxaFv9NTcwd2F5s/Rhwq
k2iug78hCElIU0OZP45AdSuj3oC/kIxjxIqdlT88Ehe4MH52vx5pEVPKt4w/
YKQ8BE4Wdb8B/6yVO+mKP4Q2YlBrrnO/4n1QEhYbiT/MWq3opd5wv2C7pGsG
gIU/tkaHMjZ+Zr9K/0z3pJ18P/5q0spwrmO/xs1w1xYHeT9Gjx1jq95gvyXu
8/JZcXU/qq9nJ0F+Vr+MP79+ppBsPzr4/Ve23lC/T2K/QxJqZT+SgSgRV35G
v0mUuIs+ilw/YyWq5IJ+Nr9Q3lTaNIdMP0pl6NHA6VW+772LC2DHaz4U6neW

        "]]},
      Annotation[#, "Charting`Private`Tag$5003#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, -11.59412205228536},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{-10., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-5., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {5., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-15., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-14., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-13., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-12., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-11., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-9., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-8., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-7., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-6., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-4., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-3., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-2., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {4., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {6., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {7., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {8., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {9., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {10., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{-1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {0.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {1., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {0.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {1.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], StandardForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.821436396715548*^9, 3.821436429364978*^9}, {
   3.821438632175995*^9, 3.8214386459990096`*^9}, {3.821438681910043*^9, 
   3.8214387188462715`*^9}, {3.821438997512144*^9, 3.821439031253916*^9}, 
   3.8230712037244716`*^9, 3.8230742095639167`*^9, 3.823080229850504*^9, 
   3.823080370179695*^9, 3.8230804008587255`*^9, {3.8230804875216885`*^9, 
   3.8230804970644836`*^9}, 3.83086384931628*^9, {3.8308638909409447`*^9, 
   3.8308638947879925`*^9}},
 CellLabel->
  "Out[150]=",ExpressionUUID->"d539ae88-6b0c-4a88-99a9-a896db6a4f16"],

Cell[BoxData["\<\"stored-growth-rate-vs-pf.pdf\"\>"], "Output",
 CellChangeTimes->{{3.821436396715548*^9, 3.821436429364978*^9}, {
   3.821438632175995*^9, 3.8214386459990096`*^9}, {3.821438681910043*^9, 
   3.8214387188462715`*^9}, {3.821438997512144*^9, 3.821439031253916*^9}, 
   3.8230712037244716`*^9, 3.8230742095639167`*^9, 3.823080229850504*^9, 
   3.823080370179695*^9, 3.8230804008587255`*^9, {3.8230804875216885`*^9, 
   3.8230804970644836`*^9}, 3.83086384931628*^9, {3.8308638909409447`*^9, 
   3.8308638950055842`*^9}},
 CellLabel->
  "Out[151]=",ExpressionUUID->"c8280055-560c-4dfd-beec-af23371ae232"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Cyclic", " ", "data", " ", "modeling"}], "*)"}]], "Input",
 CellChangeTimes->{{3.8504609975805984`*^9, 3.8504610046008787`*^9}},
 FontSize->72,ExpressionUUID->"e6af90c8-715e-446c-ab07-186dce7df8a7"],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\n", 
   "\[IndentingNewLine]", " ", 
   RowBox[{
    RowBox[{"\[Alpha]S", " ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"\[Delta]A0", "=", " ", 
     RowBox[{"\[Delta]L0", " ", "=", 
      RowBox[{"-", "0.029"}]}]}], ";"}], " ", "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"StoredEq1", "[", 
      RowBox[{
      "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_", 
       ",", "\[Delta]L0_"}], "]"}], " ", ":=", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]A", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
      RowBox[{"-", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
              RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
              RowBox[{"\[Alpha]S", " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"g1", " ", 
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                  "\[Delta]L0"}], "-", 
                 RowBox[{"g1", " ", "\[Epsilon]z"}], "-", 
                 RowBox[{"g2", " ", 
                  RowBox[{"(", 
                   RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}]}], 
                ")"}]}], "+", 
              RowBox[{"g1", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{
                  RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], 
                 "+", 
                 RowBox[{
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                  RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
             ")"}]}], "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], 
              "-", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{"\[Delta]L0", "+", 
                 RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"2", " ", 
                  RowBox[{"(", 
                   RowBox[{"\[Delta]L0", "+", "\[Epsilon]z"}], ")"}]}], "+", 
                 RowBox[{
                 "\[Alpha]S", " ", "\[Delta]L0", " ", "\[CapitalSigma]"}]}], 
                ")"}]}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
               "\[CapitalSigma]", " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{
                  RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], 
                 "+", 
                 RowBox[{
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                  RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], 
             ")"}]}]}], ")"}], "/", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
             RowBox[{"\[Alpha]S", " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                 "\[Delta]L0"}], "-", "\[Epsilon]z"}], ")"}]}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{
                 RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], 
                "+", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
                 RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}],
           ")"}]}], ")"}]}]}]}], ";"}], "\n", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"StoredEq2", "[", 
      RowBox[{
      "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_", 
       ",", "\[Delta]L0_"}], "]"}], " ", ":=", 
     RowBox[{
      RowBox[{
       SuperscriptBox["\[Delta]L", "\[Prime]",
        MultilineFunction->None], "[", "t", "]"}], "\[Equal]", 
      RowBox[{"-", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
             RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
             RowBox[{"\[Alpha]S", " ", 
              RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"-", "g2"}], " ", 
              RowBox[{"\[Delta]A", "[", "t", "]"}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"\[Alpha]S", " ", "\[Delta]L0"}], "+", 
                RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
                RowBox[{"\[Alpha]S", " ", 
                 RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"2", "+", "\[CapitalSigma]"}], ")"}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", "\[Epsilon]z"}], 
                "-", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{"\[Delta]L0", "+", 
                   RowBox[{"\[Alpha]S", " ", "\[Epsilon]z"}]}], ")"}], " ", 
                 RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}],
           ")"}], "/", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"\[Alpha]S", " ", "\[Delta]L0", " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
               "\[Delta]L0"}], "-", "\[Epsilon]z"}], ")"}]}], "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
            RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"-", "2"}], " ", "\[Alpha]S", " ", "\[Delta]L0"}], "+", 
              RowBox[{
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Alpha]S"}], ")"}], " ", 
               RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]}], ")"}]}], 
        ")"}]}]}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"endTime", " ", "=", " ", "2"}], ";"}], " ", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"storedSol", "[", 
      RowBox[{
      "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_"}], 
      "]"}], ":=", " ", 
     RowBox[{"NDSolve", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"StoredEq1", "[", 
          RowBox[{
          "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
           ",", "\[Delta]L0"}], "]"}], ",", 
         RowBox[{"StoredEq2", "[", 
          RowBox[{
          "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
           ",", "\[Delta]L0"}], "]"}], ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]L", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]L0"}], ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]A", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]A0"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"t", ",", "0", ",", " ", "endTime"}], " ", "}"}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"storedWidthFunction", "[", 
      RowBox[{
      "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
       "\[Epsilon]_"}], "]"}], "[", "t_", "]"}], " ", ":=", " ", 
    RowBox[{
     RowBox[{"\[Delta]A", "[", "t", "]"}], "/.", 
     RowBox[{
      RowBox[{"storedSol", "[", 
       RowBox[{
       "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]"}], 
       "]"}], "[", 
      RowBox[{"[", "1", "]"}], "]"}]}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"storedLengthFunction", "[", 
       RowBox[{
       "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
        "\[Epsilon]_"}], "]"}], "[", "t_", "]"}], " ", ":=", " ", 
     RowBox[{
      RowBox[{"\[Delta]L", "[", "t", "]"}], "/.", 
      RowBox[{
       RowBox[{"storedSol", "[", 
        RowBox[{
        "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]"}], 
        "]"}], "[", 
       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"storedSol", "[", 
      RowBox[{
      "g1_", ",", "g2_", ",", "\[CapitalSigma]_", ",", " ", "\[Epsilon]z_", 
       ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], ":=", " ", 
     RowBox[{"NDSolve", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"StoredEq1", "[", 
          RowBox[{
          "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
           ",", "\[Delta]L0"}], "]"}], ",", 
         RowBox[{"StoredEq2", "[", 
          RowBox[{
          "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]z", 
           ",", "\[Delta]L0"}], "]"}], ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]L", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]L0"}], ",", " ", 
         RowBox[{
          RowBox[{"\[Delta]A", "[", "0", "]"}], " ", "==", " ", 
          "\[Delta]A0"}]}], "}"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"\[Delta]A", ",", " ", "\[Delta]L"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"t", ",", "0", ",", " ", "endTime"}], " ", "}"}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"storedWidthFunction", "[", 
      RowBox[{
      "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
       "\[Epsilon]_", ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], "[", 
     "t_", "]"}], " ", ":=", " ", 
    RowBox[{
     RowBox[{"\[Delta]A", "[", "t", "]"}], "/.", 
     RowBox[{
      RowBox[{"storedSol", "[", 
       RowBox[{
       "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]", ",", 
        "\[Delta]L0", ",", "\[Delta]A0"}], "]"}], "[", 
      RowBox[{"[", "1", "]"}], "]"}]}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"storedLengthFunction", "[", 
       RowBox[{
       "g1_", ",", " ", "g2_", ",", "\[CapitalSigma]_", " ", ",", " ", 
        "\[Epsilon]_", ",", "\[Delta]L0_", ",", "\[Delta]A0_"}], "]"}], "[", 
      "t_", "]"}], " ", ":=", " ", 
     RowBox[{
      RowBox[{"\[Delta]L", "[", "t", "]"}], "/.", 
      RowBox[{
       RowBox[{"storedSol", "[", 
        RowBox[{
        "g1", ",", "g2", ",", "\[CapitalSigma]", ",", " ", "\[Epsilon]", ",", 
         "\[Delta]L0", ",", "\[Delta]A0"}], "]"}], "[", 
       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"gRule", " ", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"g1", "\[Rule]", "3.2244841497907073`"}], ",", 
       RowBox[{"g2", "\[Rule]", "5.65593039165689`"}], ",", 
       RowBox[{"\[CapitalSigma]", "\[Rule]", "0"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"g1", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"g2", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ";", 
    RowBox[{"\[CapitalSigma]", " ", "=", " ", 
     RowBox[{"gRule", "[", 
      RowBox[{"[", 
       RowBox[{"3", ",", "2"}], "]"}], "]"}]}], ";", " ", 
    RowBox[{"\[Epsilon]z", " ", "=", " ", "0.1"}], ";"}]}]}]], "Input",
 CellChangeTimes->{{3.848390096915802*^9, 3.848390150524084*^9}, {
   3.848390495334955*^9, 3.848390504250586*^9}, {3.848390606212575*^9, 
   3.8483906451939225`*^9}, {3.8483907198903227`*^9, 3.848390739570819*^9}, {
   3.848390890996402*^9, 3.848390905369907*^9}, 3.8483909426438055`*^9, {
   3.848391079580616*^9, 3.8483911309402504`*^9}, {3.8483993497853484`*^9, 
   3.8483993605279408`*^9}, 3.848399875528165*^9, 3.848399938399564*^9, {
   3.848400149478442*^9, 3.8484001508608522`*^9}, 3.8486450659438734`*^9, {
   3.8486451294315367`*^9, 3.848645143838196*^9}, 3.8504620461940813`*^9, {
   3.8504620948984375`*^9, 3.850462095416867*^9}},
 CellLabel->
  "In[888]:=",ExpressionUUID->"e1e848bc-71cb-4eea-aecd-9f1d75966b26"],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.850462148936453*^9, 3.8504622869278984`*^9}, {
   3.850462330225754*^9, 3.850462399928938*^9}, 
   3.8504626707434487`*^9},ExpressionUUID->"b618dbb9-b284-4e6f-a514-\
58bc2ed5a2f5"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"shocks", "=", " ", 
   RowBox[{"{", 
    RowBox[{
    "45.7", ",", "88.67", ",", " ", "133.7", ",", " ", "176", ",", " ", 
     "220.2", ",", " ", "263.66", ",", "306.6", ",", "350.64", ",", "393.6", 
     ",", "436.06", ",", " ", "481.1", ",", " ", "505"}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"cyclicShock", " ", "=", " ", 
    RowBox[{"Import", "[", 
     RowBox[{"\"\<cyclic-shock-100mM.csv\>\"", ",", "\"\<Data\>\""}], "]"}]}],
    ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"cyclicShock", " ", "=", " ", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"LowpassFilter", "[", 
         RowBox[{
          RowBox[{"cyclicShock", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "1"}], "]"}], "]"}], ",", "1.5"}], "]"}], 
        ",", " ", 
        RowBox[{"LowpassFilter", "[", 
         RowBox[{
          RowBox[{"cyclicShock", "[", 
           RowBox[{"[", 
            RowBox[{";;", ",", " ", "2"}], "]"}], "]"}], ",", "1.5"}], 
         "]"}]}], "}"}], "//", "Transpose"}]}], ";"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"shocks", "=", " ", 
     RowBox[{"{", 
      RowBox[{
      "66", ",", "124", ",", " ", "185", ",", " ", "245", ",", " ", "307", 
       ",", " ", "365", ",", " ", "425", ",", " ", "485", ",", " ", "545", 
       ",", " ", "605", ",", " ", "666", ",", "725", ",", " ", "784", ",", 
       " ", "845", ",", " ", "905", ",", " ", "965", ",", " ", "1025", ",", 
       " ", "1085", ",", " ", "1146"}], "}"}]}], ";", "\[IndentingNewLine]", 
    RowBox[{"dir", " ", "=", " ", "\"\<Data 1-5-2021\>\""}], ";", " ", 
    "\[IndentingNewLine]", 
    RowBox[{"SetDirectory", "[", 
     RowBox[{
      RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", "dir"}], "]"}],
     ";", "\[IndentingNewLine]", 
    RowBox[{"cyclicShock", " ", "=", " ", 
     RowBox[{"Import", "[", "\"\<cyclic-100mM-120sec.csv\>\"", "]"}]}], ";"}],
    "*)"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"R0", " ", "=", "0.000465"}], ";"}], " "}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"unP", "[", "t_", "]"}], ":=", 
   RowBox[{"3", " ", 
    RowBox[{"Exp", "[", 
     RowBox[{"R0", " ", "t"}], "]"}]}]}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"cyclicFunction", "[", "u_", "]"}], ":=", " ", 
   RowBox[{"Piecewise", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}]}], ",", 
        RowBox[{"0", "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "1", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "1", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}], "1.002"}], 
        ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "2", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "3", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "3", "]"}], "]"}]}], "  ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}], " ", "1.0025"}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "3", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}], "1.003"}], 
        ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "4", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "5", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", "  ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "5", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "5", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "6", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "6", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "7", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "7", "]"}], "]"}]}], ")"}], " ", "R0"}], "]"}]}],
           " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "7", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "8", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "8", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "9", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "9", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "9", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "10", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "10", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "11", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "11", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "11", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "12", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "12", "]"}], "]"}], "<", "u"}]}], "}"}]}], "}"}], 
    "]"}]}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"osmolarity", "[", "u_", "]"}], ":=", " ", 
   RowBox[{"Piecewise", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"0", ",", 
        RowBox[{"0", "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"100", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "1", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{"0", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "2", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "3", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"100", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "3", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{"0", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "4", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "5", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"100", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "5", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "6", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{"0", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "6", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "7", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"100", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "7", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "8", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{"0", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "8", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "9", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"100", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "9", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "10", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "10", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "11", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"100", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "11", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "12", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"0", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "12", "]"}], "]"}], "<", "u"}]}], "}"}]}], "}"}], 
    "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"modelCyclicPlot", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"cyclicFunction", "[", "u", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"u", ",", "0", ",", 
        RowBox[{"shocks", "[", 
         RowBox[{"[", "12", "]"}], "]"}]}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Black", ",", "Dashed", ",", " ", 
         RowBox[{"Thickness", "[", "0.005", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"cyclicFunction2", "[", "u_", "]"}], ":=", " ", 
   RowBox[{"Piecewise", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}]}], ",", 
        RowBox[{"0", "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "1", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "1", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{"u", " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "2", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "3", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "3", "]"}], "]"}]}], "  ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], " ", ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "3", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{"u", " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "4", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "5", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", "  ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "5", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "5", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "6", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{"u", " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "6", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "7", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "7", "]"}], "]"}]}], ")"}], " ", "R0"}], "]"}]}],
           " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "7", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "8", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{"u", " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "8", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "9", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "9", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "9", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "10", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{"u", " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "10", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "11", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"(", 
          RowBox[{"1", " ", "+", "  ", 
           RowBox[{
            RowBox[{"storedLengthFunction", "[", 
             RowBox[{
             "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
              "\[Epsilon]z"}], "]"}], "[", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"u", " ", "-", " ", 
               RowBox[{"shocks", "[", 
                RowBox[{"[", "11", "]"}], "]"}]}], " ", ")"}], " ", "R0"}], 
            "]"}]}], " ", ")"}], " ", 
         RowBox[{"Exp", "[", 
          RowBox[{"u", "   ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "11", "]"}], "]"}], "<", "u", "<", 
         RowBox[{"shocks", "[", 
          RowBox[{"[", "12", "]"}], "]"}]}]}], "}"}], ",", 
      RowBox[{"{", " ", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"MovingAverage", "[", 
           RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], 
         RowBox[{"Exp", "[", 
          RowBox[{"u", " ", "R0"}], " ", "]"}]}], ",", " ", 
        RowBox[{
         RowBox[{"shocks", "[", 
          RowBox[{"[", "12", "]"}], "]"}], "<", "u"}]}], "}"}]}], "}"}], 
    "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"modelCyclicPlot2", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"cyclicFunction2", "[", "u", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"u", ",", "0", ",", 
        RowBox[{"shocks", "[", 
         RowBox[{"[", "12", "]"}], "]"}]}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Black", ",", "Dashed", ",", " ", 
         RowBox[{"Thickness", "[", "0.005", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"osmolariyPlot", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"osmolarity", "[", "u", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"u", ",", "0", ",", 
        RowBox[{"shocks", "[", 
         RowBox[{"[", "12", "]"}], "]"}]}], "}"}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Black", ",", "Dashed", ",", " ", 
         RowBox[{"Thickness", "[", "0.005", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"Exclusions", "\[Rule]", "None"}], ",", " ", 
      RowBox[{"AspectRatio", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"1", ",", " ", "0.5"}], "}"}]}], ",", " ", 
      RowBox[{"FrameTicks", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Automatic", ",", " ", 
         RowBox[{"{", 
          RowBox[{"0", ",", " ", "100"}], "}"}]}], "}"}]}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"line", "[", "u_", "]"}], ":=", " ", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"u", ",", 
      RowBox[{
       RowBox[{
        RowBox[{"MovingAverage", "[", 
         RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "2"}], "]"}], "]"}], 
       RowBox[{"Exp", "[", 
        RowBox[{
         RowBox[{"(", "u", " ", ")"}], " ", "R0"}], " ", "]"}]}]}], "}"}], 
    ",", " ", 
    RowBox[{"{", 
     RowBox[{"u", ",", 
      RowBox[{
       RowBox[{
        RowBox[{"MovingAverage", "[", 
         RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
        RowBox[{"[", 
         RowBox[{"1", ",", "2"}], "]"}], "]"}], 
       RowBox[{"(", 
        RowBox[{"1", " ", "+", "  ", 
         RowBox[{
          RowBox[{"storedLengthFunction", "[", 
           RowBox[{
           "g1", ",", " ", "g2", ",", "\[CapitalSigma]", " ", ",", " ", 
            "\[Epsilon]z"}], "]"}], "[", "0", "]"}]}], " ", ")"}], " ", 
       RowBox[{"Exp", "[", 
        RowBox[{"u", "   ", "R0"}], " ", "]"}]}]}], "}"}]}], 
   "}"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"lines", " ", "=", " ", 
   RowBox[{"line", " ", "/@", "  ", "shocks"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"linePlots", " ", "=", " ", 
    RowBox[{"Graphics", "[", 
     RowBox[{"{", 
      RowBox[{"Black", ",", " ", "Dashed", ",", " ", 
       RowBox[{"Thickness", "[", "0.002", "]"}], ",", " ", 
       RowBox[{"Line", "[", "lines", "]"}]}], "}"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plotOfUnperturbed", " ", "=", " ", 
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"unP", "[", "t", "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"t", ",", "0", ",", " ", "500"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Darker", "[", "Red", "]"}], ",", " ", "Dashed", ",", " ", 
         RowBox[{"Thickness", "[", "0.005", "]"}]}], "}"}]}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"plotOfCyclic", " ", "=", " ", 
    RowBox[{"ListLinePlot", "[", 
     RowBox[{
      RowBox[{"MovingAverage", "[", 
       RowBox[{"cyclicShock", ",", "3"}], "]"}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
   ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp3", " ", "=", " ", 
   RowBox[{"Show", "[", 
    RowBox[{
    "plotOfUnperturbed", ",", "modelCyclicPlot", ",", "plotOfCyclic", ",", 
     RowBox[{"(*", 
      RowBox[{"linePlots", ","}], "*)"}], " ", 
     RowBox[{"PlotRange", "\[Rule]", " ", "All"}]}], "]"}]}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"FileNameJoin", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"ParentDirectory", "[", 
         RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
        "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}],
     ";", "\[IndentingNewLine]", 
    RowBox[{"Export", "[", 
     RowBox[{"\"\<cyclic-shocks-100mM.pdf\>\"", ",", "ppp3"}], "]"}]}], 
   "*)"}]}]}], "Input",
 CellChangeTimes->{{3.822468288252185*^9, 3.8224683017780123`*^9}, 
   3.831818913020831*^9, {3.8318190321431427`*^9, 3.831819055166376*^9}, 
   3.831819364939122*^9, 3.8416587996158648`*^9, {3.841658904649227*^9, 
   3.8416589111831627`*^9}, {3.841658942189174*^9, 3.841658954534637*^9}, 
   3.848389411721262*^9, {3.8483899041361837`*^9, 3.8483899137759924`*^9}, 
   3.8483901955935555`*^9, {3.8483902475018773`*^9, 3.8483902870970488`*^9}, {
   3.8483906607258625`*^9, 3.848390697469474*^9}, {3.848390762508072*^9, 
   3.848390785061373*^9}, {3.848390819053836*^9, 3.8483908418525553`*^9}, {
   3.8483918673610544`*^9, 3.848391902176551*^9}, {3.8483920047693357`*^9, 
   3.8483920202575674`*^9}, {3.848400158525689*^9, 3.848400159705862*^9}, {
   3.848998103706195*^9, 3.8489981411763196`*^9}, {3.8504614933671637`*^9, 
   3.8504614959003363`*^9}, 3.850461531935353*^9, 3.8504616826929884`*^9, {
   3.850462626109427*^9, 3.8504626420031443`*^9}, {3.8510569619328046`*^9, 
   3.8510570133970146`*^9}, {3.8510571468845606`*^9, 
   3.8510571877232876`*^9}, {3.8510573118129854`*^9, 3.8510573664271*^9}, {
   3.851057565398161*^9, 3.8510575774854603`*^9}, 3.851057646652766*^9, {
   3.8510577319566746`*^9, 3.851057739660861*^9}, 3.851057812973816*^9, {
   3.85105838903806*^9, 3.851058391123454*^9}, 3.8510584518036556`*^9, {
   3.852960259440919*^9, 3.8529602857301874`*^9}, {3.8529603823393865`*^9, 
   3.852960498577589*^9}, {3.8529606012902465`*^9, 3.8529606123699317`*^9}, {
   3.8529609856565485`*^9, 3.852961131478166*^9}, {3.852961229919176*^9, 
   3.852961299391906*^9}, {3.8529615404943733`*^9, 3.8529616162137594`*^9}, {
   3.852961652863185*^9, 3.852961667085657*^9}, {3.8529619395857654`*^9, 
   3.8529619625649076`*^9}, 3.852962393857003*^9},
 CellLabel->
  "In[902]:=",ExpressionUUID->"8c8e7863-8fab-4249-bf9b-57fa2a16f8a0"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.005], 
       Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwV0Hk41AkYB/Bx7Pb7zfFD1yKJnagmy66oTY35KvfZoemysgmxcpNjzG8Z
Z22t1Ga1YmQduylSyZUtZjvocdWWI2yKpCZXdJB29o/3eZ/P8z7v8bz6+4O3
+SgzGAwXRfyfX07MOtv6DlpWaL1QYjAIhBXGrLHObxRox8/xQhSOZsl9tfLv
C4aZesJ/FY6rL2Ko5j8VTDSnVtxQIvAxS+LyXjopqB8dkSSoEKhXnZiclKrg
iC6RrjKPgO6GVXbj0gWoW/5Eh6QIuD6UjY1KueiUGR7S1iGAExKWTYQZjq/N
Nr5mQUBjUlh+wtsS7JIvKoJ3ErCsjd4ar26NDSv65lWHE5CG1194vMsBc8/z
nY5lEuhz6O2YsXXF0p3T8sgyAj5OsfL9rVsh2/4sY6yFgFXNW9XWIHckvhiy
/yQnwKp6wljyRAjezZFybRaJ1eN2QRvTdsPMrl+rnUfColr7Bl/ZA3Wx41sy
7EmUOewzuBXsCWtJTVePD4nrTPU5jXQvCHeZOjQnk9CuKuopb/weic3P+2oL
SHwpmQmt0fRGxnujiztlJDxNycxUvwPIqWoxljwjobHK5XdZng/WCqf7i5WZ
COa7BQdO+GKo97xOApcJ6+xUoyTjg+jO+iRx28SEbL743OfJ/rB9nMbo9mbi
cMhX55z/CYDgSsCD8SQm8hctOKWsFgjm6MuC6QJFvbPSkut9CPZemXo3/1b0
D2T0XJYG4fL2hVERg4r57VxlojMYRTse9ZaqslAVVBPy9FQI1FPpoCuGLKRr
irtiTUMxUjFVlmPLwtft0ly73lCwq88M7/VnYWwmb+V0UhhyIiT3Co6yEOhY
c95DPxyeszZDjedZuF685ui7pnAMpO0ZkrWw0LTyjrezfwSeayy4nz3KwviS
9UqJqpEoV9fseq3GhnwpOfOqNBKGRkuzjNewUbj5jVzNMQoD1Vta1ruzYRpt
yT/4Jkrxp8KOddFsxLUVJEefPAwV68vDs9ls9J4ZzAwwicYdx0p/QS0biyJS
Zk90RsMjMrVD3M8GGbppX2hUDHLu2p8VKXHQIfpON0U/FrHj/VLakIOrH9zP
ie7GYvgpf1DFiYPtOX7LVvvGYbl5goR/iIPbzl3vKHURhmosxlIyOZjW823+
86IITnJPw4SrHAj8WvevdIyHXkCbaPIRB551WcKeiXi8cuVq/viRg2/N4zbb
ZojBasgVXdGj8DBuE++zk2KsuBfP3qZPIbKB1JD9IkZu96m8UYUr3H7ts/pN
jDm7H1p5XApGAVdj+EVi9G2o3ZFvQEEvb7TMrE6Mu9bTs8d5FEjygA53WIz7
7a6VgWYUStxWqwyMiHGP5XaBaU7B9vTEC6lcjBif9OIShZO4Cdd0J8WIrS0t
fLaWwhw/d5v2nBiXmsrueKynMBHWmaaxkAZ3Y+UfLpYUMqrzgtsW04jc6/Xg
pcImDD/hz1o0SktslI8IKAQem+JyltEIUG/wuwUKQ8Xz/yJ4NNxfS3YLNiv2
ve4qvG1EY7GQzO1VmGue/1OKCY0PYU2DcdYUvBpM9qia02hQY9BVNop7iLdo
XEdDdCmiTWhL4axb/YpECxqzTgYGUwpvPJ1MWfFp8MY04k/aUeh+7Dz1SUBj
/KJF5zf2FP4DcSkZzw==
        "]]},
      Annotation[#, "Charting`Private`Tag$304077#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.005], Opacity[1.], Dashing[{Small, Small}], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwV1nc81d8fB3BpuFNmGWWEhkhGROFFRqFlRnY2ccPlct1L2mVWKioaisZX
KRmllJQRImVFiZRKVCRZ/c7vn3sfz8d93HPO533O+/U5it5htr6CAgIC68nH
/78HSqi3hM/3G+UqrpAwnRaC9GfR3v0tT41v8fdsvUs878honnNLi7GlbVOS
8owQpjr6aWYtfcZ79zczhf4JITrRfb1+y4ix/Iq+5fUCFNxrlXmj3TIbDuI2
Tx3nUPBaIEZRs0UcL6NjjuymU9AnmV+t0aKEDdxgt4vSFOTkGvRfzNfBuQaz
fUfWUiC89pG3W6ERnJRiFh9xoOCqHvNpcbsRxkIDZCaJjfRclUQEjBFdsFt6
tyMFoboTfZVbjKG1+v7i7U4UvNTR9V0+aAydba7G0s4U1Ei13Y05AbxObfh0
zZWCw5Jbi80aTVCTmP+8fhcF9hlRfj8/mEB9feA8Yx8KFCSzF2T/NkH4EpON
hcSlEt+j/iwyRf053VcZvhQMiB/Tux5sit8u+v/c/SnYKFZdOp+6AdmpVx/+
DKKAMt/4QecGM+RE+9RLhVPQtX9ym5azGcySO2dnEBdOlHw6EmoG/qtqQ9EI
Clw+rRbTzzTDy8WUMmokBTcfLgk8PWSG5gWKDRNsChK0388MzTbHPyFbqego
ChyunT1pIW2O2ckTviPEMyclHv/eYI6y/Xcog9EUbA2Zt9A+0xx9RyqCu2Mo
UO6tvHmjwBxvOQV1zrEUjDvFm86uMseUh6RaK/GFDeO77wyZo3+j9Vgjl4LI
sqLZtDkWeLpLxsM6joJNGnsyvaQtMJ7vVVdN/Evma5WImQVOf9yR/5hHwfO0
qy4BzhZYNEqRNeRTcHberh8VoRZY7qmZVkbMipM/uHC/BWzWvBLSjafA7Ndb
2bBMC4glfNt7h1gq4Ezh8wIL0DfzZlYlUPC9295SrorMn3+Id4O40k60m91h
gboc2r9leyk4VdsQ3jBkgZ59+UL/vRBCkPFRisocS0zG7hleXC8E43sW2XHS
ltjx17ozhXjgQkXtSjNLdEVSy1gNQjDgFCoczbSE3Cq/bJ2XQuhemtFoYbYR
FJFTlIevhKC831X1ceYm6H9d7dLUIYRBbVGlG/9twvLTobIGnUIo6nsme+rJ
JuxbkPr+MrHZBg1myJdNiDLisKLfCsFHUPDHQn0r8CO+Fsl1C+FyQt69sHYr
TCaiZnePEJbwfkF+oQ2+XtWTEv4sBMWow078k1sg9TPV2WlUCIt+j49OTG0n
59fnkZUoBU5zihJOCNnCwsu3s5z4uHgYQ03MFqyVF/+uEqNASKtfyW2ZLR5c
rDERFyf7E9psW7HdFs8k3oy/lSDnf+Da7X1XbcEQeD0rVIrsb5dLCGObHapK
Bvgn5Sm49U1yPNfFDkLrFgsKKVDwdaJpn6GvHWjLjx6OIfaQtjwbGmuH8lFG
jrsiBVaO2nVNuXZ4srno13Il0i9N9OUZf+3gcz5G59FSCuqflvctvmyPHNmd
it/UKRD4MaIg8J89REP1bB1XUbBm0Ur33mJ7fBN6f+AJcXZkZvvVOnuovU79
fVqDnBeVqAaNX/a4LBc1ZqZJgcQhjRITEwd8+WXJz9Eh/XbXb1TJ2gGavOa3
tDUU8N6f15zn4IC1Tirro4g/6TFu1gU4YEv5yrmbdUn/DgxcsEtzQMOpwtIJ
PQoGJRTerclygOm3Y2p+JG8UTZxkpXId0C62+nIz8dHMZxldJQ4YOffmTL4+
Ba5Wl476vndAYeOJK47rKEiL6qi2/OKArX/va1QSP7skMld1xAFVcTfK1ddT
MNFoacqYdkCOja9NJvGqSX780DxHRLgOvJtjSIH3suLyJhFHNOboRLKIT9t9
/3tHxhFGNCtGF3F9vLJehrIjtqQuz7M0IvW7uTMyepUjuNkTSx4wqNBpP17o
vNYRyZU/hTSZVATOqRtaZ+qI8krx4avEr1zXBgo4OmJdQvvT48JU5DIl3Y/w
HMFi+h0KEqGiXd/mbPAhR8xffY/XQ8z029e+Od0RAQkaUY6iVEQ9+mkrdsUR
qi1XdpuKUbExrNHybL0j8tyzomQkqPjedEjzP1knvJ+68aNuIRVLOUc++Cx1
QnqWvoC1FBXu8sfSF2k6ofyZvdgL4qbdKT+PWTjh1Li20QtpKu7QMgqD9jjB
0vB00QtZKjhmlzSXVzvB5/qUbIM8FXNKyzUvh+/Ac4/sN83LqJDN+amZWesM
5wipP716VJTd8E7/uckV4jadi2YcqJiq915Q+NAd+R2sQ7kRVBzYaHLIocYd
cVMxiSqRVAhXyY//feWO4MciCVeJFR90dZgOuMPX43NiPpsKi2uO51+LeWCh
j0HezWgq0g5YKY/7e0CpKzHoHpcKMXnpTHmqJ3I1x9/W7KOi1fVw8x5hT9Sl
NC632k/F2aw/1CpxT5xZqcN5Qay8oDU2QM4Twjv+k2s8QIUe84RrobYnrn7e
cbTlEBWukwyFDe6e8Fh/oevdMSoU9ON2ZOzyhOw1lq1nEhX9Ud/SPgd4QkWl
ue4Dceiv2llJEZ5QjDd9+jGZir1fDva9PuwJ56UDr76mkvUvG5NdluIJyxgD
t5A0Kmi+vvYxJzyxZ8Pir9+JT/ZseLY42xMxe07Sf6ZTsUPu7nTYZU/YDS+/
EH6cisWuS3Qr8z0RILVFb5S4NzM9VKLAE8V/ZzezT1BxtU0gz++uJ9ZfsNr9
h3hAaVWpW6knyi5Z/irsoGAFa2et/UNPON0dvi7fSUFQ+eFO60pSn8BMv2Ti
m5Tib6bVnpiRzVKeJB6y75vSr/dEwTnf/oC3FGhcFBHWbPbE1wda11qJ7+gH
r5Z/6wmF8Gb9O10UjB44Y7KgxxNmXy7NU+gm+fHqmS2z3xNF19itycSlQQrs
ySFPXLwvFx/4joJHZ9+UtQl6wfUMf1Shh/TPgOCLRiEv1P3a0ZFCbKKzuusZ
wwsGUjpPpoir6o/O3F3ghY17BjPbP1BQN228IU3VC4kLd4Wl9VHQ6nG9fqOt
F/YKOV4X+EzeVzfbuo2dvEBz0q4IJXYenzOs6+qFKWWRti7irjQPURU/L5wf
qJ5fNkBB7xMJx1mxXrhQrX5lz1fy/Erx78sueiHyyXOPvu8UzBuw+6X60wvW
QffEa0fJ/Hs+lSeNeSH9yKNG/KYgeZJzaGjSCxMdVsmlxBLzsxfdmeeNmTuD
EvljFCjpDljoL/LGoKrdlkPjFGB/3FlLS28UXjsdaDFFQYzCFTOf896Ie+Fh
Uj2bisEdY6fOb9qFy+oSe1pIf6vYezY+PeuD9VojBw6tpiKFNmVceMEHCxgT
ZWPE449PF2Zf8YFg15cfvppU1Ku/PBlzywch8vv9zbSoiBQy2qnx1AePeRej
Z+lQUXlfdiDrqw++de5RiiP96q7YNitc3xcz9yfyI4yoqGkLj/Aw8kVOxyyD
PmKtFOF+mw2+2Ph7uMHWmIq5k+Y1yzb7YrIvYUYTVNx8XZTS7emLzJ6IxB8m
VEwcOi676bAvVrilSYaaU+FjtCpZN5mM3/TvdTdx42jtjNJxX8iaOpzebEHF
Ra9ZvTNnfTH2tlBZ3ZLk2TpWftEtX0irrfYe3Ejy6Cdd5lKRLzRqGta6bqJi
UX7esdQyX/T1bBOrJx6WeB8a9NQXWZZCjTesqDg1tHmNQpsv3JZqBwTbUJHY
u8WT0+UL1bWujR+JQ1u3Hmv64IvlI4N67pupcKnbVrz8sy9mGfXnthFbPNr+
IWHQFy6zzCW3byHPf8eW0fHTFw1qjCN1xHJX7fQ0//ji9y0DAbOtpJ+z7L2P
TPkiMLYp9iHx72SH5A+z/KDjHDektpiGnr2OpfpCfqBbnmgvJK5nO/WlM/yw
qXjLM105GnLdnPVNF/qhasvdq5CnwV7drf+Smh9ce3SO2CvSAEV3kUlN8n/b
PYc7iNUkPdbZ6fnhyW3bo+5LaJgz7Zk+29QP0sFzTgUo0XC33sfQx8kPO21U
GuJUaBALCclQSfSD85GA+1dW0DDjsfsx75AfFshO9Kmq0vDVLvTbmyQ/2O/R
FLlNXLmOZXLwtB/UL6az7q+kYQ898vunm354fEh6+0t1Gpquc83z2/xgs94u
/a8mDSlfjv5WVfeH3O164W0GNPz5tunvMi3iGtP8emLPIcq0sp4/tjdSzDat
o0Fz5OAceRN/bGzen2i6nobXU4ni4g7+EOo3lF1jRIOMCFdzMs4f0R8ePpAx
peGqbvDuF/X+eKdiWvZ5Ew2P9ln3B4cEQMKiKv+wMw2R/J2rdj4PxAvrYY1D
XBoOd9WVXXsRiIy9R4WYcTScMzAwH28KxNTSug/HiavGpFwz3gZCdEw3O5tH
g2RY65GXPwJhKVujWxxPQ7HH9v4NskG4qvX6U/8+GsZheU6NFYSZ5T9NLZNo
YOQUL+Oyg2CvpxPWQKwwrXK3NjYISl6Ls+2SadhYNqfO70AQCtf3zvZMoSFT
s/LPhawgcI/qDXPSaDBYYmgn+SwI39YuMr9xkgbebG3ajHQwdG6vHBI9T4Mw
yzP0p1wwchp7AlKJL3Qlv/qoFAzLY/39jGyyP/cGsl6oB6OX9u6TUA4N8wKy
V2aaBGOPfdKcmQs0nH79IjXJIhifMirSuRdpWG7ydyTeOhgv6k0V/xJbydiX
+zkEI9pC33L0Etm/eupmncBg3M/6XPA1lwZ5fb3CZaHBGC49uyXgCg23r/hI
ykYEo1Hpwo9+YhOx4zHCnGCYfRo9uesqDa/4Fd2zeMFYQ89a94F417dBk997
g5F0PvWjex4No04yVwcOBkPj0KYulUby/q+ypHUdI+vXyos+TbxAkx36Mi0Y
aj2tktSXVOSdv/SqMiMYqYnTxbHEa2lNusVZwbBQL3AZJHbpU/13LjcY2us9
brxsoiI7oyc1qDQY/MbpPadeUaEhKDzq9jAYNhN+KyktVDwOXbdje2UwxnZ+
/RxD3Gt5SmFtfTBCnYyD3F6T+9GEdeHcnmC865A/qdxKRYF7yasLQiFYsis/
7m4HFY+WpUi2OYYg3dv0QksPFc3NCtprXEPw8H77jq0fqPjIvbvthFcIDEpF
JV8Q05raj20NCUHahuAzlb1UOHGUBGv2huDZdFld4UcqftSUDpXeDEHN3MLu
tAEqlgT1VWcJ7oYF1aN8+w8qDt5cG+tesBue1287vftH3OQnvGg4FAsj3koJ
k/wwzhNsmTsain3bvv1IIB7nZZ8eHg9FTvf0ixHi4JWtCk8Fw2BWrXqsg+TL
toPm2kELwnBV5pL6FQXSX+uVd5QahiGxYVzQUJmGW3kfLtonhaFoS+tQKOn3
AD7Pzyg9DLWqi5f1Ei9xkF65/FQYsu/5eDuo0XBScHvRZE4YOk/9/rCO5EGs
2+Pnl+6GwbZy0VyqBg1m4jnffnSGofBY+NvLWjSEGBdkPZdggTpQW/1Wn4aj
tQUdrIUszDxR0HAm+ZBvd0tKVoaF0nfTma3Eff63T4XJs7A/ySq2meSFS9qd
41KqLFSGrPStNqTB8kPx0SBjFoybxvvumtDgE1xSK2HKgsH4tX2aJC8Sf5dQ
KsxYyBLtWXqL+BG17KC4FQtFTzujr2+gQUfrQWK5PQvbW4TMLprTYFv+4Imf
EwuuOu/+yVnQwLIoFxB1YUG4a23FOeIbLg/5vh4snDodu/GMJanHvopY4SAW
7rSoH0gleQTm47LSEBYatJXdmFY0uJ9+PO4dxsJ18+y1x4jjFJ/oMcNZcBw/
u5BqTfLgxpOokkgWPhgsnjhIXLym8p5XNAtWU4o9c2xIHlZUjtJjWeS+er02
kfjXpqfaxXEsJHRflCiTo0Pk9dNwz3gWJiVyH5nK07HKvaqQlsjCbSmv4Hpi
64GqH0X7WYgda5dxVKDj4NSzUOpRFh5G/90bqEjHtHJN0J2TLNAl/7HSlOiQ
uVVzzfU0CzG7T2rLKNOxVr92YF4WWZ9w//hl4sjNdX47c1gQ9Sk9VqJCx1d2
vfec6yxs6Fr+6t0yOtqfN7k4VpB6LjPsVVejQ2fH6nktT1hI187KLCBO+5Ja
uLWKhRUTO+w01OnYyNhK2VTLArdvsmH1KjrKtjfcW9fCwgXv9vfaq+nI6qoV
UfzMgvXIb7aBDh2uvyqffxPeg+ZgsZBN6+n4sPie1l73Pchq3ZQYakOHuoqJ
3mx6OLYWPPFJCaPD/SPnaj4zHLN1Lv4nxSLzX74tuUUkHL9L9f9eIh5VVBg9
IxmOiD8ZZ0r20FEu9+/2KoVwKFVP/emJoMNK6qGqy5pwlBel6utw6Aig68sV
eoTj40/Vmq4Esr46VrKjdzgmJ8wC/PfSUX8kf2rSJxx/7kvTfxFrUKTeWgSF
I/fUyA6hfXSMzflzuisyHDJGQZJaB+g4MFMkSjkaDu8dYaKHj9Bx6efquR5F
4VihoL9A9zgdYqXVPa3F4Tjbr1dUQpzIdy/fUhaO73PP2OufoGMXPSnC6BGZ
b1/cufUn6VBW+fxhcU04BG61bdxwio6rO84/6nobjhNJPeLbs+hYIK+TZf8u
HE7GE22viA/217Hre8IhLxCVbX+WDv/wcbXy/nAcaz+hteMcHcuT7M6eHQ5H
llxQtEc2HdcrqByX2REQbTwaEXqJnJeDF+xezY3A94t1bj+Ij9roaVhRIrBU
b7dV+GU6gjt8PukzI5DyqlM1KpeOrpzJJ4XzI7Bi+IrcOLGN3/HzK8QiIDjR
IhF7hQ61kQp76YURMBNypvCv0nGuzHF1unQE5BVuzxXIo4OR8J1OXRSBhfZB
cxOJ4yz2f06Qi4BPwSGhOfl0fGfIPh1XiICJAYVxkNi9pTCbpRSBT4KDYpRr
dDRmbowdUIlAkrj2oqPERp7vHTyXR4AV3b2McZ2OgqVRmu2qEdjfJyet0k2D
3HcGc5t6BIoPU+adJU65e3mgWoM8f5D9mMg7GsLQnFOiE4HrsXnvpohXu6gJ
nzaKgI1J2pvXPeT+ldz71cE2AtkSCW4HPtLw8ddKpdkOERjI7Y2a20/Dgh3s
nbedIvBGm37yADFnCaWe5haBjd3/dRz4RINRifp/Ff4RCLfWPX5wgIaaHk7Y
Cl4E8oYNSg8P0tCtPX90Ki8Cx/7tbEsdpUGoc9305ekILEt643ptDh3jvx2X
JZ+PhJ9E9rqeJeQ8tb2R2WbAxom/2esLQceOPY77xtezcYneJKFtQsd5etu3
C8Zs9Lhe+1FEvBzt5T/N2HD1t79bakrqda3T/cRWNt5XHfF5bEZHIPf9pVYf
Nhreukc1baTjsfwXVbdUNmIvyTqNbKNj3v3AE3OPs3FzWDWXvZ3kkf3Xyf9O
slFS+370D3Hr4W/1M5lsrG3QvzhlS8fgz++hF3LZ2H3rpso8Bzqkqn7d6Stj
Q6sytlvameyne4RsUjkbXy+0+5wjvjw+sk+ngo1TBZ3Dci4k/9R/2x+oYiPt
e52I8k46zE79GVv6ko3SZmf+KjdyPldzPF42s3HkZeuSQuKXdePV0a/Z2Ovx
p07bnQ6Xf3/P1HSw8Wl4yVJ9DzpyMmNn7eliw6pBveMB8UftyUDp92xUj71N
NfKkIyxgyiDoIxvdnxUpZl50/KJ2ze//xMbWdn+hR8RRNx589PhC5jdtp671
pmPC5mxZ5zc2PE8luaw0ZIA/FJviMMTGry6d8tvEgmkuu5p+sGGpbKega8TA
QU2DtdYjbExHfz74gDgl8u8HjLMhEhG+87kxA2ILOoofTJD6agbWWoOBUyWl
x3Sn2VBb2arfTJw9Eb1GTTAK9tNiS7pMGChIGDu8kBGFyV3SIr82MKC1pNXt
uHAUtho/TY82Y6D46T0tpmgU0u/0SU4TP5rH7hJcEAVW6mEVigUDDUkjGkPy
UXAJ2OUtt5GBwTM/Wqu0o4Dn/rbWNgywDJpuGOtGYVlGwmQT8ejbWwn310bB
qFgkz3EzA1NyYaq3DaOQufj0XO8tDNCvfOedtYzC8mrDHs42BlQLvyqH74zC
7NIpep49AwG1H8Pl90UhseC44Vw3Bv6jRue+PBAF8Q/nOaeIf22itsYfjkLV
vbTiZe4MxNWp6/ckk+dLUF9n5cFA2ouofxfORMHK2Nw/1YuBkgZK0pKCKJR7
TljJ+DEw75XaFZWOKDxg9UErjIHczsi2lRrRkE4Z+RK0lwHeg+d2LS+jsbD5
v5vplxlYcLx7x6ZX0eC2HPi2MJfUM2DUreJ1NKYWtahlE7+TXBJwoyMau+82
FF+/woARixe3ry8a91ebDTzNY2BGWeeK9p9oLN6HJ2M3yP6nXBw7IcfBhg3V
1u5FZHzf0kmqIgeHE9w7PhIXrHspkKDEATMqJDD4Hhl/YIoWspwDgdLBNE4x
GX/DDnkzLQ7mvI2fPl5Kxv8jvHHUnIMjZRM2NeUMxHvFZdrv5mBB1YlnOs8Y
aG81n/wXxoHcdn/hamItm/luN8I5+Ja/xMX5OQMfdS8pCHI4GBrZNsGrZpD3
c03erUQO7DKS3aprGbi4N5268wAHRgsuPnSuY2BizCV43mEOlrWfUxgkvvnh
+yq3ZA5EXDYPi9QzMNepJI2SxsFFPcGdl4nd6xN+3T3OgW16Tu2aBrIfJlb2
HhkcDLJV1tUQi5SIF9POcGAweuKWSyMDgWrdC4uzOHCP1X5O/UtH5cWrMV7n
Obhw68nJFGLZhay3jAscPHjq5y8+Qe4nSfqGpZc4CE7oXX+GuGHW7JxdVzjY
56a3YPEkHUuj6wXm53MgNcweuUjc4eVR5fsfB86bb5XdmKJDq235UtHbpF4i
1y+tnqYjyebXofI7HNA+JafeIzbSO2AtXkrmFxdlV8yQ9zXjxqvHlRzMnjU7
rEWAgcm9kTohzzjYr28evWMWA/Z/DE8trOFA4WvYvm7ieb1NzqENHOQa8/M+
CzIQVDLWI9vOQUUKV25qDgPa3qbDUd85eG/5vlqFykBVSQddXSoGjxemCMWJ
Msi9VLDzukwMXE4O5I4Tj9xWzV++OAbut/PM2WIMLLnONVNeEgOnCLv0UHEG
Es4t5smqxSC92327lyQD6/d6DVERg3fTWpGW0gwUWX1p+uQfg/fa5mYLFBm4
0j2ecaGE/M69S320moHauxU2wT6xaEkc53TaMqDr/vidqH8sfC+Pf/O0I/1C
ecIqDYxF1rUq78/EfLfKk3PDYtE3//HOUdK/WkLPunJiYiHSa8IVdmLgnEtd
yOuUWIwkurM27CR5MetNkmFZLPYae2vd3sVA9403ch8fxOLfrSI5PR8GrBxb
bx99FIsnlk3Cj4hVbrS9bnsai7CT3hMvfBnotO9cFN4YC+M1P2c++zNglv/+
5tW+WGQrXH6oEMLAwq1f6+cLc5Fh91AkI5KBSgGrF4dFuPAQeucmzmYg9M61
2lniXMTlWhakEz+XDHw+spAL1vbfO1KiGIjs+lzRpshFb2Tpm0McBhRSLB9t
U+ZiZo+c4bwYBuqN88prl3KR96w+bz+x0mW/sgcruRBdJnhobywDrwL77+Ss
4eL9vYYQbhypj6x5odRaLqTsI4f+Eq9oyL2VbsBFW4l3BIfHwGv+nAKaIRe8
V2cmx4gTVvvc3GfMhXfGgkNsPgNqvU+vT5lw4Tll+WfMi4n2E0rX2GZcXLtD
c97rzcR+8315QxZcZCo5P6TvYkLjT+8V/01cqO/UVj5F3JlvmttjzYWXb2ay
gg8TB10uXXLewoX2lmN/rxO/e+iVY23HRcE3sY4KXyaS9vec0XDjounKneIv
/kys1cXpfA8umkc5OpEBTPR9zslQ9OYiMPFF0QyxgbXHcXF/LpyOSD4UD2Li
i+i7Y39YXOCU0aBhCBMWOW/5Ffu5MFMfrjrOYmLW/VafrTe5eLVLztMoholQ
2peK6QIuXu7f0veauNNlUuZmIRcxZvGBwbFMFE3KN1NKuFDo7uWf4TLhZxho
WPmEi6WKRQ2/eEzUP56UXNPGxRLPpMm8RCbOVCtUywjGIUI1/oxEEhOr3gSt
+OQUh+dRdZ1j2Uz8qXg8V2o8Dvoj9246VzJRfNVJJ2kiDmUHrj/9SByVPOQt
MB2HKPUV3WFPmRhzWfR4YBYPcoNVCw9WEf+Oji2j83AkPPrGnedMjK7UGHaR
5+GoUIsN4wUTP06fbz9vwYMDtyT6SQsTt/k6QmKbeIgondtj85oJlu+LNQet
eZh76L1VO/Gw1t/jodt4kKHoLh9+w8RQg/1mYxceND+HzVrczsTgbEZlz24e
2hIVV8V0kfqGxd5QyuDh/ZGXLO1+JoJ+P9VtOM2Df+QW6gvir7HMyqgsHuyk
GnO9P5H/H7jQXpvDg2Hty4/pn8n6zj6fy7rOw4uYd4d/fCHPUy3mWV7Bw7og
Xa+CISaiN7t+863koUe4ZoXFMBPjr65EzX/GQ4Hnzt/dxBPda5O963h4uvFQ
BvMnE9Mj7vcpb3h48ub335ARJuYo3JBw+MrDw3Xr7NTGmThwZTRnZpAHpY4h
6yrieSuNVuYP81C18Iql618mKLrNJpOjZD33pDcmTTBx5IFMQ+4fHsq0222U
J5mgmfjs2DLBw1hqpn05Md3mT+jFfzzsVlDZPThFzmszJqwE+dCMGObtn2aC
4XT0wOgcPpw/lKcvmmEiuatFJFuID9XY5PwiYmHvxecsaXwM2nhV2vxjIvWz
37KfDD76Ata+/0gssvv2naz5fLh0i/2LExBG+q+/hmZifHy7+sHWdgkTYpwN
td8l+Fj6eb95F/GJ6ST70wv5+K29eL2fEhMS+1rfQ4aPj63Da34QS6YEjp2Q
58PS13LNHBUmpHJTlQxU+fh177SP2jIm5Jve8g4a85FScO0AbyXpR9f9bEFT
Pg5GVPNmiLO/qO3mm/HJeQqOiVdjYtFsvmvUJj5Gf5pz96ozIaOrsM7Pjg+1
JpNrBzTI/Od8xs39+Zg9ZFyQok3qG/A9fG4qH4v+K915eR0TP//N+O9/x8cc
nRVos2bida22o9UHPub+sdMOsCH9cCLATOQjn9SpS/UvcdyyVwrnvvCh9GDu
MtktZLytVzrujvLRblZi57GNCblsa+s+WjyuP47jD9gzYbP+zCpTvXj4CTdJ
zbiRPJrXsIhiEA+ZIc7pVHdSv6ZZ9Mb18ej7ypVR9CB5tiv4s7NpPIZqUtXN
PJnYdczowp7N8Xje+PXQUZJvsZ0fRS/uiscRhgNTiuSRW660gL9fPES3pDdf
I0boliG1wHjUf1TJWkfyaJ5gaV1paDyqbjqt9QhkIn3FsX1NMfHQ7u3MvxrM
RORIxZ5TcfH4RmlLXUvyyfHhqIdrfDwM76ty64gXbXdfP7A/HgpO7e5Du5n4
J3NCteBQPN7O13JKCGWi92O1VOTReBz83msnFsbEs4KpeQbJ8bjd+tU+lzif
o/n7X2o8ugo3ueiSvPsfYjuD4w==
        "]]},
      Annotation[#, "Charting`Private`Tag$295235#1"]& ]}, {}}, {{}, {{{}, {}, 
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 72], 0.013888888888888888`]], AbsoluteThickness[1.6], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJxFlHs0VGsfx1GO2ZeRROVedFGikJLrN2VQCYWQWzKEMIxhzLiXopKUpF6V
LiQRx4lK91LpYlyiSKVCR6VIHaSLd971nsUfe+31Wb/97Of7/axnPTP9wtex
pSQkJF6In/+9U782ytYvU8MqT1N5q18ycHM0zvCbOAfmehozZ0ow8KlQ5sDL
EF0wM8xadEkGbiWErCkJMkBr8yO5YkUG7rbfcA8XGaHY8H1NlQYD5nmfhOYH
jSFd2a6bN5eBMNk07clMU9wWreUPGTHQLapc1fHEHCMvBDtIawa+KUovcMoD
Kjp83FqcGTj8kf9pYbQVhlWKNhCbGFBR1orK0l4J+x20rXcwA3IlhZN+m1mP
8c2+HCOOFAsShksaDvswwLCYfy7YiQVHm45on7UM2O+5NoOdz0L+xjS12eYM
ZD93zPHpY6E/XL/mgw4Dz7W7KA8LGyzf/jy4XJkBK/XlVxsv2ED1itu9tTIM
DGzSf7tCYAv2Je63bUMy0LOy/Vr80g7k0uTdx/pkUM4ZiKX3rUaGVe39d59l
4MIKMP0YZI/Id5ndp7/JYETl+c8HKxzgdaJb+HVYBg3Dc3ya9zqO+U0ym5bK
cnYa87swSebcJaV1cHmwvXnTVAY4hzzD3g+sg9JI6iF7LXG+lKn1rR3r0bVc
8ckDPQZSDofsJy47j/WL99N9bbnCBamjDqadVgy4bJ/9dbjABb8N/u+Hr9On
G13ngvPqGfOaOQzkNV3a8vWbC9gzI38cSxrn8n/njvZ/Y+EiV0jWqn+cm8NA
1LdyYckGVwh+TEx6VcFA7n8EVfMSXfHTOjZjtogB6VpFpZAQV4TW9ey9VslA
tdXKL4WFrmBEHUxgPWJglvGJE+pqG7Bl9Qr9K58YyND97ZRzYANqNb90LpQj
MKi5UUqWdMOu9QOFKmoEfKdfqkhNcoNnxaSN2nMJ5C9kRle5u4M+FnDBz5hA
pPL9pwUsD/gyHp2+uJzA98SySY1hG2FxcOKqblsC/ZMNz5lv84QiVR6d4kTA
ucHp7MdtXvD33vGZ5Slej5f6x428oZ2580+DIAK/XkxQy37ijS0Xlhs/jSag
bJ9ZYJPqg/P96UvJbQTyvJmH4lV8UdT243rsdgJObabhl1190bDZcf8LIYGS
qes3bojyRcE28D6I//eHc7DNP1m+kLonzWx0EffJSjY8UOaLt1Pk34yCQLUo
V0O/zhe2oewv0ToECjsUzmb89oVqhkvzdiUClYc8QgM3bIKT9b1chiwB9YyL
ah11m+DNfZs+jyKQlqIgcl3pNzb/EhORIKr2Q8VLliBBgYBHqEiPpb8Zucmy
uWbKBGr8dDqundkMSX21ASsNArpuaZlG6v7gDF2uadMkkGPfbVma7Y+1278G
ycwnYNyWecJakg2lxykF24wIsLJa2BoebNzOX71DV+zX4KRTn3A3G4enDlU8
dCTgYqcy/3sFG0xDh/r+MALvVJPuX7zHxoM1t5XWxBPg93f5Rz9nY0eAkf+Z
3ePc+K+/mz/23PT+wca1Bcu700+L/dZ/8VKbFADJoqrKq48JvD3p+qNdMwBr
TKp/J34V5w+ZYl6hGIBvEj2aj96Ms7Vi1oN9DQSmx2Xek7UJwOf37sUmnQS8
H2qaETkB2KIGyy+jBCRc646ekApEYfLcQwfmkWiNuVvuwQ6ES2hCf50JCf4E
jvzXxkBIu7fYMdaQmJ6pHLXbYgtuR9pmb/Ygkbw9ZtaEyi3IqH5W38Em8SG2
uVmgEwRXqUDKM4KEWlvnk8ZzQThmUUbuiyeRKsJ2O81g9Galpjinkei/c3Tx
rdxgdAuGiJp0Er+EncNHvgQjd+7M/aMJJAS+NRpVS0LA5+kG6AWTaDnaTjk7
h+ClKCm6wJnE95UFrEZhCGwt/UZLzEnsmk52ZWaGoODfPt0uMxt0S0OQdKlg
QH8qiYaAo+67XoWAVRzbpS5D4rV6p5r/0q0IWyy6mPybgJ0CRO2lWzHsemqr
x08CFcTRhPWzQsd8KY9+13t0JBSb/qi45ytJ4uqu0/s2y4TB/paMV5k0if0l
eadUg8NQZDVyN5tJIliUXdXyOGxsf9rDcnrYsnC8dZzTfEaVBM8hr7a7LBwr
3xdWqmmJ84dqKVrKcvDpWnjOfSMSDzoOFD1exIHJZJbsHpBAj9MngR0HCXuu
vLq+hQRj3UQzj/UcKKg+d7mYSKLxStWuZV4cFJ0bflyWM87DN05weakkEjxu
JzG2clDr1TucdI4Eqyaq/m8eB0oyCdXNDSTk9Oaq30/kILh8Upz2IIn53+ui
nwk4sGgY9V7SNc77uoqkfzaNc9ubO4b6d8Tn51Db1sJ0DgI8nA0Ot5OYRq6S
WFzCwZ+9G4SeUhR6HDT0k95y4D3tRcHBhRTyHtoTV9UikG+Ws2CZOQVH67g3
Q24RiK5Y7v7UmsIfN4svG2ZH4NrndDdyHYVqk7as8PoI/J6ysqPUh0JYpUzw
OTIS1o57Xr0JoaC1aInV39aRyG9MsLnPpdBa7K+slRyJf0w7l6rGU6i58vpU
YkUkzPg6Sx3TKbzzK371sy0SnPAHj5sOU/AK2aJ1biASreqtc9qOUSDJKCWB
JBcDAjlCRTy/VJQ4yU6OC8drLfmSqRSS5A28tZW5OD96xLiHQ8EurqtEZhYX
tJVvg8hznF0shb8n2FOY/C7nxztdLnJnMy4UWVB47mC36t5SLl5QB4PsF1HY
+dkZB1lcFCkMPXmoQeHXoHzqCh8uujv/keuQpzDxiVFg+W4uJKD3dQZT7MPe
37L3Hhc8NXcL20liH7X7p2lLRY19r7niVt9m8yg0Hlt9Rnea2Me1vvvH+VGo
tJpy96MqhT3G6vntf0Uhu35NsNIsCvhrDX9aXxQiPXdMstGh8I+u0HH9fB7c
JNbqSutTuMt1TD7uy0N1rkhWuJRCnQN3M53Bg5crEZO9moKVm35RdQEPM3aS
JkluFOjbnYOHy3hjPlp0cqxjL/OQymOxU2MpHD1om+12hweJswtGTHMosEdH
3i6t40HwQj5zoGKcH/ZfMbp0YpwVPj/d/CmLgl5Qqf60ZzxE3t0+1e8CheEm
n6TB1zw05Rk8ePqUwi0z+fqWDzwY7w771j40zslp6ZqTeyiEtqvdPf2dB7WF
S+SP/KJQYr/XzUA1Gt9H8tLuzaDxx+6ClQ3LouHWtMrUdAWNeQbhifabopEv
e8Ak3IGGfZtx9cO0aMT/53FHniuNd2k3lw3WRkN3p9ayZ4E0jkzom2wwMQZR
d0KMqSgajglqH0ItY9Cw0vtEv5DGxO+rb58VxED/5auUgBQal7iCI92VMUi1
WcG9spvGYPcHXW5rDII/klmxWTRsdz10qhqKgQdPJK99jMbJ+2/MnRX5qBy8
KWQW0tjb6nW/nMVH9raRGaalNJ52SmsdDuRD4eaTCK3T4ry9dwJtkvjwb46b
/n4/DUXX6Ko5u/i40DP7xvlkGoXz2td3H+VDXuej68FQGs617+wulPDxjT80
v8aNxn6TDS+X1/Ox6rTeKmWWuN9UwY3zP/gQWE/OYZrRWJtVdOjDklgkeR6X
PWZCQ4p+Fj4nMhZsicAFnhD32yFt61cai9rcv5lN4vVbJRfPONYTC9UJa37P
caQxM85vuE1LAMkzU1S7XWi0DO5rUPQRwM8y+5eHJ41dETeKnI4IYNu5UUXJ
j4ZF76ekjBYBaAWvVxPDabBq5TaPSArH/F1tEJ0pUhZCT5V2Zot9nZDWdsjV
EI75CAp/fjRmnhBFDgM9KldoGLTt6XU1FMK8Q85XoYnGiJWl6RJzIZrCFj6j
34+z5rbW+KZnNGpKvqQr2ghR3PV8QvEXGhlTT7d+cxRCn/UyPZliwiXJdW6z
hxCXz3RMcp/NhJSGn9qpICEGKin1rYuZeJymsDWFK8TZS/19S1YyYZXVVL5o
jxCyZxaomLGZyBO9zxOdFcJ/chaVFcZEWgd7jk67EDN0Jrr2xjER2f+mbCcd
h+H8spT0VCZ8Jb2XdZnH4XaPxXXpLCYW2RgGL4qKQ2TzwWk4yUTXrU1WW8vi
MPNmL0fwFxO5ZvuUiz7EofHciocXapiwv3h9oHN2PPberVKQeyLOa/Dpocam
eLyYnrGn+SUTVSUqpzbmxePWVefi/Z1MXEuzSK2tjUeL5Kj4RmZicdbPB9Fv
4rHjvHZeYjMTrxcyblr3x6NXJq5k8DoTZw9Xy84eiYeV4V+P1pQwYRKqUdLJ
TEBltWZd1wEmBB2ZlhGLEkC/c+81SRbn97g+rTQkAV4jUgckOEyUWhy3qC1P
QIRl6c8/Q5j4L5FX3ZE=
        "]]}}, 
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 72], 0.013888888888888888`]], AbsoluteThickness[1.6], 
      CapForm["Butt"]}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 72], 0.013888888888888888`]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 72], 0.013888888888888888`]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}}, {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{3., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {3.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {3.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {3.6, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {3.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {2.8, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.05, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.15, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.25, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.35, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.45, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.5, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.55, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.65, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.7, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.75, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.85, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.95, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {4., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {100., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {200., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {300., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {400., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {500., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-100., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-80., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-60., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-40., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-20., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {20., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {40., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {60., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {80., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {120., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {140., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {160., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {180., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {220., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {240., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {260., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {280., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {320., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {340., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {360., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {380., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {420., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {440., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {460., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {480., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {520., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {540., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {560., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {580., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {600., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{1065.2941176470586`, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.831818914839203*^9, {3.8318190332750893`*^9, 3.8318190566026764`*^9}, 
   3.831819123871396*^9, 3.8318193655106792`*^9, 3.8416588074105663`*^9, {
   3.841658942911436*^9, 3.8416589553336177`*^9}, 3.8483895012576733`*^9, 
   3.8483899054365335`*^9, {3.8483901794451904`*^9, 3.848390196747032*^9}, 
   3.8483902663068037`*^9, 3.8483906504640727`*^9, 3.8483906993639145`*^9, {
   3.8483907449102774`*^9, 3.848390786351776*^9}, 3.848390843118941*^9, {
   3.848390898461196*^9, 3.8483909075349054`*^9}, 3.8483909453701515`*^9, {
   3.848391096256532*^9, 3.8483911336086226`*^9}, {3.848391878560466*^9, 
   3.8483918840430017`*^9}, 3.848398653249876*^9, {3.8483993533830748`*^9, 
   3.848399364748419*^9}, 3.84839988051296*^9, 3.848399941101116*^9, 
   3.848400161142665*^9, {3.8484101022823915`*^9, 3.848410110912116*^9}, 
   3.848644913182686*^9, 3.8486450694715557`*^9, {3.8486451323769627`*^9, 
   3.8486451472824945`*^9}, {3.848998039562787*^9, 3.8489980441095057`*^9}, {
   3.8489981064635143`*^9, 3.8489981423876762`*^9}, 3.8504609733365498`*^9, {
   3.8504610295216255`*^9, 3.850461047101116*^9}, {3.850461502391677*^9, 
   3.8504615331871915`*^9}, 3.850462050920704*^9, 3.8504621035491276`*^9, 
   3.8504626430073724`*^9, 3.85105616536802*^9, {3.8510569755932255`*^9, 
   3.851056997963068*^9}, 3.8510571904363737`*^9, {3.851057374486069*^9, 
   3.851057391821929*^9}, {3.8510575801871595`*^9, 3.8510575944585776`*^9}, 
   3.851057654878337*^9, 3.8510577477449903`*^9, 3.8510578144752665`*^9, 
   3.8510583993718705`*^9, 3.851058459865567*^9, {3.8529602681657104`*^9, 
   3.8529602871826735`*^9}, {3.852960410602391*^9, 3.8529605001772795`*^9}, {
   3.852960605930732*^9, 3.852960613936679*^9}, 3.8529611356891084`*^9, 
   3.85296123195632*^9, {3.8529612623829846`*^9, 3.8529613007812557`*^9}, {
   3.852961559553734*^9, 3.852961618079519*^9}, {3.852961657458976*^9, 
   3.852961668332364*^9}, {3.852961943234857*^9, 3.8529619640392866`*^9}, 
   3.8529623975116525`*^9},
 CellLabel->
  "Out[918]=",ExpressionUUID->"51186be4-9094-4394-a44c-50471d541acd"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<osmoloarity-100mM.pdf\>\"", ",", "osmolariyPlot"}], 
  "]"}]}], "Input",
 CellLabel->
  "In[679]:=",ExpressionUUID->"b5f1498f-7657-47ae-a2f5-e074db89fc00"],

Cell[BoxData["\<\"osmoloarity-100mM.pdf\"\>"], "Output",
 CellChangeTimes->{3.8529613531386557`*^9, 3.8529616737363105`*^9},
 CellLabel->
  "Out[680]=",ExpressionUUID->"3fe376d9-8116-4e53-b09d-64441a376be8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"startIndx", " ", "=", " ", "170"}], ";", " ", 
    RowBox[{"endIndex", "=", "  ", 
     RowBox[{"-", "1"}]}], ";"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"startIndx", " ", "=", " ", "130"}], ";", " ", 
    RowBox[{"endIndex", "=", "181"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"startIndx", " ", "=", " ", "10"}], ";", " ", 
     RowBox[{"endIndex", "=", "  ", "60"}], ";"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"startIndx", " ", "=", " ", "10"}], ";", " ", 
     RowBox[{"endIndex", "=", "  ", "3020"}], ";"}], "*)"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"startTime", " ", "=", " ", 
     RowBox[{
      RowBox[{"MovingAverage", "[", 
       RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"startIndx", ",", "1"}], " ", "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"endTime", " ", "=", " ", 
     RowBox[{
      RowBox[{"MovingAverage", "[", 
       RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"endIndex", ",", " ", "1"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"middleTime", " ", "=", " ", 
     FractionBox[
      RowBox[{"startTime", " ", "+", " ", "endTime"}], "2"]}], " ", ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotOfCyclic2", " ", "=", " ", 
     RowBox[{"ListLinePlot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"MovingAverage", "[", 
         RowBox[{"cyclicShock", ",", "3"}], "]"}], "[", 
        RowBox[{"[", 
         RowBox[{"startIndx", ";;", "endIndex"}], "]"}], "]"}], ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"R0", " ", "=", " ", 
     RowBox[{"(*", "0.00048", "*)"}], "0.000465"}], ";"}], " ", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"unP", "[", "t_", "]"}], ":=", 
    RowBox[{"3", " ", 
     RowBox[{"Exp", "[", 
      RowBox[{"R0", " ", "t"}], "]"}]}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotOfUnperturbed2", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"unP", "[", "t", "]"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"t", ",", "startTime", ",", " ", "endTime"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Darker", "[", "Red", "]"}], ",", " ", "Dashed"}], "}"}]}], 
       ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotOfperturbed2", " ", "=", "  ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"cyclicFunction", "[", "u", "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", "startTime", ",", " ", "endTime"}], "}"}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Black", ",", "Dashed", ",", " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"beforeHypo", " ", "=", " ", 
     RowBox[{"cyclicFunction", "[", 
      RowBox[{"middleTime", " ", "-", "2"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"noStoredP", "[", "t_", "]"}], ":=", "  ", 
    RowBox[{"beforeHypo", " ", 
     RowBox[{"(", 
      RowBox[{"1", " ", "-", " ", "\[Delta]L0"}], ")"}], " ", 
     RowBox[{"Exp", "[", 
      RowBox[{"R0", " ", 
       RowBox[{"(", 
        RowBox[{"t", " ", "-", " ", "middleTime"}], ")"}]}], "]"}]}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotOfperturbed3", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"noStoredP", "[", "t", "]"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"t", ",", "middleTime", ",", " ", 
         RowBox[{"endTime", " ", "-", " ", "6"}]}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Orange", ",", " ", "Dashed"}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"ppp2", " ", "=", " ", 
    RowBox[{"Show", "[", 
     RowBox[{
     "plotOfCyclic2", ",", "plotOfperturbed2", ",", "plotOfperturbed3", ",", 
      RowBox[{"(*", " ", 
       RowBox[{"plotOfUnperturbed2", ","}], "*)"}], " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"FileNameJoin", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"ParentDirectory", "[", 
         RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
        "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}],
     ";"}], "\[IndentingNewLine]", 
   RowBox[{"Export", "[", 
    RowBox[{"\"\<cyclic-shocks-100mM-zoom.pdf\>\"", ",", "ppp2"}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.8483980669638624`*^9, 3.8483981201898737`*^9}, {
   3.8483981610787773`*^9, 3.8483981656683598`*^9}, {3.8483983071000867`*^9, 
   3.8483985113124895`*^9}, {3.848398746178877*^9, 3.848398778451149*^9}, {
   3.848398820154811*^9, 3.848398911043567*^9}, {3.8483989445212135`*^9, 
   3.848398981761582*^9}, {3.8483990279326887`*^9, 3.8483990556485434`*^9}, {
   3.848399114002758*^9, 3.8483991192886386`*^9}, {3.8483991531851287`*^9, 
   3.848399157513094*^9}, 3.8483994576809196`*^9, {3.8483999043286657`*^9, 
   3.848399921151553*^9}, {3.848410089544388*^9, 3.848410089886484*^9}, 
   3.8486448904145665`*^9, {3.8486450862475643`*^9, 3.8486451106951885`*^9}, {
   3.8486452660626693`*^9, 3.848645266321029*^9}, {3.8486453811834927`*^9, 
   3.848645398014716*^9}, {3.8486454290724697`*^9, 3.8486454300209246`*^9}, {
   3.848998053510121*^9, 3.848998065468274*^9}, {3.8510574642758474`*^9, 
   3.851057508609907*^9}, {3.851057608221595*^9, 3.851057613823679*^9}, {
   3.851057710868444*^9, 3.8510577181361957`*^9}, {3.851058404713868*^9, 
   3.851058429012374*^9}, {3.8510584647739706`*^9, 3.85105847986475*^9}, {
   3.8510585303362947`*^9, 3.851058530790641*^9}, {3.8529602992885075`*^9, 
   3.852960302321026*^9}, {3.852960521775528*^9, 3.852960585766412*^9}, {
   3.8529606400031443`*^9, 3.852960641661009*^9}, {3.8529607041768265`*^9, 
   3.8529607076862698`*^9}, {3.852960744471421*^9, 3.8529607620541162`*^9}, 
   3.8529608155518827`*^9, {3.8529608521947126`*^9, 3.852960947759919*^9}, {
   3.852961928655015*^9, 3.8529619300756106`*^9}, {3.8529620148366203`*^9, 
   3.852962015682912*^9}, {3.8529621580455227`*^9, 3.852962162613471*^9}, {
   3.852962200405032*^9, 3.8529622020824614`*^9}, {3.852962242485355*^9, 
   3.852962246883171*^9}, {3.8529623044047337`*^9, 3.852962322339548*^9}, {
   3.8529623607167253`*^9, 3.8529623734609*^9}, {3.852962421068164*^9, 
   3.8529624303238115`*^9}},
 CellLabel->
  "In[964]:=",ExpressionUUID->"2954881c-fb18-4a9a-adbb-d6399f152b73"],

Cell[BoxData[
 GraphicsBox[{{{}, {{{}, {}, 
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 60], 0.016666666666666666`]], AbsoluteThickness[1.6], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJxFkGtQjGEAhVdy631TrUiICBPZaAdtJR2VrlYhWUYuXSSmom+/3a/dUFhF
LlOqUZKYpEZiKJOMEemi0UWpNrmnJpUyYVPGJX/qx5kzz8z5cc6Z6x++MUiL
x+MtH9Z/99u/1+xGfwTUs9ULWzIIdHSkxooxDPoV+pNmphIU5RzRc9dn4P2w
MXOMiiCaL9xhPoNB/t80UecBAveoT3kT5jOgjrvqaraP8mYH5Z+xYgKDjpRf
HQIGFxZMLMhZTfDKy92j3JrBa5IcIl5GENvrg2QXBjmGAw1Vcwh+a/gqp50M
2tt+6L/jE2g3rAi+Hc+AB8tvproExeJAh55yBqzJ1tVuegRhlYlG5lrSkfw8
p8d9AfZSvMjwvC4wIlA/7Ku4zElR6DilrHsWwWnR7MzWu1Ik1a7bZzyfAHfX
cUZ9UkRsP6HnakHwQ6D03rSYhYS3XjDOiqCM8Y65vItF8YWayUprgmovJoCe
YeHnO0me5EngKLHKKb7GwjRWxzZaQkCftGlSb7EjfzRapKyNvM9CxboEqSIJ
LiW7JUlKWfBylwzZpRAE/R36aF3NQvGaf67/zihXfX2woujKKBv2NgV8SSCw
DLlpZdTMIqLs+DT/AoKf9TujNe9Z1KcLnzU1ETxexa9t7GIhig/73jowyjFx
J+cZdBKEtpqUZQ2yMFm6kp/2myBPfFYinCXD4FB6XLkpxfj4a851NjJI6j3s
7JwoFgnDj4h3y5A5+bxtuBeFuEVUXBUnw6GLz9+l+1J0xJXYaCplEMSa2TQH
U6SN7TMQasshLd0vIlIK78MmXaEOctQ577jyVUmhPej5JFchh9Wbt0f3HKUo
YhRp7YVyqFydmAfxFJr2LgGjlmNft05CZAKF26mqDfcG5NjG1vDNMyiuVnyw
95nKoVBTotTNpjir9qu47cIh6diQqd1Niqa2cWapwRwMSxoOmmUN9+0pDXaN
5hD4Mmr650SKqb6yewtPcSjoXPAoP4Yie1HrpvZLHPgW3b7JoRQ+lR3uBXkc
vnMDi59KKBJtt7xZU8vBI8vSY4bL8L5pikf5vzgo1hqk6K6i+Ae2gmhf
        "]]}}, 
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 60], 0.016666666666666666`]], AbsoluteThickness[1.6], 
      CapForm["Butt"]}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 60], 0.016666666666666666`]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 60], 0.016666666666666666`]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {GrayLevel[0], Thickness[0.007], Opacity[1.], Dashing[{Small, Small}], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwV1XlYDn0XB3Bpb4ZKSiqJNsoSIkp1WlRChZJo02KLVNPc98gjd4VECyna
niLRvvDUnSjRvlFIKC3aN0W0CHnP+8dcc32uueb8lvn+zqxwObPPff68efPe
4PX/e6jHWeXMCR8waNDxm5dEwEO6hVL67gO/P88eW4puubCp7F+0G7vJZiNa
IeqL4/UfPhC+onSDGzq/+EgMPeUDHDpjuBrdtsCcgFkfSFpb5BxxhwC1PJlv
zTwUjJ8qdJBPJsDyCVvfYj4FuUkmFlpo34rmsGp0ivWonhX62YdwtSe8FFzZ
cU4hEL2Ph9ctiZ8C1x2pvX3os/tGWk4IU7CpUcs7+x4BNT+eFs+JUeAXqxO/
/T4BE7zb9APFKZDnfk61RctKcF/wL6JgmXlyvg/ac0NeFSlBQcQHn1dp6MWe
KU0ykvg8ci+v5AMCnAZCe7csxfHD+X2+oK9MCR97gv6yZj9HKJWAR/zBQ7oy
FJgbPw1XRPMpBYwZy1JwoKM10w6d4UzP7FtGwcUy24FK9NRHB/LMCgq6j5i5
Jqbh/g21hk+gv8brUkXonTO24qyVFERZ7QlqRidI7ZM6r0iBgFrxPZF0AqqU
G2PmKVEgYimbr4we19wtexFNjEdVANpwv4nCNWUKfO6872OhT7mUJy9UoUD4
0Z2pG+hob1CORAvpXxTMRj/jlKRKqlJwyTRQugY9GKGtFov+tz5udQ96UVJh
ltwqCk7Uv9SeQ+vkaK6/g+Yxld29NIMAt5KHDxVXUxCgF+SgiQ5vWKeZijZr
v7Zu9JMIPG7L5KqpUaB6V7GIr10EPg+v2paDPjz202gZWlNYUa9AnYK4txsP
WaBbdywxK19LQaX02+A8tHLp38OdGyjwjSgf8u0QAQtXtuqhjRTYbeZruYZm
CY5PNKOvD7mWJaNrLDtC6jZRkH6eE9+E9ugqLizYTEG/3TrLNZ0i8JDHTyJ0
GwWdnfbFPWhd4x91Ww0okGTx5uz7LAI2tYPbIq0wjz+8xjR6RaBaYmQsw5OC
Wj5p4TdDInAoaSzTKoICtY+XXMfHReD5ydupNdkUuEW7w4NJETBlG2S+fEXB
0eya4o+/RECsgu/y1nEKHn3M8p7gISDT6nQSvcAX8hbwbkwRJOC4/Pvn+ut8
Ic7OXOjtAgKm1fsVPu32Bakps+w4Cczz2YUHO076wtpPu8VNlxLwRGjr7dPX
fGGHvuuc13ICLrwXkGxM94Xq2r8mm5QJcB9oiSup84XVTl5sSp2AMK3n0+Ij
vpAQbxkSswHzW21xc6swDWObTQJstAhIienYMrqahl1nbFqu6xIQmS6x1MeM
Bk7ElXeuRgTc/bWT99IJGhx3+10v2EnA97DYij8hNHwiNP6MWBKwxDm8wiyN
Bp6axMQiGwLsqYsNCrU0hNzq9hKwJyCtK5GOR+9Yb/N7GXpyT5G8VB0NGmL9
wZvR4avGvIh6GtQzXJLc0KXttpJTDTR06VQ3lqFXmqk71jfRYFGqu+WCA+ZT
7s04/YGGovDOpTOOBGheHY35ir43K5Mu6kRAwLSAocdHGuhM362qaJk3OlHO
rTR4tAXaHkDvCr6/ddcnGgq9RW7no3O+MQEKXTS0OFfJejtjq3K8qRaPnlrY
n3UFbdqQ/VbyMw1285T07qC7HnQrE900BGbNOjeixe1310320HBWVSJt7REC
HGuPUl69NDSPKmnvQGdsCZAbQd/7Yd1gjzYU53p29dGgXC/67Rrat2q5RP0A
jnf9q84wuizm1n6jQRq293gd5HEhQNRjQdRT9NDOhbQ02l73YvOmIRq6K2pu
rEdniP5anIUWtb6TY4Ke/uxtozRMg+10VL0D2jh/MDoB7V77OGhwOwmRl51a
Fo/QUGlhWs2jS0LnwRapMPRVz1ERWfQa9T22/KM0VK9Ks9BE+/0pv30eHXne
L3IPenHyQ2nPLzTITLvIcNDmI6EyluM06K0xUu9Dx5TwHq5GS5b8d2YO3Rfh
F6//lQa5Ie38JXokcDSPy2l8o4FXIkzXHM09byQv/p0GJg/25qJXiM2ueDtF
Q55i3z9n9Unw7PZy2TVNw4BXaVkkujh/ILkcHXkoTygLfcDunWL+DA3hvC1R
HejQ5Dzl6FkaDuRo5BgBCTOax1bbztHQwyj2LTAg4ZVds0YbPwvCzvx1TTYk
QWGDx30HARakt/a/LkH7CM2X6UJv7hvU/4iWKlzP2yfIgtkP2+XEjEhwXHzt
3ZgwC2T1lFrOo7+8MvCbv5AF1pLfLOyMSSCNc8tXS7HgalaQtZgJCTvXXT3A
qLDggXJkrv9OEm4Z9j0ZMGaBD3tcdcCSBP4YA9VedxYUvuKWtR7A/VhbeNLk
Mgv8Lt8OyXUgYRvvm1G/FBYoBFcribmR0L50jLW9kgXiGvH6v0+SYO2Vq9/U
w4Lj0wU8vt4kLBC82lnLwwb3mtboBjYJAx3uwVYr2SBnVMf30J+EqKn+0+nA
BtUYVoXCJRJcLE/YRxxhQ1l6e7pcKAnzB6+HmHLY4OES+eheJAm9z1+HuSey
QZryPEXEkjDYKhEnVsqGflO+tL9JJDzT/NUb1s6GllXRuf4PSCho7NGKmWPD
wf2ci1ezSRjL6DsitJwBrlDGKnY+CbOVoXXmugzYv5TXH3tCgurKzToyjgxs
bfIMmHhBwu2DEy+i0NL3Yx+TZSQIRuSaiTox0Of0aVwFPfBr9QE+ZwZuBKc7
HkanvpP3HjvCwL27LroVaNUQodQydwZKJKz+Rpejv7Yt8jjNwM4r0tHbKrG+
SmxsHzrNGBr3owUdDig4ezKQOXRB2BM9UNu01uYMA9++mPgno1PvVZrpezMw
8Pn7caIK69nm+kvQDIRcrTVs/7+fBQ4//YcBPbabUEAN5t8uQUjzPM63/tyL
OLTIZIFKFjpwWYZfPnpUfcglwZ+B2cJdXwbQebGWbf9wGFjckPzWopaErbRc
g+5FBiYC76TI1ZGQLrZluABdmqfqtAUtk2UptO4SAy8/VS61Qv/uDjSWv8zA
7/WmEUHo51ZDxXPB+H6Fw7lhtNkabnbpNQbWPG21fVxPQlF1Y71WKK635bXE
G7Sa69BQLjr/W2fjCJqMk1O5E4bfS8XAbHkDCU2CQYmcCAb77RLty2iDewnF
M+jqtKqpJPQjPW6r13UGeMtD/ytCR9FDUkduMHBwxmHtF/TBHssIg5sMPD6+
eKX1SxJq/U9kF6GZy+c6T6O1ZYLqN0QxIHz/Z0IwWm4vV3BlNAM/e7Wln6LD
RhuV49Acgbl3zei54CGjRbcYUF/94eYYuuuZHGf+bQYMfV6LrnxFwt5DWxL9
0O9jvr7UQZdNWhZPoHufq4TaoDfdONF6MoaBf4Yp8zPolDVBM91oruQHoRC0
ZE2C1OFYBpIN91cnoy+7cjXfomf/PZzbPkPAzFzjvl1xDPD5PhSYRJ+IG/Iq
R8+K6TiSPwno0FYs3xHPwP7y8IfKaOs2e8katLiTEL8+GuSaihoSGGhy1M3y
Rkslcue3JDLQvM78dwu67G5Q1GAyA9kNgcl3Z/H/lb7s8YJMBoISxIW1fhPQ
ULj3r+1TBgq3nTZy+UsAj6RTw7OPDIhl/CnZw0+CgK5iqEkrA7XqxzYcR5Pu
A7teoZvkZ1IC0dIFZ+rb2xjosr0eWoheZ8Op+93OQJZonMMKARLso+/WaHcz
8MJlkeAkmivZW8EdxvX8iWInCGH/1U27qDfCQJzW6DgX/cL9lHEVuqvt5PHX
6IaCH+XvRhm4cKTDTkCYhB4b/vIfY3heDyXqeaHFbqm82Pgd89sUIGosgv31
2TDnCdo/wvKqI1quPwcMf+B5yTfmP4tW3aL1fO8kAwka939lo/VaTEu9phl4
MKw3vIQgwXiOuDCDDnlnenQjeqdKkx5nhoFhJaZ7N9qadfBZxE/sL18t2gLQ
hxLl/JfMMvCfx6RtAtq5qks3CV1qXt7MRR8dS/mj8gvrhz3e+xrtIXWiJAcd
u/ndqxH0/wBT4dYO
        "]]},
      Annotation[#, "Charting`Private`Tag$310296#1"]& ]}, {}}, {{{}, {}, 
     TagBox[
      {RGBColor[1, 0.5, 0], AbsoluteThickness[1.6], Opacity[1.], 
       Dashing[{Small, Small}], CapForm["Butt"], LineBox[CompressedData["
1:eJwV0ns01Gkcx3GkrHqOqC3XnTgq5FZKqin7WbIumbS2GLnVZHbSZWplfr8H
qUMWs8ct6zbpok3RlGQdJoW12U1ZZ7eUPSqFSdGFrk601D77x3Oe8zrf55/n
ed42kj3BUj0dHR0RW//vcVrxG6f3CnTZGXU+cyCw2v9upoQ5VuT3dpT52pw8
52Lmd93pn+suIrDwb9uuO8ZsYxJqyvxbtXtvF/OfSZt7vJmNk2d1HPigQMyG
lsGjzBdMO07fnFRgi7JbN8iR4Gngl2Hx+hwGS4XetU4EZROlF+/O4vAu3O21
xpVAZbrh7wBrDm67T9Qp3QjuCK/sps4c9hr+XCxyJwg6fXSiVcjOi+vbRCsI
SGJXsKU/h27Lk5MWQgLDgjRVXigHp8jO3PmeBH6aZ9FXpRxKmuf5WH9FcMOn
cvhTHAd/pcfLIW+CH817doancIgbCTAY+ZogWyyruZrDYWw4YUaLP0Fn2Vnu
SSkH+Q8ym7RAglAXiZO9msOehiP1aUEEAru4swoNh+x+X7vgYIIF0rG5/X9w
4LR7F0RsIpCfd9c3vMPhdVLvKrGYYDyq/dLqfg4fBxosbMIJfg/pisx5ycHB
oU21MIrgVoNH+/MJDs678+6NbSGYJzG2k83g4dx077pBDHvP2WVTTpjzEBwe
aftMRnBwcUaFdiEPiVUB/08sQV7+gHCtO49cWe6Tvl0EA9Gq4hovHu32UZOa
PQQJy6fuux/EY7Vu4uyUOIL1wYOetlE8HlRs/JCuIJDete7kdvI4/J03DaME
TadvbhpK4FF+El3bkwhCkjzC5mbyiHll6bHjAMGSxlHbDYU8Pgw8FKxIIQj0
WtRbcYqH7FP6e680AvXS+q0zanjcVoSKLDII/F3Gtzk285idmlH0SElgL/8l
JLaDx4jYQPs0i83NW41r7/KwjB1RNeYSnDMMuGIxxGMompN05LP/l9o754zy
OHGnOKeykGBZe5OgWY/ilkhVwZUQhMXf0CEmFGXdrdqUUtan0kktFVBENKr3
hh0niB2YuvaBE8WSXltX+UmCYL+iSBMhxWZ9s774coJk0wOe3/hRrKlN7vSt
YL069sysDqHYrrfLQKwmKD53uNIshiJ55mT8siqC9GUfWzy/p/A9trNV7yJB
vV7/jdSDFIWlL6RGtex+qy2PdGZRbI1esvhJHevVvGq6UTZFozpX+4b51ahn
kj9zyk9vCz4xX6qWRLQwh6/pGDerZ/3aqgUXcigy3rS0rmOWTV95SplH8WxA
I65hPtMdch4FFKJ/76fv17Ce64as9jM/HxteqWSW5ydma5i9C6YOFzIvDzwu
dymkcC33+baa+dqvjxdbFVEIHQyttcyPz8TXvS+m8Gk/dtn3EsH1Q9MWLi2h
aCo3lG9kPr+lpEjObPZFks1W5niLRv4xc+qgPDORWT9nyqrbKoptj1QhVcxD
OwrVRkcoVlS5Tb/M3OFrZxnArD/nVtM15gLddRMtzJnNggV9zPRhz64JZl+d
v7pfMEdckT/wKKWY1peaNc6MEp31+5jbItdgWgPBfEV+8wXm3ITJt7OY/wPi
/Rv3
        "]]},
      Annotation[#, "Charting`Private`Tag$311798#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{301.1550447048668, 3.370123007005307},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImageSize->{820.5882352941157, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.848398069476345*^9, 3.8483981210037584`*^9}, {
   3.8483981615220127`*^9, 3.8483981660713406`*^9}, 3.848398370967939*^9, {
   3.848398425102307*^9, 3.8483984487735987`*^9}, {3.8483984834626427`*^9, 
   3.848398513847906*^9}, {3.848398752265278*^9, 3.848398779666973*^9}, {
   3.848398820665168*^9, 3.8483989120498934`*^9}, {3.8483989503990445`*^9, 
   3.8483989770760355`*^9}, {3.8483990441159325`*^9, 3.848399056896236*^9}, 
   3.84839912078584*^9, {3.8483991538103495`*^9, 3.8483991583559723`*^9}, 
   3.848399213848354*^9, 3.848399374100576*^9, 3.8483998899671235`*^9, {
   3.8483999218181334`*^9, 3.8483999452529106`*^9}, {3.848410092726934*^9, 
   3.8484101153995776`*^9}, {3.848644905277565*^9, 3.848644914972931*^9}, {
   3.8486450720633125`*^9, 3.8486451490945454`*^9}, 3.848645267239135*^9, {
   3.8486453940364842`*^9, 3.8486453989101424`*^9}, 3.84864543079846*^9, 
   3.8489980547257085`*^9, 3.848998146037736*^9, {3.851057477881608*^9, 
   3.851057510099696*^9}, 3.851057615975932*^9, 3.851057656182847*^9, {
   3.8510577982243633`*^9, 3.8510578180467005`*^9}, {3.8510584099379525`*^9, 
   3.8510584308619194`*^9}, {3.8510584696428633`*^9, 3.8510584812227283`*^9}, 
   3.8510585324822874`*^9, 3.8529603031970234`*^9, {3.852960485110752*^9, 
   3.852960504913981*^9}, {3.8529605440694776`*^9, 3.852960587838605*^9}, {
   3.8529606179457498`*^9, 3.8529606426807084`*^9}, 3.8529607087964535`*^9, 
   3.852960763029145*^9, 3.852960816279832*^9, {3.852960858479656*^9, 
   3.852960917869091*^9}, 3.85296095041703*^9, 3.852961947225322*^9, 
   3.8529621633845515`*^9, 3.852962202696142*^9, 3.852962247732585*^9, {
   3.852962307270835*^9, 3.8529623233152256`*^9}, {3.852962361282213*^9, 
   3.8529624307194796`*^9}},
 CellLabel->
  "Out[976]=",ExpressionUUID->"285d6385-d102-4dab-9f01-686a9540f5d8"],

Cell[BoxData["\<\"cyclic-shocks-100mM-zoom.pdf\"\>"], "Output",
 CellChangeTimes->{{3.848398069476345*^9, 3.8483981210037584`*^9}, {
   3.8483981615220127`*^9, 3.8483981660713406`*^9}, 3.848398370967939*^9, {
   3.848398425102307*^9, 3.8483984487735987`*^9}, {3.8483984834626427`*^9, 
   3.848398513847906*^9}, {3.848398752265278*^9, 3.848398779666973*^9}, {
   3.848398820665168*^9, 3.8483989120498934`*^9}, {3.8483989503990445`*^9, 
   3.8483989770760355`*^9}, {3.8483990441159325`*^9, 3.848399056896236*^9}, 
   3.84839912078584*^9, {3.8483991538103495`*^9, 3.8483991583559723`*^9}, 
   3.848399213848354*^9, 3.848399374100576*^9, 3.8483998899671235`*^9, {
   3.8483999218181334`*^9, 3.8483999452529106`*^9}, {3.848410092726934*^9, 
   3.8484101153995776`*^9}, {3.848644905277565*^9, 3.848644914972931*^9}, {
   3.8486450720633125`*^9, 3.8486451490945454`*^9}, 3.848645267239135*^9, {
   3.8486453940364842`*^9, 3.8486453989101424`*^9}, 3.84864543079846*^9, 
   3.8489980547257085`*^9, 3.848998146037736*^9, {3.851057477881608*^9, 
   3.851057510099696*^9}, 3.851057615975932*^9, 3.851057656182847*^9, {
   3.8510577982243633`*^9, 3.8510578180467005`*^9}, {3.8510584099379525`*^9, 
   3.8510584308619194`*^9}, {3.8510584696428633`*^9, 3.8510584812227283`*^9}, 
   3.8510585324822874`*^9, 3.8529603031970234`*^9, {3.852960485110752*^9, 
   3.852960504913981*^9}, {3.8529605440694776`*^9, 3.852960587838605*^9}, {
   3.8529606179457498`*^9, 3.8529606426807084`*^9}, 3.8529607087964535`*^9, 
   3.852960763029145*^9, 3.852960816279832*^9, {3.852960858479656*^9, 
   3.852960917869091*^9}, 3.85296095041703*^9, 3.852961947225322*^9, 
   3.8529621633845515`*^9, 3.852962202696142*^9, 3.852962247732585*^9, {
   3.852962307270835*^9, 3.8529623233152256`*^9}, {3.852962361282213*^9, 
   3.8529624308895893`*^9}},
 CellLabel->
  "Out[978]=",ExpressionUUID->"9d4497d3-e60f-4b78-a361-f2302e1af585"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8529613359245195`*^9, 
  3.852961349361579*^9}},ExpressionUUID->"3324bfc9-e27f-4d2c-ac9b-\
52e0e85a860f"],

Cell[BoxData["\<\"cyclic-shocks-100mM-zoom.pdf\"\>"], "Output",
 CellChangeTimes->{{3.848398069476345*^9, 3.8483981210037584`*^9}, {
   3.8483981615220127`*^9, 3.8483981660713406`*^9}, 3.848398370967939*^9, {
   3.848398425102307*^9, 3.8483984487735987`*^9}, {3.8483984834626427`*^9, 
   3.848398513847906*^9}, {3.848398752265278*^9, 3.848398779666973*^9}, {
   3.848398820665168*^9, 3.8483989120498934`*^9}, {3.8483989503990445`*^9, 
   3.8483989770760355`*^9}, {3.8483990441159325`*^9, 3.848399056896236*^9}, 
   3.84839912078584*^9, {3.8483991538103495`*^9, 3.8483991583559723`*^9}, 
   3.848399213848354*^9, 3.848399374100576*^9, 3.8483998899671235`*^9, {
   3.8483999218181334`*^9, 3.8483999452529106`*^9}, {3.848410092726934*^9, 
   3.8484101153995776`*^9}, {3.848644905277565*^9, 3.848644914972931*^9}, {
   3.8486450720633125`*^9, 3.8486451490945454`*^9}, 3.848645267239135*^9, {
   3.8486453940364842`*^9, 3.8486453989101424`*^9}, 3.84864543079846*^9, 
   3.8489980547257085`*^9, 3.848998146037736*^9, {3.851057477881608*^9, 
   3.851057510099696*^9}, 3.851057615975932*^9, 3.851057656182847*^9, {
   3.8510577982243633`*^9, 3.8510578180467005`*^9}, {3.8510584099379525`*^9, 
   3.8510584308619194`*^9}, {3.8510584696428633`*^9, 3.8510584812227283`*^9}, 
   3.8510585324822874`*^9, 3.8529603031970234`*^9, {3.852960485110752*^9, 
   3.852960504913981*^9}, {3.8529605440694776`*^9, 3.852960587838605*^9}, {
   3.8529606179457498`*^9, 3.8529606426807084`*^9}, 3.8529607087964535`*^9, 
   3.852960763029145*^9, 3.852960816279832*^9, {3.852960858479656*^9, 
   3.852960917869091*^9}, 3.852960950591533*^9},
 CellLabel->
  "Out[467]=",ExpressionUUID->"e8028239-ef63-46a5-807f-e7350a2e0b7e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"zero", " ", "=", " ", "0.00000000001"}], ";", " ", 
  RowBox[{"index", " ", "=", " ", "1"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"strain", "[", "indx_", "]"}], " ", ":=", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "2"}], " ", 
     FractionBox[
      RowBox[{
       RowBox[{"cyclicFunction", "[", 
        RowBox[{"u", " ", "-", " ", "zero"}], "]"}], " ", "-", " ", 
       RowBox[{"cyclicFunction", "[", 
        RowBox[{"u", " ", "+", " ", "zero"}], "]"}]}], 
      RowBox[{
       RowBox[{"cyclicFunction", "[", 
        RowBox[{"u", " ", "-", " ", "zero"}], "]"}], " ", "+", " ", 
       RowBox[{"cyclicFunction", "[", 
        RowBox[{"u", " ", "+", " ", "zero"}], "]"}]}]]}], " ", "/.", 
    RowBox[{"u", "\[Rule]", 
     RowBox[{"shocks", "[", 
      RowBox[{"[", "indx", "]"}], "]"}]}]}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"strains", " ", "=", " ", 
    RowBox[{"Abs", "[", 
     RowBox[{"strain", " ", "/@", " ", 
      RowBox[{"Range", "[", "12", "]"}]}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"downStrains", " ", "=", " ", 
   RowBox[{"strains", "[", 
    RowBox[{"[", 
     RowBox[{";;", " ", ";;", " ", "2"}], "]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"upStrains", " ", "=", " ", 
    RowBox[{"strains", "[", 
     RowBox[{"[", 
      RowBox[{"2", ";;", " ", ";;", " ", "2"}], "]"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"youngs", " ", "=", " ", 
   FractionBox["downStrains", "upStrains"]}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.850462687279375*^9, 3.850462699119751*^9}, {
  3.8504627335274715`*^9, 3.85046277310448*^9}, {3.850462817265386*^9, 
  3.850462826305043*^9}, {3.850465207605551*^9, 3.8504652111475687`*^9}},
 CellLabel->
  "In[590]:=",ExpressionUUID->"72889dcc-c600-4156-b8f1-b1b8ec251494"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.8876775775351782`", ",", "0.9451397988037008`", ",", 
   "1.057214676548915`", ",", "0.9590813465048142`", ",", 
   "0.9603862669504438`", ",", "0.9765722431756475`"}], "}"}]], "Output",
 CellChangeTimes->{3.851056210389138*^9},
 CellLabel->
  "Out[595]=",ExpressionUUID->"01ae557a-a371-4191-a665-a92e5e38408b"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.850465266235384*^9, 3.850465266962529*^9}, {
  3.8504653035324063`*^9, 3.8504653073803663`*^9}, {3.850465348019967*^9, 
  3.850465353972741*^9}, {3.850465436932478*^9, 
  3.8504654564493456`*^9}},ExpressionUUID->"0f7ca4f2-e1df-4479-aaeb-\
d05ac18c9c1f"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"dir", " ", "=", " ", "\"\<Data 1-5-2021\>\""}], ";"}], " ", 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{
      RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", "dir"}], "]"}],
     ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"cyclicShockData", " ", "=", " ", 
     RowBox[{"Import", "[", "\"\<cyclic-100mM-120sec.csv\>\"", "]"}]}], ";"}],
    "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotOfCyclic", " ", "=", " ", 
     RowBox[{"ListLinePlot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"MovingAverage", "[", 
         RowBox[{"cyclicShockData", ",", "3"}], "]"}], "[", 
        RowBox[{"[", 
         RowBox[{";;", "5000"}], "]"}], "]"}], ",", 
       RowBox[{"(*", " ", 
        RowBox[{
         RowBox[{"PlotRange", "\[Rule]", "All"}], ","}], "*)"}], " ", 
       RowBox[{"PlotStyle", "\[Rule]", "Blue"}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"R0", " ", "=", " ", "0.00048"}], ";"}], " ", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"unpert", "[", "t_", "]"}], ":=", " ", 
    RowBox[{"3", " ", 
     RowBox[{"Exp", "[", 
      RowBox[{"R0", " ", "t"}], "]"}]}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"endT", " ", "=", " ", 
    RowBox[{"Max", "[", 
     RowBox[{"cyclicShockData", "[", 
      RowBox[{"[", 
       RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"plotOfUnperturbed", " ", "=", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"unpert", "[", "t", "]"}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"t", ",", "0", ",", 
         RowBox[{"0.15", "endT"}]}], "}"}], ",", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"PlotRange", "\[Rule]", "All"}], ","}], "*)"}], " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Darker", "[", "Red", "]"}], ",", " ", "Dashed", ",", " ", 
          RowBox[{"Thickness", "[", "0.005", "]"}]}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}]}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"cplot120", " ", "=", " ", 
    RowBox[{"Show", "[", 
     RowBox[{"plotOfUnperturbed", ",", " ", "plotOfCyclic"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.850465224665135*^9, 3.850465224667156*^9}, {
   3.85046526871472*^9, 3.8504653059612117`*^9}, {3.8504653702422867`*^9, 
   3.85046537045135*^9}, {3.8504654186426964`*^9, 3.85046554710083*^9}, {
   3.8504662059391937`*^9, 3.8504662120423107`*^9}, {3.8504664404834166`*^9, 
   3.850466458826782*^9}, {3.85046770379362*^9, 3.8504677228080673`*^9}, {
   3.850468030553526*^9, 3.8504681081852646`*^9}, 3.8504681424655237`*^9, {
   3.850468709248183*^9, 3.8504687582242785`*^9}, {3.850470375070054*^9, 
   3.8504703781320815`*^9}, {3.850470937429034*^9, 3.850470963652962*^9}, {
   3.850539292223762*^9, 3.8505392944297204`*^9}, {3.851056279642271*^9, 
   3.8510563067848196`*^9}, {3.8510563729468374`*^9, 3.8510565150674047`*^9}, 
   3.8510570252335176`*^9, {3.8510575480483537`*^9, 3.851057553583146*^9}, {
   3.8510578345547047`*^9, 3.8510578485097446`*^9}},
 CellLabel->
  "In[1145]:=",ExpressionUUID->"a7ad77e8-5e7c-407a-a28f-709b6a1a186a"],

Cell[BoxData["1193.31154393305`"], "Output",
 CellChangeTimes->{{3.8504654220840316`*^9, 3.850465486131172*^9}, {
   3.850465521585468*^9, 3.850465547549424*^9}, 3.8504662131498795`*^9, {
   3.850466441653139*^9, 3.850466459239359*^9}, {3.8504677046736794`*^9, 
   3.8504677237681484`*^9}, {3.850468043006319*^9, 3.8504681084912634`*^9}, 
   3.8504681427584496`*^9, {3.850468713060189*^9, 3.850468758589138*^9}, 
   3.85047037924429*^9, {3.8504709551368413`*^9, 3.850470963957961*^9}, 
   3.8505392959510794`*^9, {3.851056347190409*^9, 3.8510565154744625`*^9}, 
   3.8510570256348968`*^9, {3.851057545310006*^9, 3.8510575539357643`*^9}, {
   3.851057837924884*^9, 3.851057848840299*^9}},
 CellLabel->
  "Out[1151]=",ExpressionUUID->"0cdfc57f-a671-4dd7-a431-6c94269c951a"],

Cell[BoxData[
 GraphicsBox[{{{{}, {}, 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.005], 
       Opacity[1.], Dashing[{Small, Small}], CapForm["Butt"], 
       LineBox[CompressedData["
1:eJwVzn00lHkYxnGkPb/nWdV6KxpUFoso1EjIXCZWwxHDkF6MmTHzpNZ7q1a7
qZSSSnRm1kl6sUm1aVTbasvEUdLWzlKtalIJoRQjFaWD3Wf/uM91Pn997zmy
tCiFkYGBQTh7/y9fSH2uq2gO8Kq7xIrgPp3/j4lNFe9YveMGF9b10+mCFo6G
1yZq74liXWMT1nOeo+VV+TtpT7K+cOzNwXLOU57vNNOyMEOC+Z21fYc4/Twf
t2hBiRGB3tDB8mfOGE9wat/jeZMJws10rkqOCTwvDN4V0wQLRdr8BaG2KK10
MvjFkqD6pudT0+uOkE2s7XKdTRAo71MJa92Q91wXu8OV4NG0Es1bRy/w4zIF
DVwCpXNIfOk5LirORnQvBftvyzWz/m2L8cxqY19VGEHSD66HpPwlaFJzunpi
CUxSo9aWSQGNVJAukxJwXmaaPA3hY7DXuLgpmUC9ZOYe7ZQgNNtW1qZsIjBQ
+eub7wRDsmH39RfbCfYsuB5/8lwI3Npic/j7CVTVzRVu6QIkZfp6vygh0GUG
jOyOC4PvjHvFKScI2rxdPIYXhWPEx9jtlppAoisNNP+4HN2f1lVJrxAUdlxW
G6VGon14xlhvI9u/oXAWRQox8lxTUdVCsD40+NSB4CjIzc5NFT8hyBPKZoq8
o7FFnCdq7yWQ3eKPvp0ugqzxr8dHhtheh+jZJjoGzBHjyNBxAot1ru6PBmJw
30S5kUsoqDOWZNRrY5G9rWuV3ozCC9vcq8V1K7A+tXGlyo5Cm09Bmv/xOOgW
ZX/IdqGQ/PGGyz3lShSe+fFoOJeC2NtPp9+5CjIni+8GQcGsO+tdt3w1bBqv
1vwdRkHK7TK9uWINgszrgspWUMgcNj2yxTceHrnmDZUytsfdalNvJYbp+L6A
nBQKg9Z25a+pBJwXiuaGZFO4lrytWP86Aa36G/rQnRSUngVLU9MkuHTgo1Vg
EQWXbu73wk4JUty9d2ccpqCPNZg1GilFj+nogdRKCtsPJ2ot70jRGJHnkXCR
QlbJ6Wo7PxnEDk2j+dcoLFLsUpX9LoPqQVnMqdsUnN/nDre7J4Lci/nt4AMK
m32ke6ccTcQrr8+WNR0USiN0X1+YIcevPZ3BLf0UOHae77BHjs91a3tnfaKg
rTrtq/okx4m9fhL/STRCp1zJE2co0LSp/knENBoujme/sOhSQDi+/MyhmTRq
1seFfdmtQNyuYY6WddD5yUVGvQq82z9eOMFa7CexHupToJXjtTGRQ0MptHRr
HlLg9bfuAncbGhNbtgrzDRkEbk02bLCl0fowumxsNoOpx81rX82mIbUx7Hxv
z0CT9GYxZw4NvVTt+MaBQeEthyvhrKkBUv3YmUFRqOaPi6wDJtU11HgwUG/O
0fxkT+PMfOeX6WCQ4Bz58CsHGt5ZD+Ym8RlcPhu4einrxqu56QlBDCbuKjuy
WLcHPxsNX8YgxFjS38baYs1Bk7mRDNLtC8hJRxrl5TyhfRSD9tv5RY9Yz3vZ
r7IWMbCz7rOinWgIMkNmkTgGJhebXdNYP7z8IfHflQwWjkdfKmctHy8/PbKa
gf1734BW1kP8iIGBeAYq5Y4/v/iGRk7+mGdPAoNlXe7Ri1n/B/rsBcM=
        "]]},
      Annotation[#, "Charting`Private`Tag$219364#1"]& ]}, {}}, {{}, {{{}, {}, 
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[1.6], 
       CapForm["Butt"], LineBox[CompressedData["
1:eJwU13c8VQ0YwHEqumTvnb0yr72fa1xc14gWJSO0aNiUGVqUjIxSGkaijFRk
ZyVKoiJJhVdCooHC+5y/+nz7eZ57zj2ce66U91Fn33UMDAxneBkYiH+dVG/V
Vv1kgU5jl+KptY1g42vzVWI3KxzKPDoygIa8GcFzzaxgflr/azNafyCN+kth
EyQs3u28h1Zk1w/xvLAJDo13nLyKlrT6cOv5z01A8zzHdB4tFBXfp7ubDbIv
/fCORHNVKzDebGaDvkd/Mw6hGWa61dkV2eGSQtGV3eg52cC94RfYIdpuPtQe
PblHMOXLT3Zwu/1eHtCjGXVPHHZzwEqn110t9Ltur6maZg4w8Tu1QRH9bMNG
YTlFThAxMyOLo2uNS61TL3BCnkqGNi+6Mnhr6N+fnDAlHreJFb19xwnnKlUu
kBdiesSI3jrf83XSkwvydDfrLa9uBNsLknESGVyQXfLi/ALaSjlIaFsHF1x4
wlM9g6a0t90/u8wFM+1TlZNoE28h60ZVbjCBHYljaJ3VQyM/PblBoGKbyie0
Wm59iHIGN6jWjBeNoJV0udg9O/DnOVgWh9Hyfd63M5e5Qfxkgxhh6SPVRs9V
eeDGGJMAYRFW0msGLx5oMfv4hTBPodsh3QweiLtCSyL2cZiXMfp38MCiqM3K
KJp1ZC37xjIP0P++tSGOhznSWeOtKi9Unl0+QBzvKn9BB5sXLwSqlrsT57Nc
8WeveQYvzHgvyRPn+9ue9jusgxeS6t60LqHnv15NKVvmhabPNnrE+zWV+F32
iyofKGY4RbOgP0uZ1wl58YF7wWwOD3qkPsPFIYMPhBhlz4mhh1z/mzrVwQeS
xT8cFNBvfhnE1yzzAbVi1yQZ/eJSsvB3VX6ItHXbYYbuVP1YLuvFD5VVf7Lp
6NZnmjZuGfzAYksud0M3+SZ8vNjBD9fCN109SFxvxrehbcv8cLMjYU8E+kGe
EsdfVQHweXX9x1l0ucHJAg0vATC13rv7Crp04IWxX4YAFM8155Shi49L9V/p
EADlu92lTeh89uDDr5YFYM+h2Ix+dPad9nUb1QRhTu+j01d0hpVwrrGXIJRp
ffu0ik79dFgzMEMQDqUXWvMzkCA5qqGzqEMQpG7xxqugE4S5PT8sC8JQq/Yl
S3RU9b4/PGpCUHmMLcQdHbH14QUbLyGY0c5TDUOHzJDkozOEoK36a+0l9PGz
u+urOoTgYdlPsTL0Qbl7274uCwF5psnlGdqrmWFaQk0YPrtt9ZhAu7u7nNrm
JQwhC8VmGxhJ4LpUIHIuQxiqn3X9lEZvz1ysaOwQhkvMtdHmaHtNO9tfy8LA
8TXigzfatidvVFlNBGza2bkT0FYH58I8vUTgJEuEcCHanMmC83KGCJC0G393
og1vZBY+7xAB/w9fiqfRZJNJE8a/IqBfNaXOvY4EqoOGA7pqosAX8fa8Llo5
JMXf30sURkn36vag5bhH19/MEIXLzoEtp9ASZeQrbztEwXmPYt5dtIBtIpn9
rygYmvfT+9E842+fmauJQbVu5KsVNEecsle4lxiYxktsUVxPAlbxqMWyDDEI
PdXm6oJeV/Py4pcOMZC6H+Qeg17dJq0g/FcM5FNVdUvRy3PBDQ5q4lDY8efL
IPp3csf2BC9x6GV760faQIJZRZGZmgxxYFLtbdBDT7b6J3zvEIe2TZPf9qPH
PBtF5f6KQ+dNmdls9Og/7io3NQmYZTzT1oUeyvahpXpJgLmjSOAKul/70ae2
DAm8f3xc0GAiQXcvS8TfDglwevKB5ovu9N/DpflXApYzhMNy0a2k+0V+apuh
rC87vBfddJvR7KrXZnBg8XLcyEyCx7DtzauMzcA0FvbXFF0+XBiwsXMziMl+
ORmGLg1f2mDydzPw3Sh+XY7exirvYCAoCbk2L9am0M67Xgr3a0jCNQk3RvmN
JHAoDB8/QpMEionzOy807adUBYuPJJTImvheQ9uYPz95O0oSphzC971HU1OD
bcyyJOHe2sMzQiQSWI6I8w2VS4LJslLJdjSodHwM7pIE6QnFljS0aeSxu5xj
kmAQXtX7Em3SKRxWsiIJdN9nA2ws+Psk8NTcSlAKbL0PvbJF6/r4c4xqSIG4
7OWnSWhyJf9QJE0K2jzopU/RmgyNBfw+UmDelXyegZUEag4HjpdHSUGu0E4v
E7TqVW4Tuywp+LlWohqJVpqqJU2US0GIzpm5h2g5fZ/+2C4pcDgye2cBLZ3E
ni86JgVNHh9cNTaRQKr/4eGHK1KwrnEbQwBaQtpTb6ugNIRStuXdQYscY1k/
rSENEVffa0ygBRoqXyTRpOFY4lStNBsJ+Nn25Er5SENPRayRB5rHjcmvLkoa
uN7mVV5Bcxff09yZhb2EIvkOzf5758qPcmnI/Xw4gY+dBGyWjM+Su6SBXVvs
oxOaJa0kQ2FMGoa3OWukoDeOuni2rEhD+TJ7+DP0BrWVLe6CMrD9vcNDJg4S
MJws/PNHQwYyS/m+UdCrzxyfptFkYKush0A0+p/g0gVVHxk4uKiqX4te9r3p
1hklAy9GYp1+o39X2cnvy5KBYyk7PcicJPjJ+OvHSrkMeNdW+BxBzzteq8/u
koEy0YueJei5POuzWmMyELL/u/MEevbb3LYXKzLwxqXPSJqLBFMGuZIHBWWB
KUtPdC967LTF9HpNWaD8J/EjBz00MP3oGk0W3i2frh9Av5K5fMrARxYkzwTG
cnNjP27m2B8lC/5WIwb26LHGSZGjWbKg/LXr6xn0DHvaBEuFLPQp6ae2or/s
Nqq83SUL0/Vyqgw8JBi8MxZlNiYLS7vTm4zQvX9SbIdWZCG3NpYWhm630uMP
EZSDg6kzXZXo+vTRUU5NORDJGKTMoqs+nS0tocmB50nL+0q82NW1wq185GAD
gxqvL7o9athiNEoOegcyA/LRvc8TOU9kycHVByca3hNdWP09f4Uc7HL5yCTI
h/P73xWWd8nBjwNNFs7oyuq4QLsxOThQKhGegr6zfovpxIocNPUv3exE52/t
Z4kTlAeunK2t6/mxX48aENWUh+PlcsOm6MoZ+RsPafLA2hcyFYGuNer13+oj
DzzVlO8PiH42Qn86Sh7auM5OfSfm30pvOJ0lD8FX7YaVBXC/XPdLqQp5COE8
2+qLzgwKuVLXJQ+aUpRb+ejkZon9O8fw9c8Ghb8nOmcneX5FHqJWN1sKCJLg
mvvx1WRBBWAwoDJvRRffFelS0FQAnbnxhvNEX3qa2UJTgHvvVwPa0ZnWAV7u
PgrAXZXKyyhEgnOZAqqLUQrArHblvhE6/kvjYlqWAuzaIGEeio7QPNiqWqEA
7TNCz8uJHsOT2tmlAMo3z9O+EfM9T3bvG1OArYMhTXLCJMgQ9VVYXcHXt3ur
4ok+d5BjIVtQEWrv37+Yi4579KhBS1MRphtWJ/vR4Uxe517QFOGVRqs+pwgJ
jriw7jjoowiJ9WvRtmjfG1VSG6IVQVq84skptNv3PTPXshRhcOO72Xq0jwlz
jUGFInzQCRZaJObP30/o71KEaI9EfbIo7h/c5XR0TBFWjDc5+qMDFNaJsa4q
wuMkpj2FaJ+Qu//dFlQC9l9BHqNot6fbqsw0leAk7HAVESPBVu7V6CGaEoRK
ldpuQ9t4FNFCfJQg2SlE4wLRy5wEuKKVgJpUwd6Jdvu79KkkSwlsTnh+YhQn
gbftrTKrCiUgT8bdNUK7ZtEjRruUoDmR3z8E7TT+y/LEmBLUsInK3EdTta5z
CawqwYhOWu8k2iTOZrhcUBnYaiODpSXwfvzyR5GdpjKIOPdz7EGbiF8JmqAp
w+rDa9cz0dTDlmZxPsqQafhc4SXaqWaGVSxaGXhuXb1D2ox9Y9abh1nKQMqt
VjBHm2yHm1srlGGdRcetE2jyra8B013KoOSpKVGNVvqRZnB6TBnkvixcnkVL
mhkzSa8qQ3I9B4eiJPaU8d46wS2w4VPcKS80+f2Fqzs1t4Cymf2fXLShkv6B
edoWKH527GA/0cM+aaX4bAH2wOlBdimcbzu3phC9BUjKTTbWaEle7ectWVtA
/8u36lg0v9eHy+4VW8D04lGpWjTb/STvxa4t8Hiz3fkF9LoVdbX0sS1gnxS9
oCKN3W5wSXV1C+Q/YHHzQ/PnxLd1CqqA29Xphutoif+2XNqnqQJC6grSg0TX
GdizSlOBqL01p3hk8HnmVLRijo8KkMVufbFDr3ul8FMrWgXeuY5REtFLEq8a
X2SpAD9L1LUG9Jx/5PmDFSqQJBqw9Ae9WCuzc8NzFRiOf+CsKUsCRpYe6etj
KlCj4VJyCM26M3TWYFUF2gVsGW4TvWBzbb+gKhTIX972Ab0435l4VFMVlrYa
FgnI4f0cArey2qlC4DmdRUf0+AVR8QIfVahuPm19Fj003DppFq0KR75qZLag
x5SPPBjKUgXjBY1Pf4n5cMHYkApV6Ok9vUVHHve3N9lxPVeFtiCd4CPoGb5D
gnfHsPcYPClCj3nzfrFaVYULvRkMn9BD5XX3RgXVoDKAaimigJ8Pq76RJzTV
YP6yQ5ILupPOSRWwU4OvJmXtyUTPfcxd4aMG1G3eTO3ooUmvD3bRalD2PMB8
Df1Zd9OdiSw16M18GaWviJ8PCQ+C4yrUYPvt04+Oo3v73EHsuRrMTWZ+L0G3
S25kezSmBrbbl+XG0PVHyt9uXVUD7vcP3MSV8P5a53prWlAdpg+3pexAl7Cu
P3paUx1Sl7Y0XkQ/2FVqKG2nDjdDJmc70fWF25nrfdTh3atlsXXKuP/n6qud
0erwYc3b1ghdb16cN5+lDm4/JIOD0ZWpWw+mVKgDQ7Z2Xhn6zsiytuJzdYgd
z2udQOer3GZ4OqYOGc/3TG3eQoLsSPtu91V1+Gx0nMMV7eTz1+7fJg0QUnyv
kYbetqm34pmQBozH5W59jnatvC2YJacBy4b3j21Qwe4aEeVD1gCSlfAFE7QT
g8MXTTMN6Lz07k4o2q5I2nbNTgM+88w8vY+2cvhzr3sX7q/dMTyJpvx6zpfr
qwHsEfwLUqr49341P3J/oAY+PymRdqNpFiGj2jEawMyUJpqBdpqypa5L1oDw
akfVHqJfkih9ma0BkZbeJsxquF9/gTuvQAPqbz2zM0NTPnaEHarUgPnWxF3h
aOOkqx/0GjVgIOfyvgq0vupxC6ZuDRDh++c/RfR+qzt97zQgRO5hsIw6Pp+e
EOHMH9eAgsbWyD1oK+nvwQHzGmDfrxCTSfRnT4cM1zSAvP1j3Au08bFsILFp
AqP2t/iNGiTQEwwoHBDShAhvu3hAkxsobLfkNIHWtxYTgVb1FQg8RtYEnRDS
yUq0Etu3tyZmmjBl7Bv6jehVjSab6JogLSpwVFYT590ybr3bpQmXGUX93NF6
jAdZCn01geFz0O7LaM1ik6NBgZogcE/S8SVa1ZFnAGI0IW2nFIVEJoHi7wlD
jmRN0O4N0aSgZfOe5L/P1oRKFgnJSPRmy1TmOwWa0PJLmL0KLfPNxz+0UhOk
kg4ufiPm0wz6LBo1IbWU7bOsFu434NDn7taENrf1Xe5oxdHPeSPvNCEq3r78
Mlr29KP1peOaEMD/LeMlWkIt+WDEvCbsZRoOI2mTQHjA8yV1TRNYLCVdKWj+
kzo6fGxkUH36SD+S6DKsVz4JkeFk8E2BKrRE1wjDfTky1NuOzn9Dyxyv8jtJ
JgO3WsMzWR3sQme6bc3IQHsveMkdLdy4hyxIJ8Pxalbjy2h+P83ssV1keNft
1/wCzcXOvFrhSwYllgCJjbp4P34wtC8mkAz/7MVczNBcu+8/o8eQoSUmyCMM
zbcuQV0kmQx3Th23uI8WvrMr879sMpSb8a9NEN1J9e+DAjJk57qnSejh/B9G
r/hKMiyesF3Zjt507U27YyMZ5LrfmqWgmazuqoh3k8EyeKNbK5pxOiZt6h0Z
KHvf2v1F/0vbtvhonAwDwVR+sj52Q6W9ifNkCL/l8vAAmvnTylPnNTJEvFlR
u45mPdOnJMmmBXPLFjEDaCb1ooszQlrweFW2aJMBzr858atWTguieq8XUtD/
TjrtPkPWgnKPqqgw9KKMXPN2My1Iu7pXpQy90LUkL0PXApXw/MrP6D/HXyTP
7dIC2lgYl5Ahzgvdmq/31YJzr79Y2aMZm8J2nQ/UAieDL87xRPejN+yK0YI2
lhC9R+g/7FKy8slaMGOQvfANPf/g19mFbJxvtDstaYT3991d35sKtEDn0oX5
beiv665vv1CpBZaFHjpniX4n6MnuRi3o+13vWI+ed7KRUurWglcniik/0H/+
iJ3+/U4L1qlLbJIzJsGPaz+mn45rwRirROku9IxVu/OleS1oZy2STUZPTuc+
3rumBfXKj4Mb0WPpRyVU2LSher/T1Xn0R0PLhCUhbXBvPHJFzgS/L3wSmmqX
0wZlDZ7AXejJMzOOGWRt8KoxkDyPnlFvqfYy0wbu3WMF9UR/c1lUna4NQgLc
6+fQY1GH4/7tQk836Emb4n5Z+O+ZrzZEfpy22IYefM5nnxWoDfELOQpJ6IHA
r5U+Mdqgo9L2+RHRhRuEyMna4H0hIOQreqQpLXotWxuubU77KGKGx7d//1h3
gTZsn9CUoqNHOIxpuZXaUP/VzjAKPVjNVb6/URv6NT8q30MP7Bnn1+nWhj0d
U/Mj6N71tSfWDWrDXFVAGieQoLvkwqeX49owybifBdDtW/dZ581rQ2DdwM5j
6K5FvbJDa9oQ/f1xVD669zobrz6bDgwUcZ7oRfdTP4UzCevA6vw7RwYK9pnq
kT45HXD6yPtPHf0845xlPlkHZk40xnig2408SgLMdKDz3dDQBXTzZy0uI7oO
ZDD7sjeg68+SQkmuOjAi4C44Q3SND+8HfHVgTrRlUdQc599WUG4F4j7F9Aoa
uis6qehYjA7Ubn1JiUC3ye1mN03WAZa7IXeK0M3d6kGbcnTAm5Y4OYCuC9ow
+K5AB5ioK6vrLUjwWGTQtLBSB78fDU9roiuby24HNeqA+33pSg+iH4hnpXTr
wDX7Fw4p6DrOncc4BnVg+52Rllp088Mtb96P60DrsDPHJNHdGYzvzOvA4jpl
TX5LnN8wcCN0TQf69PZtMUdX3r2z0ZJNF5ayVv4dQZc5RwdwC+vCJCwWXEHf
WXJ+PSKnCyNOzvKdRM9XMCgl68LMBGv0T2Le+t+1CDNdmJaWKpO0wv2zvRus
6boQJZdRRUdXZBYc4nPVBWGufZfC0WXGkb2ffHVhZUMK9Ta6+IuD7v1AXVBR
4H79En37nMzVkzG6kJg7q/sXna+5yEhL1oXiU7KB8lQS5L7r3i+Yg/MbKxO2
oq/F3OgZK9CFVvvLR06ib8uHalVW6gLbyV71InRxDy0nplEXCmo9Ol8RPXjz
Gr1bF1TJFvr/0PmiP31EBnWBjy0yRt6aBDktnV3/jetCRuD6a07ozIN5GtXz
unAvdSQ9Ep3KFXg5fk0XNNJYvW4T/RH1nyObHrTcSmJ6gc7dK+otLqwHnfNb
4/6g85jmOqbk9CCx7HC/pA3uL21VfUzWg+Nj84w0dKZLTnqimR6YMhtzB6FT
lwOWnOl6MMJZwXoVnXzD3EPSVQ8GrK8utKKTbATbZnz1QLWFp2cGfe77N+Un
gXrwU50vS8AW5y83pZ6J0YPt5vlbzdCZJpm/tyfrQV7Jw3/7iT52cI9Mjh5o
iuzMTkWfO2/aMlegB9nmcbI16EQyr2JDpR4cG9C+8QkdN/hfyvlGPYhMOM7B
SiNBVGzdwq5uPUhl1PMno+MULrnKD+pB9WpCrRs66YVv48K4Hiyr7l6KR58L
MZRrnteDa5QaxbvoRDHO8xfW9GDm2zWb18T80y9zu9n0wevjJte/6JOHHu9Q
EtaHhBdrrjJ2+P2UO6Xut5w+rByOtLNDBz72km4l68OlQydUg9ABHrpnLpnp
AzlqHcMVojNvmt1L14dPOzifthDzZR9dVFz1oafkRugU+uS2BzVLvvogp1Ij
wkPH/vfM5o5Afdh6Yft9A3TgTffEjBh9aEsI1fZCB9iSv3kl64PEU9GSM+iD
c8xb1XP0gX3Fkqsc7ZP1/uG/An04OPHD7y3RTcvFuipxv5b0vVVifjwhPqtR
H9yyBsbl7ElwPNl10qdbH2Q7NnHYowO01BzIg/rwJrRVPhh9YGjdg7Vxfeh3
W1O/gvaJeyvcM68PJQp1Si1oT8XSmNw1fVi+tMz7Fe32MnZ8P5sBJDrUznI6
kGBv6HY7HWEDkOP5W6OL9hFXrlgnbwBDl+pC3NEHWlcFeskG8CB+VSqB6Idf
n8wzM4BfOU0NJWhPnuLPh+gGMJu8jv4K7Vpz0kbf1QBEuFuf/UFv99x6j8nP
AJiGN+hLOOLz8UZ5vteBBrD9VutlSzT93nJEfowBjIqtnzhE9O0vPwYkG0Dy
aqPcJfT2f7esjHIMwHt1efsjtOut8LukQgOI7KsK/UB0mj33m0oDkNecOr3e
Ced/SIXdajSAht68s0poevbv4WPdBtC5/8UJRzTV7Lm56aABvCs9sTcETZm4
XrxpwgBKdhRoXiF6SjDH4LwB8IvZ/WpC07RtgwvXDID1gf+dCWL/e/GhIDZD
yBtgcWDbij1+3owibAhLetJfNNFWSh0FHPKGEJxWfWAnmtJ7ZdMw2RDCrz4d
OYk2CTt2/I6ZIaSy061uovUlrN6G0g3BNc/hagfR24RNLF0N4eb651+miXn/
2ZvcfoZAX2wS5XHG/bxPSR8DDWGrloalHppSm3WkNMYQ3vgLue9BG3v590ck
GwKHe4RfHFqfRDG0zjGEHXXOnoVo8n3+fL5CQ5C1uE17jlbdMcX0udIQeEoC
5OaIvtJw+H6jIfTcuTfH54Lzt9Nfnew2BMm/fqUGaGO7A3q0QUNYt/Pyrr1E
nzfOE5wwhNhQ41/xaHIO9/rxeUNo4nGNL0KrwsSByjVDYBr/tvYcrfRf7YsY
NiOoLfwZMIeWvXBR217YCPZyB3XzbcOu45MrIm8El0b8RA3QqsP6DJNkI+Dp
fOnmjtY8xe5XbWYE9afLzsURXfnz83i6EaS9XSspQCu+eqjp5GoEN463P3mG
lg0/nyXuZwSSXIz1M2jJzZ4rU4FGcCDg/j3u7SQQadfe9zjGCKYsXqXqoPkD
WJ4lJhuBsoPfPlei842oueQYwSD1iHwUWuJJZYZkoRG0TE4O5qNlvU8vz1Qa
wdDsQFQrWpJlj+eTRiMQ59PhmUQLl2u0n+k2ghJe5qxNO3D/TiaVHYNG0Fls
w6aO5lodvCQzYQSvLvw77oxmK7j3Z27eCGzjpDpDiE4/5d6wZgTPjB5x5BDz
CzufnmczBo7Ieqs6tHCuipKrsDFM/9EK+Eh0CuNFeXlj2HVcJHHdTpyfHPi5
QDaGxLNNV+XQbBdL3JrNjGHvyuW3Nmhm3ZimC3Rj8GEadfdHM35wkd/jagwM
ty/YpBI9QTFZyc8YPgSHXH2AZt2y8uN3oDHcoV92HST2973a2RpjDIFMCzGr
RI8orL+UbAzJ0Smcsrvw+V7yhIxHjjEUXt1PoqEZOxzPqhQaQ5vtqUPH0CsB
st+XKo3BOOSzThZ6kW9pW0ejMbTznj7UQPQnPbUZ3cbgvTmINEHM77sp6T1o
DMFZxZwcrrifNSxJfcIY8mKVYnXRjBV20//mjWFu7I+rB/rfTknnrjVjaHrN
n3cGvbj681EWmwk0eSXaVqLnC56J+wqbwEqxjccweoZ+7RRZ3gQ+dHqNMLvh
8/1C4Nc1sgnwTPS1a6Jncq0de8xMoEz5mpA7ep4iVp1LNwFSe9vrM+jFyTmR
A64mMDNtt/iA6BfbYnX8TMBvkJz0iZjXzZ1YF2QCk10nozh24/4PR+i9MSag
xqwyYoQeS7CozEs2Ac8B8+KD6NEtQkKHc0xg7vTT91no8b7pKP1CEygILA9v
R09GNH9hqjKBO983xfxCz0hetn3daAKhe9/Nyu7B3nHofn43zssIdW5Djx0x
4z8yaAK6JT2siehRfr4TRhMm8NXz78Nq9FDd5ChpwQQ+193qnkAP7Kunvlkz
AV/9Z3ZC7thZ00pvsZkCg8sRbRp6pMKP57iwKVReykw6iR7bZRRuKm8K7dEU
8/vo0TXOkU1apvi9KHj/Z/Rg4ZjFoJkpSBRr/ubfi/vta+4U0k2hgffErC26
92cKZ7CrKZxJdnGKRndf8Q6h+JlC2qN60Sqim+u95wgyhW1mdU6TxPzXTZTh
GFNIfb31u7gH7k8dLbyTbAoRSnF/XNADetVsYTmmkPGXfvAcunfkbKBloSm8
YHls2YzuTtz7jrvKFLyF284uottVtEw/NprC3M9QfQ1PfD5+vfF2abcpBPv3
Oh1A10cOs0QOmoLt9v6+fKJLVRy1njAFxXOJDYPo9s7EAb4FU5D8NsHL64XP
90fdjD6vmUKp+98+OrpNQP3GfTYzyOtu+5uEbq5fvzFK2AyUFG0vNKPrfd75
0+TNYMT3zLl/6MebyvoEtcygOjZpTs+bBA8q4/THzcxgOZzaFIR+7LrjWiXd
DHy3PV+6j65j2LIh1tUMFsWF8qbRzUVrB+39zEBzQr1EaR92h/6XIkFm8KGF
X2o/+vGvYp3JGDPQfdnNWICuvBp1pTrZDFq37KJ/QZdZODOeyjHDz+NaBmkf
fL6fkt/vVGgGo4GLEl7oskt/u8WrzCCqhrcoH12p30v+1mgGgSSunFH044+3
sx93m4Hzlbmfkr7YkyJWEwfN4Gfl41ovdJmqg4/LhBnczDw8dRN9p1+6S3LB
DBgusiWMoW+f+KM+u2YGYnPXTsv74ecv90SXOzPAIU75XwfQPT69Ua1sALU2
Bd13if64VmMLL4D9ymaO7+i+TQVfLgkDPEzPqSHvJ8E2j4uXFzcD/AvjfxmK
7quMsPWQB0gSzXJ4gnZi9vnXpgKg+ktKn+EA7nd1uK+iBSASV3PeCk0r0/dO
NwCYBi/b8+hOBhn+ZTOA/Cdix18RfRt7pycV4EbU93VCB3G+6E9kBx2gWejD
6l60w99PqmouABqyX30Kie7QPZrhCpBpLKgzi6bdfJj+1wNgfv3ho7qHcP+v
fKq3H0C51CRvDJpqe36p0x9tnibdiW69GlKqHoTHKxxwhfswPh/MeXhcjgAY
3nMyeje604LGsxID0NL19HkBmpal3bYvCcBXzvrUHNGnJMK7kgFuarMWGPnj
vCnLFs10AJ3Pgaqn0S2XFj5k5QCs+7XjZx+aMv4hdfU6QLBFdrlEAAka9Dst
fAsBLn+qEjuEpiRX/n5eCvDG94FgNfrpx6t3yFUAwo8yb6yhrbRO78mpATBp
cam1PYL7k45zMjQBeEZOeaWjYWh3i187wON327OH0Q2q1JCeboB7w5fc5Y7i
80echqL2a4Cm87kVAeiafpH3uYMAl34czqgmuiLTBcZRgLnN65hX0A0nvsOB
CYABNVdmy2O4/+XgwotpAG/jgMxz6Abp1kKdBez+hlW9aOPQe65XlwDOTdV5
CBzH/c+y2dYzUEB4Yi53N1pX/FTjQWYKGF7u88lHPzgWENjLRsHvx3vrx9Dk
1p1yerwUGGJPva0YiF3Q/F2eMAUuePmI+KN1D6uc3yBJAcv4txL30TUNAqaH
5SkQ2zZe8YPoPIw/XqlQ4HPS+ddaQTjv++2WvhYF7BXbToWgyTUDO64bUKCJ
+2LLQ3Q5WxMLM1DAu2L84h+0qmdJnT+VAqkn2r7pBWOvyjj6mk6BtinlN2Fo
8sYYaUMXCjyM4XF8hH7gdnAg35UC5ObwHb+Jfs/lzEZPPD5jt2ntEJxnNDU6
4ofnn1DFFYRW3a442+9PAQFy3NNydEkxzw2jIAp0jjdumEUr/vvncjOCAlOW
/v3Kodgd/2NmicXj+xtP3o9WvfWq5mgSBUyeMGy+hb73+4n/m2Q8PuPPOSNE
pxVuNkmnwBFT2VvCYTifl9p3K4cCIwlPDbehFX9EJrLmU2ByqM7zArrQ0lf/
eCEFErnZ+TvRstmO396W4uuvle9kDCdBwTeDa6ZVFPA/VaBoiFY0k91aUEOB
kpj/TgeiS9I4NrA1UcBzJCikhOgTiw8D2/H9u2j94xMxb/Dl4GA3BWhnPf4K
RZBAOqVHDF5T4F/H43RH9I3RRy8LBynA5eBUm4iW0L4Zzz5KgT2yMkefEP10
sk7wBL7frmqVc2iZ96GTQ9MU2L7+6Cm5SNyv5nWFskCBSOPPn13R0vF2DsVL
FHggn9ibgs4f0GHkZDCHe1+30ZvREkqSD0KYzcG7ymHHT/TVk6z7h9nMYf7R
0Vn5E/g82PtT2ILXHKo1q/lc0ZdlPnbfETYHVS+xZ+eIHvYshkvSHIRSbm6q
Q1/tqiKHyZvDgXVWw9NoCYlr4x9UzMGJj9FI/CT242eyLbXMQUmsX8EeLdwW
aHfXwBwSIp7cPIm+LOS+yg3moJz24O5dNJ+/dUU41Rzk+urMh9BpjZo+H+nm
cOfuq/2kKOy8YoJUF3MQz5oT0UVf9mPuKnXF/byCe/ahhWvnTvJ64s/fNt+S
SnT29+qRfuZQ8ebYmTpi3qvt86i/OaQYXg+aRKc9uJ9pHWQOTfufT/NG4/Mo
KdfmXoQ5LP+dXzBFp+xO+MsXaw4GV3jPHiT6/SP3TiSZw43vyqXp6LR1rl6f
k80h746uez2ab4cFn226OTTHaF+dIPod1Y77OeYwoyZ9kDMG51cEIwXy8f2M
XHmqh05xWqcaVWgObcqtpR5o1tvTH7+UmoMhV7DMafSZP2/SaFXmQGXYpHiP
6HbNVhU15vD1TVJtPzF/7e6iYBP20PGhZTTHfObd6HZzGGqXPSsZi90qdu94
tznoPjJvs0Kz5hzipr82Bwdjk4uH0Gemt7VWDpqD/lae/y6gmcEsTHgUr9+f
xu5KdEK6knLshDlI6FrCGzTjf7wfJqbN4bhoHmUJfcpw9aL9gjm4P+nsFY3D
5+kLk+YPlsxBWqNtxgR95lPfLxEGC7DNTc32ILpOfXEcswUkSSq9ikXHnyna
PclmAe++J2fdQDMOX+Jw5LUAnpq7s83oaPWTzdXCFlCqxDf2Cf0v3i9YTNIC
uq6uS2GMx/7GSeGUvAUcobb8lUQzKhsNfVWxgH+P1/QAHR8ll+KkZQGp5FqK
B5rhFSc8MrCAY/NzQtHEvOzyvDhYgITBrfqr6H9hYwUJVAtws+lVf4KOeP5i
1ze6BfDvCzs6iP4tUbPJ2cUCInqyTv4heuCthseuFjDXrbGT/xTOt6Uc3+xp
AXzFlDUyOlo4XDbJzwJaC58FOxHd3/vttL8FbODpfBSAjmiin3MJsgBFbePO
c+jfvHomtREWcGOXXGEROni/1JxkrAWodsdvbUXP1266dTrJAuqHXbpG0cc4
fm+fTbaA2MEsrhWie42StqdbwCCPg6xwAglCqruePMmxAM+hECYd9G9S9RHp
fAsYi+d44IQO3nNd6myhBYR4Cmr4o+fvn+3/XmoBrp0XI06jj60PPr2jygI4
uMNSb6Jnduw1rK+xgK1p3cH16EMlNjMyTRbAVXBR/h3RV8j559otIOBWY8E8
+uhWcZcf3RYwMLl7ni0R99/eyLzrtQUMvdrHpoA+tvjjccOgBeyqe7MA6Bm7
4cNyoxZgv/FBsRv60PV2ieQJ3M/7VzkYPTlf/mp+2gLEKHcjU9B+1CsJrgsW
IPfzaVYh0XMS9ZqW8HqmWsY3EvMzR6fkGSyBHKli+I7YD255KcyW0CN0onGO
6BmWTj/ZLCH6tToPSxLO/6e2fjevJUjw0shSaD8j4YfNwpbQQHm22QA9dmH9
QUVJSyjvKh1yQnt9nhG9KG8JASI/vQ+gv+i8e/FLxRJqrl17HIP2PdsSt0fL
EqLa776/TOwfLtV+amAJ04yi3WVE18j6TwlwvuXb2Vb051NxualUS7gWKc7/
ntj/9rD9H7oleF+7H/ADPaK8g2GviyU03byRvvE0CfZEQ1WrqyXwrM4niaMH
Xyn7bfG0hHcKt6y1iC7HL5zmh3+72RUDNuiR8LXni/6WwPBcXHMv2rP7a7RH
kCWcM/jPNYjom/s12yMsYdaT3ekMMR/UMKYSawnNDRd584j97cVZ6UmWMPcq
4HYFeodIOm052RKSRIrWtaMHAqJWPNMtYUrYSG0IvbN5f3lHjiVkOyspzBLz
fM771PLxfGyOzzCewf0HjAUyCy3BPJYnjh89+ET+2d9SSwiOZfusiN7ByX3S
u8oS/Hv3chmj+73/qj2rwfNbJLE5op0fjn9Sb7KEG6dYB7zQvSy9GZfbLWHi
r/fhYKK711qvdFsCaZb7ZRJ6oPz28r7XeDz/CTDkEPs3XCzrGrQE37DjqyXE
/p0RnpqjlhCiKtVVR8zf3cebPYHv7xW5fS+I/av27avTeP2do599RNs760f4
LlgC96Tyyhy6q0BapXvJEsTnlFcZz2JfYvtIZrCCdYzR3Tzol/Q/l3KYrUC6
UuaADNo5/5MlA7sViF8VfaWF7l14/seP1wpe7fLdaEnMWz8s6RG2AqtTDJu2
obty8921Ja2g99H0+31om9lzXFfkreBnulJkELqdEvKUUdUKQh8+HI9HW2Z6
hB7QsgL7xnSJNHTbpK3SSwMrqHBskr1BzBtrD+uAFbCzGi/eJ/ZflLh4lWoF
AmnMOQ1E/0IyX29vBfnJmzf2EPt1F34edLGCN9eTzN8T+899KOp1tQJSkJHd
V3Tzhw43PU8r6L5nIvUHbapZyX7Nzwom/yW3bjiHPeFq04YAK/AnKenwoM3f
JQUdDrKCtCjuoM3oti3H5fsirGCQhRqtQvSY3YP6sVYwv7t9hwEx32eVfD3J
Cvpk0v5ZoU3lNcyYU6zgNs+do87o+giRef90K3gxxFq+F23Qs6HgdY4VtJsr
DR1C10l+32mYbwUrstMqYcR88CDrjUIr+JBkNnMK3dTxtH5jmRVkd+RZXCK6
6L1jR6qs4NqtTbrXifkj2TIDNVagInWutYzY3xL/xqjJChicRb7XoR/yB5y9
2Y7n41Jf3Y3WObjTmKXHCiYcgoU+oB/XUb4ffW0FteEgOEvMc6ncfDNoBc7c
MpVrxP59AttNRq2gwEf8K/d57I8YSLcnrIDapVEni37I+q2WdcYKQgr2btFH
6+wdCDi+YAWsvsW6dHRlRaPkuyUrOHOKc8QTrcFU8tqUgQrMpzOlQtFluzKS
Cpip4MRozJhM9NJoAzZ2KtRd3BB1k5hfOzAdyEuFQ+/nMmqI/S4u1weFqcCQ
s872FdELTZxBkgq9Z4xyvhLzywpMRfJU6AzNS1yXjPvteR6zq1LhnKEyhxha
+ca/Q8FaVNjz6AtZF138c0L8vQEVhIefLzgR3eZVLwWoYH9rzMmfmL/y5FQx
lQqyvBq0M2iN7wW6nPZUOGZS/vE20c1Tv4a4UKHQbD93CzF/OfLqsCsV5sx3
fvxI7P/q42iBX6C5TsbbrqLlTBzXlfhR4ciWb47iKSS4nWpQzRVABam89Hlj
tNyYzIGwICqMKEZruqOL9ThERyKowEMuY4tGK59f7LGMpUKtgkzCdaKPfI69
m0SFtITPWc3EPLlHiyeFChMvZqzHiP2JjybC06nQkm2dsfECCaQGb+R8zKFC
V8z8yS3oayrJdGo+Ffaq/mB0QovHhq6VFlIhYAdVJoTorz0recuoUPLk52gu
Ma9g5xtZRQVfpTXDZvTNSB2hTzVUyA87oDlJ9Bebn1s3UWHxrFYr50Wcl2KN
vteOr++4b0EPLR7yU4O/B69f63KDJzqnc+TLiddU8Jr5J38OLSD27PLnQSoY
jvhveUD0o1W2tqNUSH5g3z2CFnua9+/+BBXW5d5kYU3F/QJn7gvMoFuPfNFB
ix0K9I5awOMJqnb1RufU7+EfW6JC0q8I/4toAW7rThqDNajebBStR2f6aJ6o
YLaG4g9n939D8zwWVRNit4ZOwWFHkUvYNzF/iua1huXnNf22aCGPufRxYWsI
iJP/HYHOqRyi0iWxd8k9KEELMLctVcpbg4b1E45hYt71fqmwqjVQ86eYONJw
f1mOR6wW9uRHOYBOZUjg+c/AGtK65bqC0OzbjrTZgzU0qRlkFRG9aFf4A6o1
tJ7/xTBMzP813yJqbw17Ovdu5E7H/Q6qI3Eu1rDYH15CRfPcFLw06YrzZdZT
J9GpvxgtHT2tIdXtZXsVmt12+ne1nzUszfLCN/S5q2/uiAVYg8054R0yGSQg
zTXtORVkDVE7x0h70Ocs7nJORVjDjpTwXZlo9qzMFqdYazA8MmT5Ep06FRPy
KMkadtlwvGDJxG56SFEixRqSQoR+WqLPXdr2PiHdGo7vXnkYiyaNm174lmMN
voebBerRSfpKFOd8a4iUPsi7jN6QzPvzcaE1hLAslepdJkHcx5XCzWXW8PlB
yJcQ9AatSdekKmtgavvy8AE6MamPbaYG+7i1wk80aaiu0aXJGkxeFmprZ2FX
LQqsbbeGM5ZMH4PRG+IuyUn1WAMH/wH5h+i4/hPvTr+2hnbRftZF9KqC3/nZ
Qby+Zg7JhtkkiDrhZLp9FI8v8H1JFHr1heGPJxPWoFwV69eMjpOWuy09Yw3x
mywamXJIsC6Uc+fZBWugXVKopqHjni2xzC1ZA4uflk0qelVsrG4Hgw1seHQ4
/A066tiLo/XMNkCtH7ASzyXB0tPH0rLsNnCjPrTcBx0qeGvgHK8NPCZte1xK
9EMpZ34I24DB8R79X+iTDWFGuyRtwDnx1SeTK7if23u2Qd4Glr/F7UlCn/Sl
35BTtYEzb2+GvkAvPdbdlqxlAzPP/JQEruJ+NqmNCwY2oKPTFeyO/uWxqdYV
bCAg9dmu2+jAql/+TVQb6N3pNTBFdObRzQr2NlDAdmFKI48E4W5dfSkuNrBH
h54dil4qe5D409UGPN2zR56gQxmv6+/2tAF7/qP1DNdwftvZb81+NtAw361t
hQ4sDrqmGGADsan3LM+i5/66b70YZAPHL3DNdKMDHG02/I6wgfhL31W5rmO/
SX60J9YGuixsNrqgA3+LHXqaZAPu2wQjMtG/bDeKK6fg+Ya5nnpL9LwfL1PT
baDEb5O8cD7Oz72P/5NjA4ajSl5u6ADLdp29+Xh+RRXaV9BTWeWTrYU2wJZ0
Pf89+sC33CtbyvB4beZui94gwYRpokNalQ20tuRTdqMPpB1lXKqxAanustBc
9NS46wOPJhuYpfBZDqIDDCz3t7fbgC/zqzuCN7Enq4mo9tjAKMOnou3oA6NC
PemvbaBbnGKajp7QWh+7PIjX22HWvxftc3qG7DWK1/fcuBb7LRJ8Gno73jFh
A4e6ZdJt0T5qLdlqMzbwmb/wXCJ6PK7ULnMBj9f/oEgz+sDA5dW/S3h8w4fM
/xFdMa7Cm8EW3IKL1undxvmTh32eMdtCA01s93H0p5fbBTXYbWEwot3uLnqv
DHRd5rUFc6lb/WPoD6HKUSvCttDie/+XeAH2Lj4NH0lb/H2cvLcD/Ul87XOX
vC0UBtoxXER7H/+aqalqC8rXBr62E731tU22li0wqCYcXiXmhRr+rhrYwmX3
bYk6hbj/cPE9X7CFA0EWev5ot8Y0r26qLUg+coi7iX7HE8WnZW8LkaFB+96h
Xf32d+S44M9vuP+BvYgEwzVbIxncbOHr49Xv5ui97Maq+z1tQe2HR24Y0T3l
R3v8bCGFs3f4Ltr1AVe6doAtHDlBf/QR/WbjX6srQbZw6EafEm8xCbbvHl9k
jLQF8oKHNhXdd+/l3QOxtlDw34834WindbV7XybZQv1yIvddom+/za2bYgs5
ZcJjw8T8nQutV9Nt8T5V4sBxB/f/Cw9bn2sLH7h0t5qhtzvtUz6Ubwu6H2q+
HUX33bL/0FtoC6ZxWhL5aKc/eql6ZbbwKit/8iW6hyZtca3KFqaaVmlraNo1
tt8bam3hzg07K7US7D9+Fx9usgXnsYS3e9BOVp9297XbgpN+MeN5dF/2cw6D
HltQdK56+pjo09XN11/bQu63W+ITxLxZfjDzEB7v0zBO3ru4P/2cQsAovl6e
So4ZunMieOj1hC3MWDTVHkZTDT1SDGdsYfSURnAW0fHcbyzYAmieaGsh5j9p
LWxcxv+TvXZvBt2jLVF4hIEG7UZZ6kKl2M+QXAeYaZDn6mNjju58P7/JmJ0G
hn7rlw6jqeofGm7y0mDYIZCSiW6N7zjOIkKDz0z3pRrQlDcVssckaTAQ/yhn
guhKV9++kaeBV8vZOxxlJLCKSjpnokoDv3aZrbrozt5jJre1aDCdeSrVneiy
u+dYDWkgblK0PwHdGmZ16zjQwKYn+U0JmvJcfcc7Kg1m9pA/9KIbJERYzOxp
8HDj5RO/0SaBG+oKXGhwaLa6QvQeCWrbZo+wudGAQy81BtDGwoNSQZ40qGOT
GfdBN/g/7R/0o8Gz6/6fz6ApTWWnIYAGN+UOh5USnTfbsCiIBnPvxG6/RJvs
j59hj6RB+FLMgXlif61/fnAsDTS701r57pNAn2Ony/skGlCuuDzWRVd7UZjN
U2gwWd1ksYvo1VtqitNp0FM9ExKBriEJ+HPm0oArzDgqF228h2FzaD4NEp1s
sp8Q/f7Uq+FCGjBszf49jNZdP5BgUUaDY1S/4lVi/45GvZIqGsgnVpVJlpOA
XHJniquWBhU+ccwW6PKV9LywJhosmr2q9CX61minkXYa6IfcrjyDrr59YL1V
Dw1WfP8xlaJ1F50f3n1NA+GwodKXRLczOcgzRINSLihaIOavK4hFjNJA9Zra
L8EK3D/P/fLjBF7PC0WXjdGq1H9x1Bk8PpfS817okpwJ7bIFGuR7m/YnEX2m
9z/eZRpUa3scKyXm4UluJIMdVFpxefahyRkF9p+Y7WCOz+XWItH/u8hgw24H
wnJKhpsrcd4osuoerx2I/0uXpaJLLvj48YvYgY1MpncAWvGzg/BJSTtQVFD7
mYEu1DHo/ixvB2VZnoN1aNmzMjG2qnbAT1LjGSf6MDu5XMsOxjmyr7FXkUBJ
Y3FMwNAOVqzyo3XRJac+Z0WBHUTSbCo90Ipvu2ljVDuYqbtkcBZdqPxohWZv
B2KUaL4qtGz0jfIKFztQiea0+IC+8er8PiE3O7ggYd228QEJJORCBWI87YCl
V/4KGX0j3PPZuJ8dPLAob3VHS3fTTtID7GBWdZxyFl2wWUe9KsgOwqkdPNVo
2aDNn4Uj7cDXZpfeJ2K+nSUzNtYOuOdz7rNX436Rn9b/JeH5M104YYjOCxhZ
tk+xgxKq7pX9aJHmzrIH6XawHJ3BkYm+ylflKZprB7URJQMtxPyBPN74fDuY
YIqcm0PfeHK6fbLQDgZ+bfDY/BA7Z2CEY5kdSG+2l3JA53nvUXlYZQedbtv0
otAiD6kfxWrtgClR7EYpOptFM+1Ukx3ERxXtHUbzu4taTbXbgZzCn6Nsj0iQ
Vs606NRjBzoH2AeM0fwb5koevbYDuvJ0SgA6e+eQu8SQHbi7ZeZeQwvfbeVK
HLWD/EnWvy/Rl1fvPf02gde30+E+42Ocd84JdZ6xA+8f3o+00GkFp5RqFvB4
3G15/dBcSwHDm5fx/WHZ8DQbnULfdTGJgQ5lvzPanxM939x8hpkOA0qr4mvE
/ILKLxd2OsiXUJ6Ra3C/tWBxLS8dMuO9Ov3QabmMu6VE6LC12UP0Cppr9hv7
GUk6zIaZtrxEp1DeNM3K02Hbk7W6DbUkYM1sCtquSof6WwWbDNFnJ0vk67To
UEMn3ztKdOPMQWlDOqgMFN0uQKdcjEk+C3Rw8yB9f4/m+nLQbI5KhyGuHSk8
T7DrbpvfYY/Hw5MeY4tmPWdaUO9Ch6bU5rZY9JkPirtk3ejA8OSLx2M0sybv
pvOedNBv/Ws/h05IWKn/4UeH2s+bUhXrsL/779iuADqIOAnIe6HPbumTaQyi
A91WnCsXzRpT90Yukg7ZHDIOr9Fn+grPJsfS4c4XpVG2epyXv2S8kESHCE7t
dio6IeLEd9cUOrgOWzDEoRl7fG82pdPhR9buC0/Q0ZJO2xVy6WCVHnXsN3ol
yJB0IZ8OldKlhZoNJIjtkH3ys5AOn/K+agSgGUU5j+wuo8OUhz7nHXTCkSXJ
lio6qHbkUsaJ3vLltWItHY7p8HZKNeJ+/hdJF5vw/eW8fXMveuXAY4Pf7XRI
bHB8dQUdWXdzek8Pvn9lQtsG0YucKdefvsbzpzNuEWwiQcS+MGflIfx5NrYd
29H/HnoxXRqlQ7mP0UA6OpqV/vjPBB3aei4V96FX3HUP753B69XK3cvdjPsr
JCXaFvD3o7Pebit6ccOmV1uW6TC9J1v0Ejpk169TaQz2UEe6bfYKPX/3o+4S
sz20bv/yiLsF+9qzrx7s9kB7tSvBGb3o/OBqO689HHzwwi0dHVF4zVFVxB68
FEeiX6N/L51ZlyFpD9RMWTaepzhvH1S9LG8Po9zHDzig5/PdD3ip2oP0zvrD
Z9DHflqLdmrZg8+dRf4m9Iw1+YWaoT0s/uHZ/4voV8TiMsEehD/826vYivOz
zNr/qPbAf61oZRc6xPzHhLe9PZC3MFmcJnrm+5xnLvbwaTNJvQp97GsbXcPN
HvJabjUPo2eMy9cue9oDO1P38vo2EhxKza1c8bOHyVMhQ4ror18SfH0C7EH8
dKanHdpP76jQ8yB7qGeUTjlM9HOuzzUj7UEyjdvzLDE/YhGdHWsP7XG7B2+j
ZzTVNNeS7CG+7c9iPdEThcZ8U+yBvjLS0I+efLcuqzvdHsKDWbd8JfarzNhq
5drDOalgk7/osZi3/3Ly7cGvUOA3azsJvF4332cowvNzmtkmhB6TL/XeX4Zd
8KerDNov8jL/iyp7GLiuwKSCnuyJ7dSutYdk/cQdZKJLHT5xpckemIZZHXSJ
+eDtaus67IGk8eibHrG/0+zTgR57qEg8q054RFQ54+VrPP7BOGFttPtRPmvd
IXsweJ1/Rw092rK6dHXUHja0//dRnpgX+Fq6/j97cC7fVSdG7D/42uPQjD0s
G/025SJ6fT3PqwV7EGl4up+R2M9V3Ka3bA/Kem26c3i+7j5p4dcYHGDOee3u
MHro0cktTBsdIO1AWEc7etem/SOH2R3AO1Lr7D304N6tl/p4HUBY1/BHOnpP
pZGlgYgDZP9MWwtFjzDJ/7ku6QCKtVYPdhL7XblKmBUcQF93N6cusb90eU+A
qgOcfDrMxUPsZxjn7NdygKH9/Y+/4e/HgMvLFkNDBwjup298inYuqgm5AQ6Q
4bv1Xxa6d/mWIsnaAYqlZ7MOEd3hwvsj9g5g3qA+ZEjM3wi/MODiAJKXZZ6S
0Dt+eVOM3RzgX+Vb5378fR6wsf9509MBGjrdzuahna/qFbHsdwAD3To/H3Tv
dym3YwEO4MnE9k0RbW/Bxv42yAHWfXMT+IZ/X12XfzeaRDoAk3XtZAnafmo0
8HasAwjIGnsfQPeaPJfbdNoB+vQW4mXQzpeq3x1PcYDqz/O0Yfz77h27fv5d
Os5rONamoe31z5ma5TrAuwGxV1R01/ngHwX5DjCrffziIt5PbD/uvc1W5AA9
u7x/FaHbybY7g8ocIPcP83rifmSbpMU6VIXnGxj6eA3vX12D4vVQi6/3upO/
GG2vSjpW1OQAhn0Cog5Ej52X5uhwAI4XEZ0/8H5p0z88ENzjAL9ebZJIR7cr
dJx5/9oBVNL/EyWjLU9UGJkP4fU7rtjyAu/PzS+uzBaPOsCPkCmug2hL6aQb
nP85wN7tNBIjuj3k2LbQGQfoDPAtvoyfDzbP3DZ+WHCAlA7XH0rodjGrWotl
B1Dmp36pxc8fy2PqASUMjiBQZRtNfH41PxWW5N7oCK1FCS0D+HlnKrjhdRi7
I6TdEiz3QNcfmk0c4XWEBwyy1v/h5ys0vNO3EnEE6afPT/ujm7mffrsr6Qg5
2ZqB3/Hz29K37BqPgiMEvAtnPoZufpy1NULVEXJPtVnO4vODKVv8hlEtR8i2
NFY9hK738H9ENXQEt6Prmr7g84ph1Y5DZeAIGoymK27ox8yU/zm687iaujYM
wJHhSFFRKSIUiSgVFfHQKA1nnk+DooHSgAaVJkqK5hJRSRMRlRJ5G6SB0iwR
lVRSJCQpvmd/f14/3Wfde611jr29nfXKLze2hJo0qY8v8f5Ii7u52dfcEoSu
FXjtR5fmS4X00Szhy7cdxffx/kx3jtAOEy7+/J6WVAV0OX1k+I6NJeS/zFGP
xPtD3Zz2K1IOlvAuecjtJ96Plv55YuHnYgnsnaU8PlrLMnfOB09LmBo3nKjA
++H7GXFFB3wtwaDoseZ6tNqkv0NBoCU4rjiwPgTvz+8fcJSTCbOETYIVT3rx
+UArldroH2UJxc7s+bvRD8Z3Bw7EWcKPoQzVBHx+0TLYqHEwxRJkr+Q3j+Lz
0/0kicF7aZbwU/FVqT5a7fOf5BXZmJcW9kvB57n8PYMHz+RbwgrOJ9Nv+Pyo
Etv892OhJYjrnFcyQed/LLtnVmYJCcL9i6/j86uazk37wgpLyJr/ffYnPh/f
j7wkI1drCYciH/0xQ6v1+jQENlrC8IDu/Ex8Ps/XsPcfarMEd76b3B98/lcJ
s1Cz6LYEXeDtoqJzu7U/FPVaQlrPtENuFgk2bF2fuHII5yfIIk0InRskdiB4
DPv6MgZYNzHf8evP8HdLYEot1bybia+v3H/HctoSPK77XlqAltozqMYTIsO1
I0mTghskaHfgRVwUJsPFUnun4gwSxMU0f6hcQIap/r4hUTTlkaHez0VkyNNY
4mGfTgKJj2WJymJk8JgaXvg4jQQtS9TGeeJk2HPGPXcZOlb75oFLy8ggLp3N
PHqdBPRDcjeqpMnQL3J+afU1EiyLvDTzU5YMXbek2+XQLcXzmJvkyTDH2DLT
I5UEMe997vIVyJChsj2w4SoJLBd9JUWvJ8O3zCcO69BLNOwPVW8gg+G8H1zf
K/g8z3/9aHITGWYTWzitKSSIPGchpaJKhqhbTHsVtHlBtatAjQyO0cG+wZcx
361dF61BBvl4+tXuZBK8FL6z9ukOMlDmv6jfjo5SXX/6lw4ZCrYPz72QhHlW
cruKHhk+OucYf0gkgWiQ2FYrIMPDmcXJu9ANecFhMfpkENsp+SMuAcdv/9X7
1IgM9Y5lvNF4Epj9PaY7dYAMA73CLw2If79W7o/bbE4G+pcx89Q47E9hjVmR
yaDV69X1Mxbzp18YxdLIcHN+uqsF2vTmvrQaJhne5juKZ8eQYNHLB7+nOGSQ
Vm4q/xdNgrqpzbQtAjKkVjefYqPD1qXftrYhQ/PL47vuXcLPIzPpBXF2ZJC6
mrdYBL3o1AXrZ0fIMOEVOHToIva/LvTwtxMZxu6PNz2Kwvvf+pOSqi44/1en
K5ejTb6PHLVxI0NxaGqFSyQJFsrb1MR54vqVdTU8u0CCGqOO1bWnyNB98Vbv
GvRZN1PvaR8ynCNLzfWJIIFhyn8tqv5kqLKU2tZ6Hu+Xn2putg0kg9/bPIfN
6Lqx3ND4EDKUGXXcCg3H/jJr3tWeI0P0u7g/PWGY3xe/88953E8/PjJ3oucd
XRSzNYoMrq8ayqPPkaA6PmDENhrnt2uf2shZEgQ9+a6fEEeGChPTO/rofcOO
qXWJON9eH3amhpJgruS7yT+XyTC/WLRxMgTzu2jkbam4/tQaF+L3UUIP1+Ue
SiND+XVRubxgEuhf0hNOvIH7d6yvRZj4fZqH9/n1WWRgRxkkCIKI7ytufDCT
i9ffpGFfEkiCM6KpS9XyybBa+O4eCTTskHSyK8D9fbpY8egZzNuEVSUWkoEa
ZiRdE4Djn59Z2fAAr8/HdtkadFCh+8nZh2TYkD5/lY8/9u8ZbFIrJ0MOebta
mx8J/i3gK9tX4Pp0DVqqop+otQQlVZPBKGLd6bDTJPDnGr1peEaGFw8G7vX5
kmB36CPNv/X4fr275ccu9J98tYvqjWRIqPm9L9GHBI9f3RyybyZDpOnBK+Pe
JPCbs3JfchsZWi4pCB1E622OTnneSYaeQW+3m154v0+f/+Pva3z/pdNG/53C
fICv+fYe7CNe4MlF++Z8zTrci/v3XNSC4pMk0Gm1F7r8gQxCjM+ZS9HTf15z
XgySIbyxzsL5BOaVLAv/fSLDvP1K82o8sb/lU1GNMTI4zROqWYPe7aNz5Mg4
8XnFjvH1wHzGnf8ufyfD4zJVpw7i90lfrJdtnMT1op4xU0N7TyZ7CE3jegSa
7brgRoKdCkteaMySQS0pXmvwOPHv8yFKDkIUIA0zd+1Dl3hOBaQIU+BmTazZ
VVfMp7p0NS6gwLFgY6dfLti/tl99jggF9i3QukVFT42zLmiKUUDTq9j1zjHM
yzUOOIhTIHDhL+3F6JMG+/dcWUaB7T/5J52O4t83riVJTdIUKJi5aVbvTILv
SVu+zZGjQOjN+09U0EWV6aZa8hQg19k9j3LC/GfpTEcFCsRcTPGYcMT+UpGz
V9ZT4LGHdhEb/XPPHNbLDRSQgjXRFQ6YdzxVMFeFAjWS6gtU0J6xnxftUKVA
MYssnXCEBOqPbeyc1CgQ9cK6Yg7628eOx1c1KJBzZv88t8MkKFh6ULp5B75e
85u+9/YkcNepOC6sS4GLLks5FPR2O636HXoUYLMrnZ7aYf/IvHXOQAFOX8cy
HfS9B2v8UvUpMJarziJ+X969N76j2YgCQpkPNTait4mIbJtnin8uQctNsyXB
F40z4TvNKeB77kPJSnSB4EefM5kC7wbI1sk2+PwU5rTrGo0CGTZB16XR6vfe
xbcwKZDlz/NOtMb+3bQv87gUWC7+7JMM+u68emNtAQWou3O+p1iRwHXrnvSj
NhRY5fUpYQ1alV04fc2OAiZn3ZtvCkgwGqRMbz1Cgd7TyjdU0bdupebPd6aA
RMWkWAmfBMc6JBfquFBAeWGN+H70ln9hNsfccH2ZfreaiO+DKM8+vO5JAT/h
Be/4POL7uh7L2k5RILLwYM4oF/N+Q8cW+FJAib9TJACtksV/puOP67+/UFiC
+P7Ly5Y1LoF4/TO58Tc5JMj5beSTFkKBStcF5bvQTusft7ado0BaU6FfGxvz
5upbFkZQQDQ9te0YevRU1lndKAp+/t6tXIjOS1v53iUafx46jTJZmG+I1k6P
o0BH1uyh/WjlH/Nj2xMpcPaepHQ/kwRD8qc/L0yhQMqJuTYh6JvG4wa7UimQ
SiuDDWgH98PXXNMwP0e5tIGB+Svdv9JvUEAxWOeZG/rTU0tKRxbO/8Ye5xXo
nC9P80h5FGiJnZNVScf8Ct15u/NxP5UkeB1DK+2/KzhegO+XjvD3K9AfjyqW
ZBRSYEFAQ88zGgluJFwW73yA+yPG1OMU2v6/Jc6LyijwAn5f3YhW+hRSvbuc
ArOLagXdVOwv+XuVWwUFBI8ziy6ib+52PXWjmgIqp0LSDdD2Rz687HxGAfmb
dMUZCgnWR7M3iTRQwHCBiF4xuu9hY7BeI65vVsLn4+j0D/vfujVT4Hbvp21b
0DZipVqZbRSYZ/t70QiZBGt3ql561UmBqrUlPrnofpuMYZFu9DHpM87oGxEy
+/f0UEDnjYicKtq2KPKKey8FEhnhpt8sMf9uzs/MDxSIXhYiTnzf8v1CL4uu
QQqoXf16NAB9TX00e/EIBfJqqvjGaAHPds7eMQqEF3/rl0CvPtvJ9RinwOFe
9789Fvg8fOdg0c3veL0iOndvodO7KsReT1JgEG/TfNHWc3c4iE5ToPvnieaD
6NVbblXsnaWA4/NOWI3uYSjIeQpRQb6WYzRhToKrZxI8s4SpkKv9s7cWzcsV
aXy9gAq9T9LEr6NXtZ3ZICZChQJjeocX+u3MjzMgRoW14qRtVHTqBufXnuJU
YGcWyW9FC8jvt2cvo8LF99T0xUTelx7ZLU0FqdE3D0fM8Hn4Rv1HMTkqGOof
cHiOvty4Z+8+eSqcz4/PzUezfxUmn1CgAn9/aWAMWnbtpons9VQwd7wzeorI
m147+GYDFQbb3ccE6Ksnlt1cokKFx5GzwUZo7rXwv/tUqeD8wSxfjcjXzbJO
qlHh8mnesVXorm8e93I0qDBupFSxCJ20cljk7Q4qLD+XlTN1kAQMQ4H9Ul0q
3Kx7o/QJveJ4a/l+PSpYjFXufIPuSjaWOQVUKF7LfNd0kPi++mO3XH0qBPYn
yD5Fs0fVG94aUWH/n4BPZWgZ6ez14qZUiLhfa1KI7ti7yl/fnAo/FL58v32Q
+H57TOcpMhUOqQe6ZqNpcQvU8mhU8FtP35eBlig/fb6HSYXDcj4aqej2wfF+
cS4VXOd+NUhGx4sf2W0gwPmvKz4ZR/TXfZPgZUMFR05jzUX0cnvy1zw7Kpje
0NKKQLdF1Zi8O0IFnfgv1WfRMSW6GRLOVOiWm3IPQlP67v4xcKECdwN1rz9a
fLESw9uNCtSsmc0+6BbNlDu3PKnQEvFr50l0rNVS0vtTVDj2dL+dO9E/PNRW
0pcKigbv8l2I/vd/lxn6UyHgT72MM5F/47rcJ5AK3m/npx9BX5o/4HI7hAr+
r2MO2KEttnFq35+jQvBHFwkbtBinSWFZBBV6vl+e4qObgvV9jaKocGpK6h8H
HX27tM0nGtdrqE+RRfTvVFXNj6PCngezTnT0UqEb53oTqRDKcWqiEPlNK3qX
pVBBr1aRaomOokXpGKdi/ue2n2ZoM/+5cb5pOH9vIkpM0YuzvUbzb1Ch/LjW
ZZODxPmco4Z9Wbh/87alGKEjp22vL8+jgnKIT5kB2lzx1ZRxPhV+T0hO7yf6
W5hRTxdQoXHiD3sfkfeqvHWnkAqb/DRf7UVHpO+Y3/+AChLnH5/Ygz7w/JaV
VBkV5i2PV9dDk34qlJqUU2FW5pHYbnTt6kQJvwoqOEWrL9qFDjdZfPRuNRW0
fH6t1yXyHoFP+59RoaJJ1EoHLXL1p7x0A65vlHuJNrq+xtnrQCMVOguV1AiH
f33f7NdMheg9m+p2oo1lGSoFbVTYt8XvDOH5+g0hHzqpcP/0aibhumN7e6S7
qbBki7gZ4fDEoh2mPfj+0aPYEj5QsSnav5cKw3f6EgiTRq59KviA8xNc+Ylw
7bLl+gODVPhWMs4nxj+rd/6qzAgVuijHvxI2dPj703SMChMUvXSiv3CMp2XA
OBWelXE9iOurLBvOufedCpRLtYeI6w8dEMz9OEkFUluIBzE/BkvaeCum8fXO
X0on5m++tknxwVkqaJeOfCXm96lt+ZIzQjQQtUsQADrkwnbH+8I0uH/p0gix
PvuKsys/LqDBlP7rRH30nPerVsqK0EDznMchQ3QFKfaEmRgNtgh45sbooO0L
m86I00CxOY51AL2f77excBkN36crg4jzEoTPfQsclKaBd+73enOi/90j3bJy
NChWWLmdTORfv9Ewl8fxGbEPqei9wpSoQAUaiFM5Ngz03y3PBgvX02B4jdsG
NrqcuQuGNtDgaX3nYh5xnkJgwWU5FXw9bpS4FVovT+m7uSoNtN/FadoS+bYU
syA1GjBsRrzs0f/NLs0q0qDBibHobgd0wMaz/4Z20CAyNox/lMhTptkrdWkw
R9A064qe8T1+30KPBuXcw0880I8yBxYHAw0kU8yunSLGb+IcLtanQeum0FRf
9O6ppifDRjQAWdHHAejZtQYrVpnSQNV74Hcw0f/gQ3dLcxp0MMVYYUT+5Nbn
wWSc75pzbRfQu67fUHxAo0FZJ/l4NPp33YqAT0waNKUcVUlAl05EvVrFpYGR
4qt5KWivVcLqZAENXpyN+3sNrWXkHRFiQ4NjrWkymeip42MfHthhf/l/lrlE
/vIhvZEj6NN3su+gfapfJco70+Cn0N3VRWjtMbNxsgsNKFVCxQ/Rv6SrDoS6
0YDaccP5P3Qx7LxR4on9LZP31qBPOt+eGTlFA1OTdxrPifHj1zJX+9IgquOk
cQt6sjzxLsWfBt+WWPu+IsYfWrzobCANDoimvOgh+ksEHSoNoUHnxw17Boj8
rslHn8/R4EjR/JfEeRk/7Y9KrYmgwaaYHWe+oQsv9rpSo3B+X99lEH9fuZcy
6s5G0+BkXr3NP7R6f8Pah3E0GMs0vrsA/36bWAynRxNpQNL8ZbIEXahV3L4m
hQbmkgZbpdEnrFW20lJpEBO+1Xo1WuP89bBzaTSw6n/wZgP62/3lfQ9v0GDG
pefGNvS9t+d1x7JoEOqXUaKNdlvwL04hjwaPbRfI7EdvVTsxRsungeGJRVUH
0eOcT0ZhBbgeYrdLGeiCEKu0skKcz/Nfpq3R7vltv8ce0KDZqCXcGa3+yoS2
towGftn0QyfRX4We3KaX43ot9QkLRN9R0VgQXkGDvME9UxeI8z3oOdaPqmmw
PTGrKAm9JUD+4ZdnuJ8iCh7fQH/OjpVc10ADe03B/88Lud2y8BijkQZX5+Xf
fUzk//jVhDfTINwtLaWe6K80sfpxGw16vu5s6USPWTh4f+2kgdisJ22AyHu/
bVnXjf2lGGsn0EczKJuZPTS4XPpGVwjvdza9eBZ6vpcG15xIaUvQIz93vXv8
gQbd+W/I8ujba+7tHB/E/SHGNN9CnD9yYEPM+hEa3FvmnbALvcXzyghzjAYS
Fvs3HUR/vipuEDFOw+eAYhIPnfvsbGr5dxqYZbZoHCXOKxmfnhyfxPX/lJR3
Gr1Rzo2sOE2DwGKSSyT6o/7HXNYsDSZvKJ5ORee4cIUvCNFhA220/Q6RT3rJ
fyJMB1V7G98Kon+lwYNvC+jQ4xt0tBU9PPJwqZIIHbr1yDkD6Ozl25zYYnTw
ZTaq/UIf3pNZdUGcDsNuv+eJ4P2lkqPsqv+W0WFqV4eiPPpDzMWTE9J04DrZ
RquhMx8Jv1SSo4N3/jVjA/Thj97KHHk6hP8XZcpGb1z6JShSgQ5unG2Xj6E/
atu9+W89HcZ2hmoEoW8e6tL8voEOznJRsolou0jzixtU6KBSbXqQuB9e+6Bq
iKNKB8Vf5XUV6L73O/dFqdFBLmAophOdtig/pUKDDinr6rJG0bYa635830GH
T/dsFgrj/fY6QZL5Rl06iM3cK5RFfzgnms3Vw/loe3xLDZ1eECR0EegwsCT4
K3G/bts9yanUp0Po2blnrNEK844V/jCiQ4PkXq4X+p1qn6iyKR3S4rWDLqHT
WMwjPHM6pH7++j0bbRP0/L+LZDqo/Tl8v4J4XrgFslU0OgTlXnn8Gt3XXuzx
k0kHv/cxkt/R1/+qvFDm0qE9/ECRKD5vWCmnKfEFdJgbX52+AS1PlTpzyYYO
ehNCbwD99nREV5Ud9kuaa8NDX7n5T33yCI7vW692Cs1/eeLCJmc6SCQwzWOI
/O9PA3wXOih9yCu+jX63znpPtBsdRuxqnerQqWbtSdWedNgjm+80QORPHfg2
eYoORQsFxUL4/LQy7Ympii8d8nd0mcmjX9drZAr86WBYsEZNF538PWc2OhDX
L0jTmjjPhSO/mvU0BOfroUz3CbSccVzBr3N0aD7akBaLfutGEtkcQYeHt80L
C9BXUvztrKJw/8VnSLwk8k8nHsdE0+G1XsOjMfSKLw7SNXF0oDyruSeKz4Ov
ZHqOTyXSQdsi8ftmdMI+av3mFFyPqd1BB9GMo7XrrFPpYPO5jHsULZWw2y82
DdffUiLwArrzyb2Omht0ELHc9+0WOnl4w7bfWXQ4JWt25wWaJXk1fEseXt/7
7SVjRH63RL91Ph2U2ycXL8Xn147D53bFFdAhYevl22rouEt/4p8V0qFm48rL
VDT9oduX3w/o8OSPf8sJtNSHj8aqZXQgf6piJKFfifLSbcrpIL79s1IZOmFH
83RcBY4nN7Wvh0acB2RIr63GP/80kiuEz9fLIsryp5/RgT78VKCIbinctnBr
Ax3K7MMEJuiYnkwb20b8+YXb44nnc/JCubL4Znx/WPW2RqMl1C8tq2ujw0fl
5x+L0K3ceS5/OukwO7j5Thc6LtTn2dZuOjyzWLNxBk2582XNoR46bBfOJK9h
YL7Lziehlw6MvFKV/ejmOa9b6z7g/I/xiu3RFzdbbJkZxPn0jhw/hzZnVJ/d
NkKHwd8mb3PQS85ovz80huMpRnsT//7QnJOvnThOh8g7NjWf0TGt62Lrv9Ph
rcXDKlEmCSxnkj7PTNJhf2Wymyp6yQYxQ7VpOkg+nW0yRzdaBl+zm8X5XTHU
44KO9Pn1K1GIAXkhtNQo9MEbxygNwgxgvNgnlo9e1NiXN7uAASblBaov0M8n
mfPURRggqXj97wiRV3ghsBdjALtlceAiFvY33VeSJM6A+8k/720kzoM58UD8
+TIG9JN58Ybo56mbnf9KMyCtbddGO/T52rRqdTkGlM0mOAeiTb5JyR+WZ8D8
u45WqehFKy+cSlZggE3D/bll6AYDoebn6xlQrOXJ6kRHup7c9G8DA6Zf5/An
0AeTR4K3qzBA7QZVcgkb81XWbw+rMsA18Lj3JnTd53aty2oMaLb7e9EAHSZl
eumFBgP89/9lWKMN9/43/G8HAzKWuzb6EOfLOGnu19BlQFCH2c84dE1s7pUj
egw4HHK5MR997vHqn5eBATfX0Ji1aJPBOItGffQd70u96IXii3KEjBnQunOR
z28irxMwR9OUAfk1wsskOXi/b/ed62CO13/YQaCC1o9yLEohMyBeWYO9nzhv
pqRHrInGgK61R4S56Ke9VIc5LAboOv6zcifyInUVmlwGeEj9dSbOnzHU1JNz
FDBgv5HtxuvE+TVW9z2v2DDgnJxyfDG6KmxjY5MdA1YVU+49Rwfdu7phrgMD
Jnb1BPSh972RCNRyZsDMq/qZSbTQ/LDXji64/sXSm0W5eL++dWb7VTf8+bnV
i9aig9nukS89GSD1vTFZC70/ePDjXC8G9Jbt6DqAnnObt3eHLwOiYmdqifNs
Kjuak538sW/xakd3dOA/w4mrgQzotr1aGores+nRweYQBmx9feJhEnqWqnZT
OIwBPdbZznnocr+bf3dE4Hrqabx4TOSz5NjOUQxweizzrolLnId16V5qNAPs
VehpvWih6XmLW+IYsKhrSHIC/WS9r/28JAYskW3VEuaRwN/8a/nOFAboGEgu
Wo7e7WUvczQV93NhdqQiejrttdu1NAZYVMdUaKIfNlg0tNxgwIL2l5kGaN8f
1evnZzPglImtDp3Ir9bx185jQM45wwA79Kzxnc6j+Qy49+u0pwf6sft6tesF
DHiycJ5sEJG/kny+tZABP5V6XC+hdWrEPswvYUDq0wUnU9FTX4J365QxYJYd
uPkWunTFVMKxcgZ48w7ElqK997t8vV7BgBPGtrk1RP5Yv0lbNQNcrtS6tRL9
E1gZC2oZMNx1evgd0f+/F390GhjgE+ov/pnIf9rHcGlkQJ3Si+FJtPaykjtp
zbjfjR3c5/Lxfnv3FlJ7G86nl0WeGLr4SLrtwlcM2GcUFLcCfTJa+pFuNwPG
jf9tWY/eUXZhuWsPA2yX1Z1SRU99EHJN78X13//GbSe6VOxUbfsHBgR4aK/c
R+R3flYgDTHAXP/9SVO0lq2N764R3E/sl4E09ERER5vrGK4fi7Sbj75XZKqa
MY7X9+l8tj3a/d1/5zq+4/vlEa36GHo7SauX9IsBA36HL51A/1DP09k9jfP9
/sliP6I/b03c8Vl8f1621g5Be5yNH80QYsIqO2OpCLT63UVGncJMqPx1MiMa
/a0r4PqihUzQk/78PhFdMPfH1G4RJpgHZjVeJcbf4kR1E2PCyQucExnE+Mx3
t26IM4GxUW0om+h/hjb/1TIm2FPW7Mon+ufWWYnIMMH/rLPffSLfpleqJ8eE
wAfdt4l/b1ebvS/hLs+EnNfHXzxGf9mgfDRTgQk6A5veVKLzyalPX61nQsFz
0utnxL/P+0quXryRCWlnRZ89R6tmhnntUWFC/UKtjGYi3zjT7K7KBDGTYJcO
ov8vd5Wbakzg7/6xsRvtunYopEuDCR+7I1reEfmD/J7FO5kwKmvk/AE9eqJl
x15dJrz+qjQxhM67ZhTtoYfzQVNxGkU71T36dBOYUKZLezmOVplQ03+tzwTt
1DTFn0R+ZdZVUWMmXHaXdPpN9DdcObnXlAlCd3OuzhL9j0dbepoz4aaZ3X9z
BJi/PD83i4x99u1vmY/+VOU7t5uG833OsHUROmf0K0+MxQQPCZcqMbSj9OFi
4DJhw5vSdAm0EnQvOSFggsEbZTcp9LCTpWO2DRMGF5WryhL5uKeV3XZM0LU+
2b0K7VSus3KJA/Zro5xSQCsP3Tmxzxlf35o6R5HIiys2nXBhAufPqdMb0Td1
L2/McWOCRNp/Ayrow/ZLgt54MsHXaIveVmL8iyHdS7yYkDL0OFQdPVgypbHf
lwmxfu6PNInx+1yiTvrj+v490LeT6L/4w2BOIBPIDkaTukReiw1vQ5iwpODI
tB76o1Xj5aVhTEhtzRsDdEb4/u/7I5hQUyfZrI+2vV9idiqKCWcjr6Ubode+
3ZKVG82ESRmLQwfQ/fMz/r2NYwL18FpJM3TmNhmOeBIT5hxfcc+C6M+JvK+f
gvtxm8ZeCnpdyBxRr1S8nnT3xzR03+1Th/PSmFD6X5syE53e+flJzw0mKJ7l
hLLRNkK2KySymVA3OvclF71apdPdII8J7769JAmI87loB5975TOh/FKFujU6
zb9C8VYB7qfK9gO2RP9srYB3hUxoDBGl2BH9W/JeSZQwgdniYHyYyE+vUTcs
w/2aNbjFAX1NMSHCu5wJ3X/D5zihBRYiA7cqmPC306LGGb3K+4ze+2omSG7W
9j5GnCeW/iNRspYJ4b8M5FzRV587jRs2MGFA++St40T+57sDPo1MePu5brM7
0X8N/cbtZiaYicEVD3SPSf3M+zYmqKd0//Yk8h57mMteMSHjUrLxSTT3auFd
o24m9I34hJ5Cyz5TXuTbg/s1N6DAixj/a+qh/F4mHKvLeu5N5GWXPe79wIR+
w4kOH2J8/XCp5UNMCFpj+9KX6O8y62o8gu8f2veS00Q+0aPOd4wJ0u9zLhHn
n12uGFp7Zxw/XyqDmP5o9gj/dN93JphM+YsGoFcsb21f/osJjsGp9wh36Blv
NZnG67HqNTyDTnZ4HHZ6Fj/fIozqCbNj1PvuCLEgc0HzrkCi/6Ms3X5hFsxt
8Usl3DWwMl5qIQumh82+EE5eEjNmIsKCfnPYGoRmaC8w9hNjwbp/TAFhqUOn
0+6Ks4A6E32acOuF8d/9y1igZPglnHBC8WGatAwLvF+7nv1//n337QNyLICH
ku6EVywiL/CXZ8G1gdcHCXdsr7EuUGBBB++p1P/zfN2HH9azwGRNaxPRh3ru
rqTMRhYEbRP2IixRoHjMVIUFKlGsJYRbXl+u8VdlgaTOy3jieqOFl665p8YC
RU1nEcIU1VDvAQ0WeJxRPk7MlyTrd4vMThborRKpJua3NdB180FdFnQvXrqA
cEzeh9AAPRZUWu7UJtaD0s5+dw9YkPgpmEOsl/jfxp0f9Vmw+s03J2I9mzbq
x6wwZsGeDaFOxHpHU0pHDpqywOBjKofYD+TTqgZnzFlg6ulpQOwXiZsZqffJ
LIil3txF7KeWJplfH2ksaB45bknst+ipSLIsiwXKtnvDTqAt1s3NM+OyYPDe
sg/E/hQz8xIOFLCA1D16iPCLk6P8QhsWSL9qWEA44rrtg0E7nO/s/CZif5vV
dy6Vc2AB80BCGWGx7wedzJ1xvh8HNRBuWlVZFejCgoY5nn8JRxntWFXkxoKB
FU5M4vXM3G6dHPJkgbuwfSthkRSFl3JeLHCutvMg+tVXJyhb+LJAwHPcQfQ/
PyYSHOSP893kvpq4vgMygW+KAlngrxCoQly/yL6fmsMhLPjJiOMS8/PC2fni
yjAW9HneukPMX0T8+yGLCBZMnanbQMz3gSf0fcFRLPAJHKki1oM0XJ9SHM2C
w34SIcR61kns/TEch/N/Ws+B2A9ndxWZr0pige5Z1+PBaMPDm7ItU3C9bmRe
CUXPv3RNKCSVBdx37z+fI/Kly7gP0lgwCwo259Hh/eGFn26w4GHH4akLaBPR
v6Ly2Sx4nV1QdJHI7/A8Qs5jgWG1UEIMusZ6+L+QfBZEaDIvx6ODzwtkSwpw
PUn3KpOI8QtbPUYKWTBuLrHkCpHvMX4hX8ICI0mvgGvE+AvKlShlLBiz75fM
IPqrbT8TWs6CQAbtOfHf7w252V0lFSxg/6jPzkXPDV21/XM1CyhUo5x8dGV+
zIXVtSyYF1T34h466NWCj5QGFiTHkqUeoGGO356zjSxouvwuqAw9Z/O3pNJm
FsjleUj+h66iH/n2uQ3n95VobTXRP+CN6ZpXLEjbkX+9Dr0vh5xJ7WZB41va
1UYi31oze7aHBRPvhcpb0RV/dFkPe1mQwiya04UOUCooGP3AgmGWq3MPWs9S
SURhiAUZf7b+Is5vnPVOsaONsECVO5k9TOQzlpafG2NBauRTvy9E/xeh0mXj
LIi+ffnkD6L/5O/jY9/x86b9ZOw0+u+a4/UKv1hQt5rTJmSFzwsHBtbRp1ng
m62vvRDt58nxC5tlQVSEVqUYWje1qaNMiA01A1tdl6N/P9Pf9kWYDbFt2/au
RJeNl4avXciGkRPamuuIvNzWfroIG4KHTMw3ofUMbuwKF2NDiqlthBp6xmVF
wiNxNqx4EvR5J5FPivryZRkbAg/lue1F+1TONVknw4af7Deyxmidz17pDDk2
7pflQxbE+MvHpsPl2fCimtnFJPJ7DtEfK7Ah0T99zIoY3/FV/tf1bDBZ/nOD
A9E/1mzh+o1sULhNCT1O5B9V2jBV2CDiXDLfG136cUfZeVXs67nhViDae+nt
ZeVqbLj/5dqJ82gtnbUu4xps4M5deygW/fNQ4rP1O/EepOO25xV0ceRiBZYu
Gwxi9udmEvkHgT4RemzYKuifewet3fuztRzYMHAoMrAEPbXo6JZv+mzY/wLW
VRJ5jd6zisZs6Kz+N9SAPilgvGeZsqH0RH1LO3p7WIP2BXM25Itce/8OPVGw
N/YJmQ3y9/0lPqGLuos+f6OxYUmyo8N3Ij9PxVCJxQbZEau+WaL/1uvX2Fy8
vk6bMyRr7M9aju9LNmhFuu5bhr4fdJ7ynw0b7uiGb1yNdr/1N2/Cjg1SknfU
N6HVOzznbXBgwzr9XmtN9PjfYQHHmQ1G/1bf34suULYqiXRhg7e3s/JBtBu1
TbzCjQ2cvqoqJlrNz8T5uycbtrsoBx0ifh/nZnn1Bi829FlesXNF33u5XZ7r
y4bx8pXOvkT+d/apKH82+I7mxp9Db10v31wRyAZTCaMPsdbE+bCxm36E4Pwc
GmdcR98+tTBkYxgb6mVyR2+hXdL83nIj2NDOm8wpJfIN37QuRrHBVmN+Qg3R
//uRS5XRuH8vr69qRd+Rfzv8I44NNoWy0EvkjSn7lZPYUP6ZJP0FvcX92RVe
ChvUX33Tn0GPpOz6eTGVDXOXdNSL2JAg92mBRVUazs+WwmxZtPMXpZyfN9hA
bonsUUZvWXFlzqZsNgynHTqqjR7bJ87j5+H67deimKBvHz1bdCkfx7Oef4lN
5BOmxaoL2OCa06bohN7033GHyUI2+DSlSfqiPw0PVGwqwf0U5sK+gM6R5MoJ
ytjgclF38iracfdLz+hyNiRcJ43eIfJHDBqrK9gQ6telU4keufRww69qXI+R
vPdtRP+HWwNVatkA9wJ7Bon8hxuvBQ1sELvG1ZhGK4vJasQ0siEvUKdPzBbv
t3dcjHzazIaxLauH1qJv2ggP/mrD+fNdZLgDfSjCe+/mV7heBjPTpmilorFk
q2425Dr9ItkQ+Z5DEzE9bFBr/ON6Ep2zsOtgTS8b6AwR1Qvow+rmN6c+sGH3
6Hr9dCLPq/q7eYgNTWcO3CtB94fuZFuPsCFrjp9XEzrjzu17sWNsWO3wOOEj
2rZr7eJn4zh+7mLRWfS6uUn2v7+z4cdT5+7lh0gwsFn0yZZfbMgo6xZSRd9k
BMnYTLMh+SL/jCGaf2bSLW6WDQ0m3xhWaOncow3PhDgw8eNyqBe6tbV3/bQw
B0IzWItj0JdnGP6qCzmQYr95JA9tteF5p40IB5So0mtr0EpkUIsX40DFWdmC
9+gRn+LzteIcaJHfkTSNLrih8mF6GQfsd7t0Stnh+7fx+u6tMhw4sLDCRR29
+9fyRFs5DszL2SYwR48oRHyNl+dA78HyTCf0ZdN/JnUKHOhe72xwDm104kTG
n/UcuG+/c/cNtNi1T3+2bsSfN9oQWYFurbViHFLhwOUF2prviPy3tjsJqhyo
/+CiOYO2WnmAVK/GAcl19ZFy9tjf8IntjAYH+kgH9XTQI64aj7bt5AD1ww9D
NrogOWe5nS4HzITqsrzQJ6vkXRP1OMC/X2OdhFYcja2tBw70WH51K0G3SpHW
zupzoGu7UfcrdNBef181Yw6sfvj8yhTayGmizc6UAwYGQcWyh7F/nINqkjnO
t47jxl3o1sdvzzWQOTA4J/gbH508SOmdpXFAQaR52Rm0lXitjjoLr7+KdjEd
rai7O86ey4GO60tsn6JH7O6NJgk44C07N3KI+H3GqA1Gz204wLm1beniI5gv
uXL9rx1eb3vyyFa0WJ/4b3UHDoDs3tU0dJnIOephZ/z5f+vzvNBBmn9uJbvg
60scuHgVbWTlNv+FGwdWvL/bUEnkwz9a/fPkgOFvjvUQcR7uPW7pdi8OaE+a
mIk5YP83LyWO+OJ6HA+I0UAL5hsevezPgcdzZ7Zy0Yrbyp6+CORADblaMQg9
wt62WiiUAz5/Ozxy0AXBmV4aYRwILNKSbUZb3ZZtORKB87FmQGYKLdZ5USUl
igO+X/pdFRyx/z/h0MZoDrA7NVYfQAdt8ukRisf1vNil5IE2on3ZoZnEgaKW
1rNX0GL+dtEOKRwIt1bcU4Nuzer6lJLKgWvTTRZf0cnN5vpNaRwIdmovkXXC
/tNVV+dkcuD8qR0+BmhFRe1JzWwOlH+djD2OHjHPt3TM40B/lsz8K+hkr3W5
V/I5cNY95eUztFF60tyXBRwYVw6amED/bBDlzy3iwPa8Rpc1ztj/R1CxVgnO
b2fQPjN04OpfS5zKOLA15rqLD3E+r8kxx6vlHKiqVp7IQot69FW+rODAa86a
l+3o1ivMlcJP8f2lf3ae8FEcv+b5iR21HIj15MeqowVfocmpgQOlu0I8bdCK
sg82pjbieBfswy+hW/dvDmpu5oDLW7mrT9BBx9K6hdtxfIUPAWPorYlSmjtf
cUDu9LGVq45h//8iopy7cXx2sbspuuzTv8HUHg4c3vg4yBsduOwktPTierHO
HMwizv/VG7k8b4ADzdzZpja0qIP1951D+PmSrSk6xwXHj243OzqCn0dF64W3
opPLDmRdG8O+M3WFXLRg4Mm/lnH8/PmzbnUYet0STc78H/j5sFVtfyG6ZWfu
fe1fHGhY8XXNe3Sg7WrRY9McsNhtVSLiiv0vxB2+PkvsHz/SDvTPItJ/rUJc
sDhgvMwWXfbOf8WCeVxgGj55dQEdSPrurrOQC6S094wHaMPtjs+PiXAhdTg3
qhctyu9RTBPjwrWClWdEjmP/s9SANnH8+UgNFU108t3aVwuWc2GTxPhFAVrw
ere6rgwXyrss88+hRYXvR7jIceGFP+XsXXTZlo0DafJcaEn9Lt2FdmRe1WtX
4EJ8l+YhITfsHyiRtFCRC5TmZQ7K6B+558Z1N3IhetMlJTK6rO3PAVcVLphd
uJnqhQ6cdbuRrsqF9muMl9fQhhsHZ9rVuPB26bWyGrQohcckaXLBN9LfehTd
4tt8d9dOLsjXTJRLupMgMdNw0XFdLqQfm+nQRguayg5l6HFBU/tythVadGrb
4w7A/Pva7aHosrU3pRYZcIG7KswrF+14UO74bmMu7LjVcbIJrXryUt1xUy6U
mt5X/Y7+cW3euhvmOF+PV16X8cB8nc/pTjLOb5V4wy504MSX9kV0LjAUo+9Y
ow1X2W/VY3HBOTfZLAQtavQ6zI3LBb9VmzKz0C3HLfpuCLgQYQrF9ejEy9W6
r2y4MDW358woka/Wjhex50KwzF/hpZ44/mj+mJ4DF6j8jH3q6Azp9cbuzlwY
za7TpqEdITkt04UL2m3HP50gzj92Fpt+5caF0IeJtEQiHxdMW3wCr197t1cJ
uqz81+09XlxYq2ZN70IHDh1b4OHLhZHgvyNTaEOJfuub/lxIk5LdJXsCn3d3
sR52BXIh8GW+gQ66xf6FpGgoF2RTHi3koAMv7ju2N4wL7rb7Qr3RqqUPajwi
uNC6bE9ZErqnb/OarCguzKYX5D5AZyxO934dzQXxf0nUDrSjlnSraDzuD4Xv
Rd+JvPWFzZDEBfbfimaJk9g/XOisZwoXimOFsrahH94/+S4rlQvm3QWa5uiA
tyM7u9O4sKW92c8ZbbjAJkYskwsPg6wDwtAiah0jkM2FxkGeTia6hWNqcCKP
CymLavIr0IEh/6Vm5+PPT1x+85Y43zlf81d3AV5f/uuqKfTbzlzykiKcL6MQ
u+WnsL/Qmrx9JVyIbEwo34Z2VIkXPlnGBX+GeIspcX4zfZEgp5wLPhPfUg+j
f/gHPHhTgfvhkY5iIPph9velS5/i+PWDdinogBZHp/21XKjUnuIXoQ3/9FSd
bMD12OCytAktokRbldvIhagig9NDRN6i7uTbZlyPeQFpQl44vrfey6XtXFi0
e8UZ4rxoqYz7yvqvuFATLCmzHf32+cbgU914fXOPOZqiM35efZPbw4X9w+s9
DxH5NZJaPb24/w/p7PRFqx4Iuyg+wIWq9FtFMegJj5kh/SEuBHT7fM5BP7zq
vs9rhAv2+2+8+Q8d8GwwJW+MCw0SG892ehHnr/N+9IxzwTFk3vAoWkSuxVzi
BxeOtOvOE/bGvL5RtsEvLpAN6l+vQDu6PBLynsb9IHXXcStaKkmNe2uWCxMR
nwv00W8rbha+E+LBzVH/+2x0xoicmOQ8HliEHHZxIfLLo48YLuSBICW9Lwit
umd+hbcID6IOREkloiccfGVvi/GgNyRBgTjf+mHMV4/34jzw8O1RfIIOeIQb
ejkP5D5t2dOKNvz4WslIhgc5C3S9Bon8EsszPnI8CF07v3kana79tOu2PA+u
hl80WepDAvIhne29CjxgX+jsXY+WirxzYZkiD+J9epK10W+L13802oivd+OG
mzlxHvb75D2+Kjyw5W5yPIQ+smhJcr4qD1Z/dT3jhVbVCPnWq4bXW3jiQSR6
gj9lulyTB/undcUy0A/PuWQa7+RBkVRVSAk6oKB/1leXB8ARkWsk8t0s1h09
HmSsWN7cj+4WbizoAx6I57y/OYWOUN0vImXAA22+y5UlvtifVWJnYswDw4jy
AkW0VNCW8tOmPBgMa/6oi+7OS5e+a86DPbeydCno9HZpt34yDyZM4a4D+sjf
C/VSdOz/JFU/AK2qPGf9ARbOB/+/X/HoCcopPz8uDwr8bz6/hX54+nPHXQEP
yn3J/1WhA27abPtgw4OI2xWtr4n8y45waXsepBybnP+NGH/KtP+AAw9Glk+w
Saex/7qKXf7OPJj9V/h8DZpsppVQ4MKDjvDdVjvRUqfyvnxw40GPSKS4Jbr7
+hoTmRM8kOjP6D+CTq+PTzf14kG7c1B7APrI90V//H15sGKu8mAiWlX+DP2e
Pw+05ifJ3EVPGP3IHwjkgWRrk2MtutTNaeGKUB4sqX35+j3aMeWdzcEwHszX
T3GeIsZ/SisLiOCB0c2tKyX8SPB0rG7Z/SgeXDOP+rwJfV5mj8vHaNyvVx+8
2Y+22Ff4bEU8D8wm8j7z0FJHlRXMknhwu8B55Ul0d3yqz5kUXC+dSeeL6PQn
km33U3mg/MW8Oxt9ZDhsy2AaD3Zv93CqRKtKzp6VzcT942i34g16YpfHe7Ns
Hkj9XDv0A512eEg7MI8HebvudCzxx/m7xI8tzMf9kU4aUEbPlrZ8HizgwbEI
dUl99NN+I0O5Iuwr2GQjQJ8XfXzNvIQHM2fGG73QFjvUpwLLeNDHDuPFoqVs
sihF5TxYZfmFlI/uPr/y1lAFD3QblDpr0emF0fNWPsX9tn1rdT/6SM98K4ta
HjR8Xdg8i1ZdeLokqIEHdUcLZ1YEYH+1cfHiRh4UL1U/oIlO4x52Hm7mQYxh
ULEl2iK0u3plOw9avTL3HUXP5lvKW77igYvElbFz6KpXT08Fd/Og3v/wwwz0
+Tm6zcU9uP7K824+IfKb72761Iv7OcCroBstxVAMWTXAA5Gx/95MorsDLr+1
HOKBb2/PhmVncPycJTtCRnC/17bEbEMfaQ259GCMBwZLr64yQ2+ZmRr+NM6D
mo16tY7obiXX/fI/8PXPFMecRZ+3/HCF/IsHqWHz/TLQO3zYP0OmcT/fUT33
H3o2o9GiZJYH3Ue2FrxFV73YnzMixIeTCqTp30R+smTO6nl8iDd/ZCcTiP0V
VHmUhXw4YmMypomWMs0oChXhQ9rzu4lUdLenzJJSMT64z52wdkOnpUY6fBbn
Q7j30gPEeemHa+dUrl7OB7EMEvU2esu3U3JUGT7c/N7j20Dk5UY9z8rxwbv/
UvUw+ryBbWOpPB/kBlZvWRiE/V07N4wq8OGO64UiJfRs0sHANYp8KJ/q4Bug
qyorXlM3Yr/ffxXt0Oc/a2mcU+GD9vACsWC0hdStyIeqfNDR+7KcOD9daq/C
4KgaH6bdindXoLsdE/YqaPLBZYYf+h6dFitymbaTD0qcj5//og8/PjNxTpcP
4nMsPVcHk2D54I+DZXp8KHVNkduDrlrqfHMM+CAiX9cnCCa+L/f+r4IBH3zC
uur80Tvs6Gy6MR9+bnrxMhU9G1l/L8yUD4evzp0tJ/IP9ix+ZM6HLGcvj3fo
8N5C+y9k/HM/O4d/aAuRTU/W0vmwIihddG0Ijq95TYbBQq9299JHdwuWuYdz
+dAT2ZF9BJ0WFt7wSMCHCNnWVOK8dIt7s+u/2vBhap0z5y56ttvDf509H5Ll
0rvb0XnzhjsZDny4Fuq79g/afatA7bwzH1p+/VZdF4r92a3nH7vw4YH8eiFT
9GyQ8Yevbrhf7v9O8kBX3Xq8e/0JPnwKDfp5BR3eoZ7I9OLD1VNPVjxDm//L
+nreF+frdNGcb+jlm1YdKPfng+oVh4JVZ7E/NSZjPBD3y5c3igfQaX4LZtaH
4nxnSFmfQltknWawwnC9f6ywzkTPvhy/ExGB66k9otiGzvt9mPQkig/vmqMK
5p7D/uvf2H6L5kOZFmmuBnqHOfmRYjwfzo4LZO3Rs6dqlrOT+FCZGjeZgK5K
03W9kMKHxNH8y3Xo8Ia7tU9S+TB87d7cGbT5D8W1E2l8MD1/Q10tDPuvTvFV
yuQDKS58w2F0t/HSdnY27rcHh/tS0OHuoaqRefj++bf3UAt6x5Xf5/7Lx/m4
uCqXFE6Cj09deycK+OCXIPQA0Pi3ic6GIpwPzrdwH7T7Ck4cp4QPAvUfawvR
O/Y3jUaW8eFE+JKgMfTsUX2jinI+pL4xzFI+j/0TSq9/r+BDTdn1GHt0+H+q
vzc85cPFurX6xPnV5p8yqNxafL2ylrJ354n/P8SK21EN+H5hF0+tisD87qj5
lY18iPVvneGh3Y/Mtf7RjPtDZlvtFfTqaK/Sje186NzQwnqL/vhwVIL3ig8J
T57ckb+A/T/YHr3YzYf2eX+fW6PdxF49rezB8bYn3CXOS96x02z1z15cj9gI
ziB6xqbSS3mADyahA/UqkTh+xI4W3hAf1nnnCrmhw4tuqVwa4cPuifezxWjz
dwqhVWN8MDh/sXIGvZyU2PNznA/1g48OGkSRoFJ98c5NP/igUOt6NRLtxguM
5v/ig9vv/MKOKOL7cj8/XZrmQ551YMyai9j/jrN+9Syuz5dRLWd0Xtf7q5NC
AmjIn04rRrvNZUxumieAopKC1jmXSKC1pcFSsFAAsTrSzy3QM4y9udEiAvD2
3B5xFV11pmjuUzEBWJWKin9Gh+du4v8SF8Ai19t83Wjs33atWGW5ACTEZN0i
0DMzy5ZayQjgmwLX9A06b8N5xxg5AcwYe33eEkMCDvlv5VN5ARzR8KadQa/2
9Vw5pSCA/dn2wa3ojzeGT2xWFECwr4H3hljMNwqarDYK4HfiGq3TaLdfrRtj
VQRg/nu2tBmttdYkqEZVACvuDQlvjMPxTcu7p9QE0No7IBWArjqxXXOLpgCG
y2e/dKDDr2VHWe/E643WvbQ1HvvXrRqK1RXAbOGNyTD0zLcYeKYnAIPEfUr9
6LyVC1N+gwCcSlet1EsgAdvQ7/sWAwEI7uh1JaNXH/9mZmMsgMnV+fyf6IHk
I1lxpgL4W+2ZQ03EfNWbf8/MBaDrnPKoAO02SuZMkwVA+bYpcWkS9pd+dl+V
LoC+g5u1j6Nn9u4StWUJwOdMdvpLdKVTweF4rgByM7Nb1ZJJcC5O6b9aAc7H
oObzWLRWecqKPzYC6A5lX/iJHhhc6rHVXgDPXq5cxrlMgljxs89tHQSgtCX8
UDmarTutmOAsAEeJbJ91KSSQtz8eUOcigKlFwexw9EDUwKs/bgIwKlz37ws6
r4Sjvu2EAB6Xx7owr2D/vqaIQ14CqBx9c+MJWmuxwUCCrwCapEkZG6+SYFrz
oV69vwAOKa11jEFXWm1NmgkUwHwp9ck/aLfwG+PbQnE+fu4zc0jF8e+vMLUL
E0DKsMC5Dd34JupGYoQAUj0GaHAN+88Xnq2PEoCaQqb6HTR7mzdzNloAuyvC
LOSvY54zdlctXgAWX5QnotADwYcW2Sfh+IEP9gilYf/brw4lpQggz95Y8wTa
rdPscUMqru/7idZPaC2hKqm/abgeEc1ytunYf9PO4+qZAhhhTC3uRlfSbtfZ
ZwsAwoOz6BmY91+7LjkP90952AhxXqx8duLp5/kC0BtW6LK4QXxfbnHH3wIB
PCE7HG9Cx04Hbt1eJIC6hBMFlpnYX3Ey7HCJAAxvH7rSipa3ONqXXCYAs/cH
1YjzTAa8enVflAvApNn0eA86N50R/69CAP2nfNmHs0jg+rxhbPtTnL+1k5+/
oLV+7jU+UiuAp56vN/lmY//VxWmXGwTAdQLJhTmYN1GZftGI7xea8c0ENNvj
Ok2oRQAur0U+KOWSYP7V5fka7QKQms5+XoJ+UXN+gcMrAaiI7LY+mIf9v/61
TunG8YoHUnvRbNkTDxt7cH5n/wvzuoX99T9JzukTwMVdo6vEb2P/Y1bHNAcE
sGdNuCAPnZvYVuMwJICuO/cPGOVj/wqTNVdGBOBmfKHvA1prpNy7aUwAS1LV
lULukKB/mUbrnG8CiCqrWa54lwQxejmbtX4IoGqOY8EzNDjIn3X8JQDnzTpT
zgXYPyb23ZVpAfCNuaPi97B/2ULtl7N4fY9HI0vRsQN+MXPnWEGCiWS37X3s
v2RiRGueFfQKjbWJFmJ/bQcDp4VWkEG57vsQ3W/7NvWqiBUc+nuwyaEI+1+g
/HopZgVf1kq/lCnG/sXPyMIS+Odb1/rXE+cDvd+Vt2O5FZiNRXf5PcA86Z6w
s4wVxJ4536degv23bxCkyllBmmBb8jAa+FceNMtbAZuVPZNWiv3PiYvPW2sF
OvHSS3kPsf/ds047Fa3AKi7jpXQZ5l9PVzlvtILQze572tFMYbdV11SsQOlC
Di/uEfZX/XiyRdUKTmof30h/jOMzuS/nqePPS4ymS5dj/8CXytqaVqBnZvS8
G+2aZxB8dKcVuJy6eSPtCebbH765povzcVJ9syNxftTsVq1WPSuwDZc8pF5B
At+NmRfn77OCDn13kxk0UGSHtQ2sYHfiqXd1ldj/9MV9x4ytoKrmoGJSFfbP
FL5y3dQKOt3k5ByqsX+T949WcyvYdFG0Qps4r2tqzHwBxQpeHDOTFq3B8dfZ
ZevQrUC5aJ58H7r/YJeQC8sK1O1t2kueYf+T5tw0rhWYdETsjq7F/terCtsE
VuBaepfhXIf5+p1iC22tAGT+rDGqx/4Tt4/o2luBEP3ylfUN2H/VugoXB+y3
qaRu7nPsb5Qkm+5sBaa3g7I/oOe7iXq2u+B8m2zQfvYC85eDXix0t4LI6lbf
vEbsXz2ptOuEFfjuLj4e3YT9x46ecfWygnqVGWnvlzi+TF9Xuq8VbLXudLNt
xv7A3N7hbwWJwp7+Zi0kyHF+foEUZAWyV+bo6bTi/ouHj7tCcf3m3r+7sQ3H
f1K853iYFQS4FnXItJOgaEglOSPCCijHde4u6sD+EmnfOqLQY+67Z9GwS+rg
ohgryFO55D/RifnDEZm743H+qqs8Pr3C/hf/zR5PsoIDt/es6u/C/qUnWDdS
rGC/lpbv29fYv/9TQWcqrsfC15Fd3dhf1FpEJN0KmhUF9M432F+r3U4v0wqW
f/7R3PEW89YHyt2yraBFvH3uqx4c//wT6cw8K/iRtXXk9TsSjN3XcHuVbwXB
K3TC3r3H/m9z6kXuWcFTFeXugV4S+CxYvX5PkRWYz6p9GO0jwR61OD/3EitY
IHI+Y7If+3NJnZll2E/pyIq5A9g/xH9bV7kVNPj/NVj6EcfPnwhfXGkFoqnh
yqsHsf8rh/49T61AxGFX9dYh7D+nZ5dHrdX/KLLveKrfKA7gZlyRXRKFkhGF
Uog6lEQRSqS4+5KIZEVWZhpEMiIjMiK7EFIyo8wyEpESiVA2v/P78/3q3vuc
5/Oc53zvDdwVNRLWHsX65U2j05us4bmZIafZT06IOFP/u7sF++HZbyW7Mazf
R/M4dxu+/92zEd9xrD+jIOVwpzV4GCVFRf/ihMK2nUvOn6zBf2vUcvYE1r/0
8MyTXmsoVfSTqP6N9UvzP+vpx/qcLqx1TmL9p4I5eL5aQ+UX8bifU1i/xxIJ
vllDplP5xMofrD/VqfzqD2v4Jym7wj+D9TePCGaM4flPXaiXnsX6/1k69E5Y
A0uf0Un1v/j+ba11PH8wz28zt07+w/X1dSW0Z62hk08nmDjHCbJXy6+5zGGe
jD0Hneex/oQ9HRmL2K8TBdmBC1h/XZpC34o12BW86nywiO+f2hy8gZkI01VG
ZZlLWL9o+IA2GxEY0mYW5ctY/1E2dVcOImj+ayh4t4LrO1yLzOQigopucu3n
Vcwv5vd4Hw8RDsm2RU2sYf2vqbq8/ETwe2EitspEALHx7kc6QkSg8IgQN7AQ
oEnIaN51ExGCj4le2MpKgGuHakyyRInQ5W8kuJuNADtt1Z5+FifC5cHsQC12
Akzcy2XjkyRCdpB0/sl1BCh8KWV9ZAcR5GOKo89z4PtHYl64yRDhraaRqh0n
AQ7x8vBnyxMhOnn0rgeBAOzqN+z6FYnw9/e11GAuXJ8yV8OnTITQs/OO99cT
IOK2vfjRfbgfTsu5FG4CmD3/6uZ+gAj8B6LV8njw/YNnW7M1iBAkkry3YgOu
T2iW+6JFhH3fnEYbeAlA3qsdwK9NBJ7OlbNdfFi/1fPPR48SAXZo+X7lx/qD
d+330CPCSUFp8oQAvj8/OfypARE+f326PC+I9fcK//xiSASmjnoTNmGsn+2W
joAJWsGRxLsR19/NlKB7BvPYFysrugnrN3f962FOBPH96tk7RLB+/zGjHEsi
qHofH9m9Gd//lJg5YEUEKYuKHjVRXL+zk1mQTITETbdCdLYQIH5V//wxGhEe
bXj6+4QY1i/7qviaDRGuRwrwmolj/ab7NuTaEaF28cWo1VZ8v1eWzaADnl/K
PS/GNqw/fetrwStEuDEUXX9ZggAeH6JE9VyIkC72stlNEtdf4HTxdCdCXP5c
mI8UAdi2+7TkehLBlVmHJXg71n9yZudXbyJkukSo3NmB9bvZ+gn5E2H0Ss+W
+9L4/uT+Hr1AIhhTBavid+L6jaZ7vULwfEr2bU6Rwfpn6m8/CyOCxse9ihmy
WL+41vevd7C+AxyLOXJYv17hYeF7ROA6me5bKI/vd5KJO34f++smW9WLXVh/
fMK0VwwRym23lFQoYP1v+U/mxROBhTpIe61IAK3fwelDiUSw/KvfUrsb6xdZ
XhVOIULVI6PfjXuwfu0rFvppRPAe/FbfooTvv/S94HoGEdQOsVq2KeP60efX
52cTYVYrOa1ThQBdVa204VwicNoWZnzai/WP6lZtLCCCqJ4StXcf1i/wcpNB
MfaLLd+nz6r4fk2lK94viNBoqc86sB/rp6c35Zdj/+W3/Rg8gPWHi+74VkkE
j5WkwCE1XL8s3HvTayJIdGf3DKtj/cNsnwzeEkG/Z/T7Nw2sn8dTyace+yHB
OGfkIL5//+TNgiYi7K7qlvuuieuTaMPfWohwdsCd+F2LABvCejRF2ojwJWWH
4fdDWH+R0YMTnURwyO6aHjmM9ffXTPp8wryS/Y1HgAAkDnX9wt7/+3Ub45s2
1q/8LHWknwiyi2l7h3UI8Mty+7LIV+y3UkLZ1yO4fmCs2clvRBjbdPTfwFGs
/xlPnu8PIsw3GYz362L93Tc4i8aIIBwiFNt3DOtnmSd/nyDCd9bY5W49fP8u
h5eb/+D9XXon8vE41m82JGQ4SwQ7+Yxf7fpYv6/5Zb85vC+nJDw+GGD9mc31
RYtEaN21++W7E1h/u7bkjxUiHA2oL6k/SQAln/Nad5hI0Lll2KbGkACCghvH
drKQYLbSva3KiAB/M1ofVLOS4Pq+69NlpwjQo3nriCU7CapO/mgqNiZARZvu
1Mw6EqwEF2/OMyFAEoMp8Q4nCSyFZY0yTQngtlSuL8NFgn72moak0wQwjHD9
V72eBKkJk/LRZwiwQ1rpsSUPCbYGVNJDzQjAUT52anYDCbiaJzyunSXAT6P0
5Tt8JBjaqEOzNSdAyzAxS0aABF/Cr8uYWRAg30P07GtBEshNEd8cPkeAKJ4u
lvPCJBjxztsna0kA19TwvNmNJDDj3uOz4TwBzh0wuHBXhAR/l1IfTaM1m9kI
sqIkiNBoje68gPsnvyp5vYUEpCPXqcVWuP7fa5Tz4iQQ3+bAEWlNgNdh+3j/
biWBFO2ivwORAGnbJl/elSCBy361tmMkAoQUZ9nKSpFgUC/lnziZABf1acJv
tpNAvtv+zzTa8MvWN+elSUAoob6upWD+V3su/91JAkONU4wHVFyf8/6WcFkS
zJssDNBomH+CUYOsPAnARWG3Mh3zVya4vtlFgrqMIuMldEVdjeQFRRJE+lvq
1TBw/+d93v/dTQJd6Qn+mza4/pSaV7gSCYR11fJP2hJAO2hGRk6FBNOSBKkN
FzF/0Wedb/bi/m8p2rSgOfJs/S+okiBo8KpvmB3u/8j23f/2k8B2w1M73UuY
f3d/b7gaCdrupcquovMdYkPkNEgQ6iZfVmyP67Oc3ldzkASe5oJiFx0w/xie
rxe0SDBqvdtky2XMX6Hhzr9DJLh4zNDiHVrp9Q2NCCABp7mO8jVHXP+s1g85
HVzv4mDfDicC9I/NRdUcIUHuyKL5e/Rr30Kw0iVBRQ093fUK5i/kMPHvGAkU
bv2tEXXG/LNk4iOOk8DttG9RJfrioaFj8gYkGKvpvmp9FfPvSJipOUGCj4Ld
bCtoJVvzZCtD3D/XGUacC+a/wm84Z0SCsLXtsXtdMf97zQsRxiSw790W/w7d
szPkibwpCTYKStiT3XD/L7VPvz1NgucFKzx/0SHGy2tWZiToNYr0DXYngNXI
85y5s/h5gqXVwh6Yv+eVc/cs8LzL9NtS0Tt4FdbtsiSBephUgeI13H/a98K3
50nARt5Keo7+qZZCtLbC9bI2f9H0xPxbznPPW+P9sf4j/xqdT9lYdo9EgpwN
AceOeGH+c630XRS8P59ylGrQrrdvCdRSSRDMMPwJ13H/ksdeWdNJ8H35iFMF
esdzJvt5BvabnVOtqjcBlgxeikTakqBQoGg0B90/4Fq7y44Eoj9+9Uj6YP4u
Ss61l0hww34t9j46jTC+lehAArvSZml2X9z/o/R385dJkHblgN9V9MW9JI9I
JxIwWqUyB9CGDaLSCs7Yz4+cE/X9MH+rrrbaq9iv+9eTCtCC0+E+RFecP4Ft
kxv9Mf9gg10LbtgvnE9PeqKbt7B3R3rgfW71dutDp+W/ClTwxP7xUXLQuEEA
L11P5TovnFdHs5Vi0Fa9+74QvUlAG22v/oPWdpwMW/Ahwf7qSHGDANw/W/aB
KD8SaBa3H0tGc8TRvincIEHsoeuas+ifitvu1QWQQOfStVXdQMz/TY8WKYgE
kt3Ft6PReeb3xxaCcf2SzT+G0JG/jGKiQknwuSaKZ3cQ7t+fcFQxjAROFrxM
7mjY+Haq7hYJKi2uVVWiRZ76JJLukKBU89VxlmDM/7C6weJdEtzd8OHRUXR/
58y/qAjM2y6mOhD9+uKzx4qRJODx5Xj2Bp22amtcH0WCbm5em1V0SNT2FVI0
CZoZj8YPhOD6sl+yFh/g652fHHREG1bGnr0fi/PsiYh5GnqP6WnW3fEkKOf+
ofUJve4HT379QxJw67BNcYTi+l4NF8iJJPBxoTrsR5fwBRCWHuH8oM2XUNCx
6VrP7yeTIJvxovE22ktjnrI7lQQmxOjMYrTVh0Lehsc47+pDTHvR2jSHCnI6
3qfMwPoV9I4FmYtLT0iQn/dGYdtNzP/ukHB0Ju7n8keew+ifUolvdmeTQKju
6gFrdPMLc8eGpyQQKOQ38UbnnRQQo+RiPp+aHyagg782Nyw9w3kwlr6pAm3l
FuIanU+C1UeJb/vQqut1pPYUkoA5pzh1CS2SvPy+oQjvY8N4wZYwzH/fCy9K
Cc7rnCPTB9H9jVdkl5+T4DdfJfUC+rW1Qld0Ka5fYLHOG502891/TzkJlI5v
6k1EB4em7G58ifMmcuFLFfqi+IU+SiUJNpxiEh5EnyzcGLpcRYIrBxWuM9/C
/eu17XtQjc8TER+h7ejFvltf97whgcqTf/1H0W1Ox+421uDnZTzoZqBL2JkP
UmuxPwat2W6iY+Nf/liuI8E9IWPyU7TXHrf7Dxpw/hIuTbagrd4qaSs1kWAq
KP/ZFFr73PhE4zucnyaSSYK3CbD9d3o8tQXnq2pV9X70ugCS3sp7nO9LIYKW
6J+btsw+aMV6HH1jvNHVOV3JSu14nhfST6agY7UjDJs6SBAXvqhSi3b8aLBI
7cI8u30NfqJNLrFnrHwkYd37o3juYP5M1adjukngMCrOo4IWifZkUu4lgZqp
WulZ9JKcam5THwkmhIPve6H7qybP0fpJ4MfBmZqMrj6dvW71CwnYl6sGa9GP
R2lFMYMkyGp8ajyODvLeRlIewn7W+/CH7y7mL9DL/W4Y+9NI/u1+NGTcL6ON
kODPi8r6C2gRzVOM1e84f63Dlm+gJ1sJgrGjJFAVv0fJQrfR375SHiNBbVv7
wgd0yaKP/btx/L50zvjNP3RsuPpm+gQJvO9zVYiHE8Bzx2zt6m+sn8zy4yja
quyZc+wUCZwfqx2xR4PRxW0q07j/g89ao9Dbh7c3v5vB+8BDC3+JZvf44kH/
i/N71dJ3GN3PHSe99o8E/DNRyesjCFCccro9dp4E+h28M3vRt/dv8FVZxHyD
P7hdQDu+a9jVjD+x6f86dgWhTUgB3fQVnGfcWwWeoVX/agWtreLzrviZ3Cf0
prB55TgmMpT2Bjsz3cP+21r0RYWFDNH2Gb/k0P1FDreaWcnQaMEfexpdfVxW
jcFOBonwWhdv9OP+oW9r68jgzFR7IwPt6Zx4L46TDK2P+N60oU04LA7t5SLD
IasslWW0XILAePN6MizviejcGUkAbuWWGAYPGQy46zJM0JO1IUeZeMlQOHoi
5zq6zVLnTxwfGQoqpIYy0CWTy4l7BcjA5H9CvwMdE/jCoEWQDKQ99V9X0dc2
O88xhMlQ/ubBU/kozP+ZQhrTJjIIH3j55CwajvwwjhchQ+hN1Y4b6O3dKSt7
RclwpnSdch560f5CdssWMnS+2VPdh25j3mRuI06Gu1kFfpz3CZD1oI2VeRsZ
+C7fcVZF3951Oz9eggz8gm+jKWjH6mNW+6TIQE44OxaONjFj5nq/nQyzG445
VaL3jb18biNNhnanKJlx9CZfNyqzDBlkGw/zbY4mwIKgMt9DWcxD4qS8Hro/
c7xinzwZYn3LXF3R1VpPLr7fhf4TOv0YHdtO2mirSIYR/5fJ7ejLNltqmPeQ
4biWqR/zAwLoLnc5PlQiQ6qy0T0ltNy9CDFVFTJMO+R3ENHrd55ofL8X98/i
qReO/l3O7marSob5tae/qtBtp6qlWA6QQeOaXs1vdPE3zw8P1cj4u9vw3dYY
zP+a6nVVDTLcU3zFdgp9bcOU7IeDZJiKTMSJgfk/zu6y1SJDYMPP9floUKPf
YDlMhv3f03oG0SIt2/YkABkE2Fu7+WNxfXJvn6oOGY4eticcQdf+ux/64Qjm
ne95yQWddeuU6kVdMkxcXV5NR9+S4Bpi0SPDx52DLz+hHUre3k04jv3hMxtI
iMP8DXwP7jcgQ/+RxT0H0fsG1Ec/nMD9v6+Jt0dvcpm9f9EQ+81WpzQRvcCZ
p816igyDJi6h79H9iRd/Jxjj5703X7+GLlbZ8XC/KRlObh+HPfF4/vVf9FpP
k6E6XkGOiKZeiJu9aEYGIT/Rt3fRun9Op7Ca4/2SLOKvQssGbzBKtMDzap3l
n0Cv39K4uN+SDJ5f+99ueYi/d/MCMlrPk0Ex217eAN129NAZOys8n8AkHQ90
cc88ExuRDKLNLjxP0DGXi3ITSWSwHhwL60BfY71seYBChjdSTC+ZEnD/sbIc
bVQypM8VJiqiZRWHi+zoZBCrY95riWZ6k0his8HznhvzDEYPnbXgeWRLhpYF
e9dCdO24QPkBO+xfjWCpL+hMvxZG2yUyuCiq3iAkYv7CoYKXHHAeHPO4vw/t
kK1TzeZIhqBlw3NEtMnhFftHTmQYbSpuvYne1/lis5ozGUx2P10sQm+66FzX
dpUMN57s+dSPXlhRuHrJlQycz4HB8Qj3H/ljG7s7GcSHPmcooTNlUpsfeeA8
KmRJOIf2rbhwTc0T6y3M17mBJpts2tnuRYYcx5GH2Wjd723tl7zJEHctKaMd
Let125fdlwyR1H76Ino9n55Ckh8ZjGsSP0omYf5pzD1qN8hwQXlg4Ti6Tb0i
qD2ADN+PJ39wRBe/d1OxD8L9ZAyYP0DHUJUH2ENwvkw+jKxAX54fv5UUiv35
usN3CK1754maehgZ0uqCtnEmE0BMijzSfgvP90n+FUX02vMtkfZ3sN+5T7uZ
or+e+HhoXTjOs4xLiu7o2sGI8aQIMhTLLjx4iM50PRGrHkkGpaOLha/Qt7jW
6XZE4X7yHfyH0Q5J1X/so8lgJmPKwpGC+e/zerQuhgzZtCeq8uh9jaonkmMx
b5mLWwzR3NZTc+rxOE+U44oc0UPT2WkdD3F9PdXVe+iyELqJQyIZNippLhWh
E8QkVtclkSG3JCe7C+1b0JudnEyGz2lB3HNo8rFoc41UPK+WWgmRVNx/3ym2
zsdkeMZk/0MNLevEVeCQjv0h5E46h17PXmvFkUEGyuDIrWvoiThfrpRMMlQe
enExDt22W+OFRjYZerjHFkrRxTWz1M6neL7y3prd6FsWeXyXc/E+ezoqz6HJ
ExcrOfLIoDr8qlv4MQHUb+ywS8nH+33CQWUfWmzTwMaDhfi8SnI7ZIpeexpX
01mE59Hcu+yI/gpnnC6X4L+/iXW4g67t2iDO+YIMN13zIrLRmXaNjSmleF/7
xBn16FtrAW4Hy8lAmBiaGEY73D+0vesl9mf6igxTGuYvt/DhciX2M5uDkBha
tqroOucrnFecSkUH0Guml+VSq8mw+EKX7TS664fsx4NvcB6K5HJcRpddH77R
VUOGiyr0ylB0Av+jPY61ZJASdJB+jPZ9YvGZs54MPI01hyvR5IOCN1Mb8PlF
t+X+hNZtbVHVbCJDw8q5W1P/r08PHep6RwauzJgKQjrmv6gT7tiC/eAjkSyF
nri7cpDwAZ/fiTOqB9Ft20tHU1vxfKT5fE6jM0udozXbyXDugKvHJbSvoaLO
xw7sr3lJ6QC02dCP345dOE8ihAPj0eruqQ8Jn/B5LH8qugAtxm11/HE3zouZ
FosG9Frypr+avfj8E733/gv6q2p7ysc+zLs95t8surbptpFTPxnemnxt5XqC
6xP1lggD+DxotbeSQN+aZc58PIjzKFQ9QRXtcLPijNYQ9lvpsTsGaN2t7syf
hslgmBKlRESLFSk/cxrBfg/aFnwVPaP3y5LrB87LHezpIeiuz0840kbJoHn3
V9VDdNkVcrHWGBnYP01y5qMT1omRP41jv2zekPIW7fvwI8+VCeznpLKwHjRZ
6V451yQZ6Eoztb//X7/2hE3aFO4v+qUpWwbmb7lO6NA09me8oLIoev1kdfWn
GewP3mWSEnoiwMvhyl8ySNe5Dh1DvxXZL7p+Du9ftH+JFTohd6oubR4//4xE
rwv6qs7Tq4cWsb8HTI1vo80+0SW6l8jwRFhUJA2tbi/RcmWFDAuf3JQr0GLM
fdfWr+F8W2+X0Ilei47emc5EgcSYWYsJ9Fd5445DLBQItdlksy4T83/F5dfN
SoFV2466bejMM7UKzuwUGLkt56GODvvp27OegwKK9aJep9FkH43gdE4KdG3I
/OCAVhP8q3KYiwK9Vu2uoWi+zLyB7vUUOFMQ7/AYPaNpd9uZhwIkAsuLKnRX
2w51bl4KiF8kmPaiyxgDI+l8FKj9WHDoHzphKS7ysAAF7p1fvi6QhflHnDnc
I0iBJtYx7j1osjTvL2dhfP0Xr98n0LrljbHcmyjQs1ooeREtcypQ94kIBdyu
RTwJRq8OH5o+LEoBPhth7zR0l8fCo54tuP6wTvobdC5P8Ymr4hRQ4xbd9hUd
kXp5nnsbBcZYE8bW0FcPyKU/kaDAt9+NHNuyMf/mYROQokDzbJrbIbQ6+dFq
z3YKUGD3AWu02D+Lp1elKWC/xtD3Qa+FCVrwyFAgn2Kc+wj9ddt7tgxZCgg8
Gqe8QtcWhxaAPAWCR9XtBtEZ+kese3dRYMFLs4b5KQF8vqxwuSjifqJnHbaj
za6WvuDZQ4EVF6qdLlqR8yotQ4kCZVZhpTZovkRFfm0VCryNtrMIQ88oj1b2
7qWAJYPdIBfdVZdq56KKr99y4U4ruuy81aYNByigwu4kNYtOmNr0NkONAtKu
OgSRHMw/qN1JW4MCv6s7tTXRZNE74n0HKcCuLdtMQh/N02ty0aLAV+NDmUFo
saMs7hsOU0DilMjHbPR0d8X2TEzHLPGFWSu60cG9VVsH00oWl/mHzmVR8e47
QgGLVycMxHIx/5hfcq66FEimH3mlg76qkPFxgx72G9O64Itos9fkgMzjFPze
Hv0oAq1+VkxJx4ACfp//cJait4x//Nx3ggKfObbWDqBXfe/ddDWkwN8V0Q6O
Z5i/0Mn9vKfw8w6OqSihS7PWDWcaUyBX+843C3TEodfhOqYUyIxkH/VH23R4
aX4+TQHOkjNaT9H6tvt/uprh+alc/9aJVlyZiuY1p4DyA+/+VTRf5FOdLAvs
VydLWbk8zH8nY1LHEvv/jFDtaXTXS4mEz+cp4Pwxp8gHXWbcd9zNCu9nuPRs
FvrhSPRfXiIF/Lf4BXehvT2NU7NIuB+RKjvmfMyfd/2pIxTsL7mvyYpotbTa
pc9UCnBNj8laovnU/TLd6BSIFu1nCUH/aNEw47PB+o3KdhejGyl/mbNtKUDW
8M/5is6dy3t2xI4ChRH7r/MW/P/3Qrvz/ZcosJO9L1ELfVVSmtPdgQKjRk78
9gX///1woJjPEe+L7PzHeLTaiXhythP2v5HL70b0lsEzG446U6DF/7v5AnrF
hfdl/1UKTAUZC8oV4v4JTTburhTQlyyWOIfOeRQoxO9OAVdxQb+b6MC9h19n
e1CAoOeoXI62aVhwOOpJgdcOTfvG0fpWxaJfvChAo+0MEyvC/Kcv17t7U6CB
KUjZCM0XIufC70uB9i2j8n7o6S3fJJ76UcDznolbIbor/1HL0RsUeA81giPo
Ut1znl8CKDCx/jCrSDHm3yso4xFEAWOdowdOoJ0d33fwh1DAzk4n1Aetz3bT
72koBeQ0t7wpQEvGHVHUDcM83itXfUOz7V7t+XKLArrNc46bSjD/N6XBHnco
oHP90id9dKP51b0C4RTI3nlr1gud+0tx8GkE9sNGs/pcdLj/6G3dSArsiKs/
NYC+svGx+kAUBcpXB+/wPcf8n1p994imQGVckr82Wg1EogRiKKDxinmXM3pL
V/vhnFgKNNaxh6Wipy/e+aUbj/OeK/tRO7pxVS9u4CH2w49ftiwvCJASxXLs
WiIFnF42jyqjA2UrpwWSsL9+6m0lo20q3ZNykrG/uy4QItD6pionj6VSwGGE
kF2FVvjxa37gMQWsAwyZJtC81zPSr6VToFp0J/eWUgL84aOYCmbg82FzZMtx
dFe62FpOJgVc/oQfdUOXanx6eiwbnzdCW688Rkd8uGcx+BT7eVHjdCuaQTvJ
7plLAfXNI2PLaK2FdYWCeRSwmhBVkyvD/O++ts7Np8DHmV4Ns7L//x57fb1e
IQVycrbP+KG/v9hfOlhEgaPxM6QcdOPJPzTPkv/vu37gJ3TO16f8Qi/wPshv
t2Ipx/zdGFW5pXgeX3zHFdBX1kte0ivHeses9pijzZL7Nn19SYGg/pey/mg1
1QdvPSspcFw/9lM2mq/J+IrQK5yHr/8c7ER/t16/9Vk19vOXOrMVdOVMbZPe
GwpM798ovfMl5h/q5/61BueD7ZcsI3SA+MEdXrUUiOfb+s0NzSj82ypUj+u3
dnQ8Quvr5Xs/a6AAnFj1qEMrfLaTP96Ez7+dCR0TaN4r0p++vsP+Wp8zLFSB
+bMPBni14HxJU8g6iO6Kj1cS/oDzPklsBwWds8es/1krrv/U80woOvAtb9jx
dgqUeulqPEOfP9e0f6gD16v16uqo+P/vx4HDXl0UiD0stnMBLRlwOEL4E66f
Jq2wtZIArCKLmnnduH7Bgx866JGc4p/HeymgKX3ZwgbdqO34YKiPAoavs31u
oXM+yh253o/PC4MTlnno8EvfJoUHKOATbDTejr7ClJSQN0iB54eLlP+h9aPP
6esP/X9+HoqbqwggIS/0b2gY779lwpeD6Pmq96nXRyjw5/xWXWt07+mbpzb+
oECKyArJD105emQ5bxTnKeOASio62Xs1U3+MAvLbmktr0AECZWbD4xR4IlY+
+w1Nz7jK4j1BgSFNpu/sr3B9zd15GyfxPEmJt3eiFdpGz+dP4by3jRg9huZl
POY0mMbnmWb3AgP9Z9GqZHgGn+9vrlYHoxvDRSjefykQOULWfIJO3tGxYdMc
5h+Z4lCLdi+78zJ/ngLapcpnvqEtjY7bGizi9y99/imW6v///s0i/G2JAhHq
h7Ul0RIela+9Vyhg61eudxjNyuNxedMaBbQ23WC1Qo+kqGwpYKKC1OJ9F090
4/6JegMWKpTLTMfHoHPeZbh8Y6WCbEqsWzE6nESR9GGnwka7EI42NOOv2PtN
HFRoCK00nPh//bBPngWcVGBap6FPeE0A4W2RMie4qCAwsbSwAz1XdLLz23oq
vD/BQgJ0z3EOfx8eKsSrnPQ6j67sf60owksFh+LuE27oZOfrvQV8VHjz/Ulb
BDqA40DICQF8/dcS7qdoesKfvSOCVLjxim3lLVpfOWfQR5gKyYmRqV/QCnWM
OyKbqHDnofXKHJrtvKRGoQgVvPtsePjf4PlP9n0/IUqF3Tdy2+XQBYEPoka2
UOHb892GOuj7m03AV5wKro/Hrlui3Z+tnxDZRgUVl0GyM/rckbq4QgkqcFvw
Lt988//f7/2OnZTC1/u5nUhBSzgcnBnZTgVbSWHjUjQry78kX2kqlLSMbf6A
HnmQf3KzDBVaTjV8HEE37rq0UChLxd/Bp94so3OqpZ+clKdC61cpTqEavH9m
g6bfd1HhUYPg811oy7H4NV9FKuRf2t58BK3sa5azeQ/WN2FqcAEtJMR3rkiJ
ChSXx0qu6LnMJnZDFSoYKm70vYvu0Qoq/L6XCiz6OaqZ6Mr2w0Q/VSo4rzDO
vEEn2yyuFz1AhcAgvb7P6IDl4tIiNSpwSp5qmkPT7znSDTWo0CTkKyn4FvPf
KS/w4yAV3LK7B3ejJV5+q/LTosJzJSvOE+i5U0mXRA9TgX+JJ9YG3fLtnEgx
YH9QfoUHoguuCdUa6mA/1ixMpqDvb/hw5ccRKqT7HSh9hXZ/fHOrvy4VRpkz
RvvR59SOvhPVo4JSkb7/MlqrZdW9+DgVMtklb2ypxfUpZTuMDHA/jrvHNdCs
c1fbfpygQuKlqxWW6JFbu338DbG/Pf/89URXSvyU33KKCmwS2TEP0fdLHn8q
Nsb6fjxKqUBfMrAONDKlgqJ1m+AXtOGAiPLoafz3zUd+r6GVXTr6/c2o4JL/
V0mqDvMn3A3bYk6FqddjfUfRc4nHD5RY4P6mtk/aoHtUWL8ZWVLh/lCq3S10
ZX1lxOh5KlTpXjTKQydf8NC6YUWFDe884jvQAX9UxrYQqfBVtsNoHk0PnnhQ
QqKCp6jnJfF63P+WzCOnKPj5JMcpHbRQPmVqlIr9+aq43xY9flQ88QadCiTm
k3vD0S09n/TFbHA///b/KUEXXI78V2KL/XvFfVM/+j6r4eNTdlSAk7xP2Bow
/1gO45+XqOBPY0pUQJ9TfLN8wwHnQeLJ5TNorTfXs8QcqfCx/2+NN1rC/MDZ
507YP4KrM0/QrL/+sBg7U6F3j83tVvSIX07ez6t4P+X23llEVwrbXAhwpYLW
MvXfjkZcP1uSIO5OhbDMpfpT6EuHP5c898A89y4ze6ENOx9QjD2xf7Ns0p6g
lS+a8I55UUFyE+S1o4VW11cEeFOhNjJEag09F1lnK+6Ln68Kq7uaMH8Zf+EX
fpinmL3OOXRlxcE3xjeosGLPMxmMTjb5d3ksAOeb4U62EnTA9/wtgUFU8PhV
6j+MPud1qUE8hAryXvU2Au9wfb6dri9CqcCufOa5NpozfVDSJIwKYgZkhyvo
cfWH78duYX9w/Lmdgm55b+YVeAdfn8cu3I4uoPLJbg2nQtutFHbWZtz/fFPn
iwgqVE/UWe9Du98J8jeJxPks5yHBQJ+Tgt3jUVR4EPfCIBat9WKxNzCaChIJ
If1NaImTJSFbY6iwNXqsewU9N+i4rzSWCmcmhjSVW3B9V/mvJvFUuCZwlUBH
p3ON3Bl/SAUd98RDcejQpCSNoER8fRTtcwv60j7LH1uTqGA83DTE8h7zbxS6
X5qM82u03UQNrWz9AUxTqWAl7yt3GS00c3Ni/DEVIva2X0xDz4UcjQ9Kp8KX
++8F+tA9YmvHtmVgvsNuOwQ+YP4FZTOlmTjvy1se6aOTjrkkm2ZTQbusy98f
7da32/DXUypkB9xrKUMbOv1cCMqlAq2G9cY0Wpo97cm2PCo079yTtKsV84+3
Pl2Wj/1L3ihNR4/v3sx0upAK63ZVCCahW2o6cn4VYb9rb7/Ugy6wuHsuuIQK
7QyjXUJtmP/E8XUSL6hgT4Ezp9DuN1iLykqp4Me0PBKGPrepini6HOepQOBg
HVozx4N74iUVmC/3HWFtx/1r7y0LrqRC1282PkCPdU3QJV5RYdGFVdcb/dou
U6C8GufbSM9QOTp9jfLq9BvsP/lbP+fRoffF7SdqcD7tEz13oAPzl+sWCanF
9f7eVHZDG1ZF1krUU6FTd8q6BK182tC5vAHnYfKnF7NooVGObWea8Lxad/Hv
6yTAv+tv3k28w7xD3p6+iu7h9/YIacHnZQKrTyE6/8kBackPeJ/PjYb/QYce
nG4rb8XP53C+qdRFAGJrjs+ZdpyfM0l2jmhtus2u3x34fpsre5+hpRclu0O6
qKCcNzL8C80Z/jlQ8hP298Zlr10fMf/tMcovuzGf0aKli+iWUpMvZ3qpYHGF
m5qJLjDkvvW7jwrXV9kKv6OjhuoOhPZTQe5zwuiOT3j+7v7fJAfweWresY6K
Psetee/lIBWuVGZwp6CVUv5pmQ1h3uc3L35Bc+4vGPs9jPPOT+aDWDcBBpou
xYSO4PP+WtstS/Rr4s6jUj+oEHt/o1IsOn12cOrlKNYv+e9lFzr05sNEszEq
jDg47hHswfy3njWYHMc8Gv3DjNGGRXxzoRP4vAtUaLmDVj7+7rHUJBV8Ji7P
NaEF+4OMK6ao0HPmOIGzlwB/r8CK2TQ+L7lKWXTRLeuWsiZn8P4QK4f90WkP
S87e/EuFgjTznCr0dSUn1u1zOG/lgy8soYm18vkV81QI1Tk+e6AP87ccuXB2
kQr0Q4lXXdDSk0mEqSV8PjoG9uajOQMtn99cwfsjtyI7gR4TEaZuX8PvExXr
iHKfcf3cD7yVTDQA7+TrdHS+TljFWRYa+FU2+qegoz4dvTjFSoPqVv/L/Wg7
+zXhMHYa+HM16Gzux/WZy99s56DBjaqHq2fQmx+4OFZy0qATllMi0Mvye8TM
uWhQMjKq0IweePWzYWo9DSqYyUkcXzD/M2muYTz47z+pCzro9J/WUjt4adA4
PaXhgw7x2fyhko8GJs4ctDK0nWCnl7kADWYrn7jMog0z78r+EaRB/K739nsG
8Py19LvChGlwnd/7pB1asJ31xo5NNFhXVyiYjh5jVO2uEqHBStLlNwPo10se
feaiNLD8l2chOkiAuIi9oX+20MBWwu3jGfR16d/7bonTINu1+mA4mlie+XXH
Nny/4d3QRrT2KerdKgkauDAPVLB+xfy/iR+0kML3jxZ0a6E5rnX/+LOdBt7n
1312R//kibp/SxrrLeqrK0C3pBpqS8vQYFpfOW4cnX+A83eVLA3G3Nedlh7C
/mt+E28hT4PjMZaz1mhrsrfe9C4aLDIreseiVf8dmL2lSANjAe+JNvTmW9PJ
0nto0CploLt+GPPflmv4SokGBnejAo+iB4ptFi1U8HzyLJ56o1/rS2VM76VB
2VBs2XN02pfPp2+r0iDhxum8SXTI1RimnQdoYDceclv2GwEucprmvlKjgek1
VRMy2jCR2/KcBvZH6PmVOLSSSv26mYM0oLstRLSjOev9i25r0UA9aQP3+hEC
fDmvSdp5mAaBpPjLR9AlU/+4q4EG7zcllHqh44IKys7p0GBESnCsCH1d1J4x
c4QGPQOrLL/Q1nk7Be/oYv451qw7vmP+R7++2qlHg4VR5fHz6B09D+2rj9Pg
ybR7eRSa4/LZzZYGNNCUU7ryDv2Thb9u5gQNRH+d42X9gfnHvHO+Y4ifFz97
XwOdphC8TeYUDQaj15id0ddfQ3O1MQ24tDzPZqFPn13ysDTF109RIwfRquMl
0rOnsf8FKko2jWL+fk7td8xo8IzlRrUReklol6+MOQ0+S5UUBqH7s0Z2vbbA
f+88c7sC/fpQcrelJQ3mr5EMZ9BpHZZBs+fRLp/+yv3E/G2FVe5a0YBftiyI
hL648uGLDJEGLP/YVh6gtSPDbr0m4X3SLj/fghaR0VU7T6FB0OXuFNYxAky9
XPs2S6XBzwHrD+roDuPye3fpeN4LJ785oktGXA7J2tCA85JcXzo61nPP+Gtb
Ggi7+2T0ob14x2LO29HANcT0IP84AazS0o7+vYTnQ9tx9xhaW534564DDfgm
Lz/yQu94v/mRrCP2b5iSfT6ag9pp8MaJBleSbOa+oX/O3Z0770yD6GgB2PwL
939bP+3vVRqc7d5zzBAdK8lmEu5Kg5zOSoI/2ul51YqsOw1uLpSHFaNNT1zL
fuOB+3kh3fgDrTq41/yCJw0abiy/FZ3A/bv+Zv3nRQPZD1o+huglQlZ+uDfe
F8HRWV90/yOqlZwv3oemBdlC9Ou9W7lq/Ggg4HBF9Bs6raH7+YUb//e3YaPw
b8zfKor6LwDzuXxbVQ9tPW3IFxFEA7VmBaIHWjWEs1IuhAa/Nyoey0LziNVc
rAmlgULHrbEe9GS+90arMBpMheid5JokQLuuWs2/W3ifq6wvaaBLeqcdI+7Q
QJ+5Vc8OHeuYKyYfjvX2x32NQ3ux2TbWROB9Gi5Xa0RbxUm5WUXi/EhVNpxH
a+/ul5qLokHhs+WtMlOYf03Mh4hovI8Jos/M0MvmptflY7CfWcMWA9Dtv7jl
3sbSQNxbn60QneVf32UVT4Pkx+bvBtC3N964MfeQBteEik7x/CGA41PNPfcS
adB+2fKeBtoE5vrkk2jQfPpkhA1atasg9G0yDcIYISfvo0Xs7FWtU/G+neSq
q0Yvre4cmntMA6acjuVf6P6or3fvpWO/7BmaEpnG/GUTDu7KoEGE377Uo+i0
yrOjbzNpUGXYyOeEvm7KH22djfNBN0nzIdr0xzvt+ac0+Lu5RLoOLXc9+Pe9
XJy/3oTmKTQ3v/bDXXnY/9IP92yZwfzTl/Rq82ng0GhrrItu03g+a12I/Sx1
ZbcjuuSDU8p8EQ2GxgsbY9GxtF1GkSU04B5WkHqD9loYWdz1ggYa9f0HxtFW
d5Mzaksx33NvuYRmMf/t588Qy7Eeq4F4TbRIqTDzwksaqMYpjtLQkydbcyMr
8b60507fRtd9DbNUeEUDWqd1eTE6y02Xo64a++/i4cOf0bfXMxUT3+Dzw9rI
n/Uv5p9cTlqowbwDwvzk0SaqrjxRtXje2dOaJmjVpj3lCvU0iHwS9NwdLUIc
Y9Q14P07qTORiF6aSRMkNdFgn6vM1xp0fyixeuEdPm/m90b+RJeIizpEtdAg
t4jBxPsP1y/s3Kz4gQbMAVW79qGpeuF1da00cD6mIXQOrftZ/yqpHftvoLvM
Gy13hU1isYMGBJU4sVQ097pXzVFdNKBs99SsQ0/GX7um+IkGhg89N4+h2/bs
21nfjZ8XEFfEM4frv/3dTuqlgU99F5cyOvZclu9iHw3EzHZvO4P2+k1VuN+P
81csdcoNbRWwtUdxgAZsG5R849CqIj1B9YP4vNv6qeklmjs3SoU8RIOdRx90
9KOHtY0GFodp0O1qH7eGrv3Iefv+CM6/XAsxyXnM/1KN2u4fNHj049wFHfRt
Jp+R+lEaWEk6nqOiHaPVIsljNOi1jBEMRJvIzxxaGsf5HN0WloZWfZU7fn+C
BikfxV69RYucsY3dPYnzSMoj/xt6aVRKt2GKBvY3hqzZFnD/3v1/yNO43zXL
pu3oLIHYR0szOF+eDE7roP0yTE9E/8X9BTp3k9FUTZ753XPYz1m8Xn5o3bb6
tIZ5GjyQfdH7CC3HuGFCWcR6hW3nKtDcS5qrS0s0mAiSbOtFT4bPZUev4PyN
HLKZ/3/9HYXme9aw38yyXwovYv5l9myNTHRY/enerIKONZIpoLDQwcnRIP4U
2mv4q9UyKx0S2CWl7dEmHglcD9jpYJbS4BiKluMxf7GHgw67y1QfpKGZUvlp
jZx0kOp53lSNHt7fzEflogOF2KLZj659F1y5vJ4Odh86WBbRWSRtuwc8dGg9
9E5s0xLm/3dpoxIvHY7XFYftQzuGPa9p5KNDuf+9k6Zok21XnKgCdDCIoFCc
0KrFu8RXBOkAQnLNd9Ei+t8bHwjTgX3v95u56Mn+ZDelTXTQFn74sBld63x+
e5MIHaq/H2f+hU7k2NhKFaVD0Mep8vXLmH9C6/WVLfjvG+837EJTlW/JxYjT
oe7zXvmTaN063Y9K2+ggR24bsEfLnWcKaJKgQ9yAw887aO6p8j00KTowx3Dp
5aEnA10/r2ynA6Mxc74V3bZZ6WaMNB1EK/RXp9Elz8ZUlWXocOfFb3PhFQLE
HEkfapKlgz1HHLsa+nI3MZwmTwfXRX2O82hdB1HN1V10yB5isfJBi7N0jcYo
0kFduHZdKpopJjxaeQ/uZ+weWx16eJeBzjslOohU2Z0dQ9dWs03SVOiQ89t4
ecMq5m/26uHqXjooftH9txd9e+za8VhVOlT+MTh6Du3ou++v8gE6xN8jf/dB
mwhNprxTo8NRuVuf09CqWVlGdA06WMg07nyH5j5EW1o9SIeqFbHaP+ih9q2Z
sVp0uCYZ+kJkjQBlNj1nVA5jnlzcq4fRictRzM1Ahw2q2bE2aL97Rs/oOnT4
uZUWEo6m7iScXztChx0GB5teoHVf1nDE6dKh5KAyeRAtZ+xTrKJHh7deeicJ
TFzAPaJGbj5Oh9xo31sq6MlrMzwMAzqsE+nbegHdtuFZ+doJOgTeP78uGJ35
2NYmzpAOm5NZdPLRfmrbhfaeokNve1tbL9q8pb+62ZgOWxuaStiZuUCdEuvA
MKUDbevkhBJafM5UlOkMHazcwfMCmuk2T32cGR2m3KstQ9FDEg1X95rTQbnB
KbwYXVtyQ6LFgg50wdMiX9FZBlotDEs6sHFe/MvDwgW3B+auMV3A/MyLdx5E
X3Yp3BlvRYeLL/bn2KJNCA4de4l02DjwJ+gBWvaRjF8LCd8f9qPoLZpp75CC
DQX377Z5/wy6uz6hh4mG5824yS3FygVlF8yD4+m4v63qB0zQiX/49+6zoYOW
jfxzP7RfcPNAiy0dBNYTb+ajKVtCbtvY0aGluzt/EK2br63ObE8H4dQ4BX42
LpDTXR6Jd6BD6cHHy9port7nkfsc8Ty85ySuoicuXzn83gn7+UhsXBq6llXh
l40zHeQvhTA+ohNjv8cyu9Ah+mNdCCc7F7gopug+dKXDDTuLFQ20xZvz0/vc
8T7zHqp3QKubb0x674HzJ+/aSDJa/FfrCVtPOoyp81h0opn8b80zX8d8kxe3
cq7D/IWPpT/0psOTT0c0NNG12Uymqr50KPg0luWEzjz8cvW9Hx3aHv5xSEeH
dbo+tb1BBw8py+BeNOWikgVLIB3OOuyc4eXA9VfH2BKC6KDvb1Gsi+aPSi9Q
DcF+YEw3eqFnZUjWH0Lp8E/m395CdHeF6PqLYXTw7KRPj6LLTLpesNzG8/A+
wi7Bifv/Hk5LuIP3W+2evTnaz8uAf384HRbETGTD0RQ+9qoPETgfjgWp1aN1
01/ZXYykw/OOPYlraFkNz02s93G+fTc9q0bA/D/se5sQjefzeIp6BT1EnXTa
H0OHKyrr67LRZfNZ4q2xdCh8lXb9G/reHVrTxXi8n9dehWzlwvyltrmzJtAh
9p7VDwu0xYue7YmJ2A9a/g+j0Oon77fuT8J5UayQ9h4t/tXIuzUZz0OFwsy1
HvN3I8jbpeI8/re9SBc9xPX2I2sa5qvtUuaPrk3yCUhMp4OKpZlQFTpzn7rS
gQzMd/3D4kW0X+PM59ZMPL+EKI8D3Fxw1vrZTbtsOkx/Uz3oglacsd3PloPP
p/1Pvuej+UO3Dyfm0uEN4477BHpW7Ev4gTw6KJWPTcjxYP4FsZpt+XTY71qp
z0CXHTv9064Q79dntlup6IQ+ngdsxXT4q1pd8AXt59Sg86iEDqS635WiG7iA
zB4weeAF9n9HeN5ZtG68VkJbKR0upKUGR6Jl98wfv1ROhwifnUfeo5neFv5l
q8D5niU6QuDlgo8WDqmPKukge8nHXhedOyFzSu0VHXi4TXr80PduDC21VdPh
fse9XRVol02JmZfe4Pni6JtDn80xN2N/S4euf5Z+KnyYv7YAS1It9vPw1xsO
aLGPzc/U6ukgvrnTLhPNdCnkfHsDzutBJbVh9Nc1bU77Juy3gLkxcX7M//5y
MXszHYxOygRYoBPkXpCTWvB5F/iKKQrtUnVlg/oHPH/3V9QWtMFphZftrfj8
ddyZwyGA+Y9+t7Fvx/MpnenRRvN7pwit66SDZOLOCS/0NP+F10lddGi8WDVS
gv74ZONl9U//3+fymkl02cE20Y5uOjSMbw6RE8T1W2/V2/dif2p83kNF+9GP
uaz7TIdHj5mqEtDkRSbJ5H48L5dg5Y9o9fCXLeoDOC+W7MN4hbiAb4ebZ8cg
HdSCixqOo0dLlWQchujARz33yx/dZDjese4bfr8YtPpbjs4dSvdLHsF6jKqH
Z9D33EmKGj/webDk+0JBmAucubf0doyiDyQ40dFmKV3BDmN4f02FeB+h1fdH
7OX4hfUk/Ij8iBZ7ZzCYPIHPK4bw8oaNmD+J/Y7GJPYrc6KBHvrr7Cv1zik6
SLzy9vFFl930/O4wTQfOqecxL9ARW1WjOGbpEPld78Ek2rZo8nDKXzoszu7x
lNmE+R/P/qUxh3k6XD5CRCv20+I657EfHrNMP0DzOW87dnkR78/YeNB79PS6
3mmOZTqes9wauwgXdD28n5Sygs+/uXIrLXSZ0qmTB9fooEBPSnFBJ9QSFjqZ
GFCy92PTU7Sf5dv0yywMIL+w7hlCm036mHKyMeCsrlrL5s24fqD6Wgo7A/6q
UJ4Yo9k3zz49yMEA9o99tBD0aO4ziy5OBtwJTOOsQjfpXGR35GLAxP2X92bR
uZ+2F3JyM6DXSoJplyju3/6LdSoPAy7sbz9NRjszx63X5GVAs2vr7Ri02YPT
pV18DGi5Kvq0Ba2+awPdUYABFqF5z1i3YP7VDfwEIQZUrg+PUUfPngmoShVm
QPzZUrojuumn1iXNTQwYeS2/OR2d4jO/6aMIA/typKAXHSRY9NZRlAFcxNE9
fGKYf6bDFYIYA0hHVaJ00fpaslsfizNgY8GbPk+0YvtQk+Y2zGstlpCP5rNJ
dP8owQCJW8ViI+jpJfMdTlIM8HkmJCwqjvlHCLQRdjDAuLZ02ghdJt3i/Via
AfRdySUB6ITyEHktGcxHs8mqFO1ySufTR1nM++z+8V9og2/LAU7yDHDuHLaS
3MoFktdeKHEpMMBMqL3EDM22wbn/sSIDXK8yzdxEj6YqhGntYUDoqcvCVejG
Az/2f1JiQOK6LeLT6NzmlGEnFax3jp1r5zbMn3whgmsfA2p9d38+h3b+t1Er
TZUBCWtRUXfQZrfafmodYMB8l6rSa7S6xO0Hn9QYEEwRLJxF85UcO3JFgwHa
7AqbZSVwfX3mKS5NBvht9aWfR1d9eZmQpsWA0Q3cMXfRKVfd9A8dZoDTgfbc
1+hATuV/n4ABVgutWbNo28Tx1Cs6DDB4znFLRhLzV3lyav1RBki3uppYohXr
SctpugxQyRJduY3mu7Al65AeA4SeOeq/Qk9PdZl1H2dAa5is0xS6KyiCxdmA
AZnXnjtsk8L9i57IW3+SAYWO6wNOoIPy2C+kGzKg/3ivswva8mg15+FT2G89
glrx6EM9niXdxgzQFM3+WoGWvKxKcTZlQM+OCNJnNBvr1AbuM//vp7xsHj0a
k/0y3YwBTYXiE/zbMX8Fuu1hcwYMiRYsyqBzX28T7rHAf99oP6SBjjjb+9rZ
kgGvnfTSDNDO4/cvc19gwI6NWmCONvM7teWJFQP8Nx1/TkIrCnM1HCYyID+T
ts4GzZb91qWHxIAHEhFKdujeQ76SVylYz0LDvv9d2aH+npuG96F1g+D/r0+x
nfV8Qsf7wqC8+//zAleeyYANA7KTaq3+X8828mJnjy0D3G4cbPq/Hn2ZHf5X
7fB81Bv4Dv6/fsUXRR57zJf/irIsms8krveJA653XVNBAD09cjoEHBkgzKPC
vIB5NHpu2NfrxIBqT8v8//NK4W0cvOqM/ZP0Sr0S7ZEWcIfHhQGPPOwT/8/b
Uv2QRoYr3u+dDn3/n4fW+/nv4I7389f7mf/PS5JaFNXrwQB5peTv/58n27wD
uHgyQPT6VNH/5z16W3aC5zoDtK63nq9CN0oOx2V4M6BrzeRLKDr3eeIxbV8G
8C+EHDRGR5ywmOn1Y8D09eCrQmjnQYFklxvYfzWU4C7sR33XlpMbAhmQunOv
SxRakit0ISOIAft38GoZoecf6TzRDsH7e573Kzu6d++KaV8oA1QjDEnleD8q
G16suYQxgOfJt/JL6BQr55wNtxkwmDY1tRkdOK1wLvMO5vH8Lkst3k/bkB/s
OuEMUJTpn7RH64ulFvZFMECNvlTKj1YsuEB0jWTAcWYu6yKcD3zHNnHz3mfA
hmfyAybo0d620sxoBhwDP80JnEeVjrfpOjEMSH622y0IHc2mJ/A5FvuB//xt
UbRHHPMr13gGxD3e5ZuD89Byd8Ul3gQGxFbXGx1Ea9W4iWQl4n37br5Uh/NX
0kK5VieJAUFF7EGn0GwT41c+J+N5/1wa7/x//vs/2eqWiv1sy1AyRzduJL/j
TcN5oOps+hGfJ7lPt3hkpTPA5aqhqSk6Aj7uOJLBgCobGaV3+Pyy7Ypo+5yJ
89dD6RegtexO+LhlM0BWIT64CJ+Pwmvsu/hycN7Jx6xJoeejqj9l5TJA5+B5
83B8HvfKegUeycN5c2zL3Xl8vldWqir35zNA5CxPmjU6xXSq362QAWn3bONe
4/eJwB/ZYXzFDKDp0C9Lom2v0w9kl+B8bNPc7oPfV/T5Jb4deYH9XydX+gm/
Dyk+6Y3oL8X522SjuBvNdjBay70c+yNtb4A/ft/q/XBqjK+CAec035W14fe3
AhpXTHYlA9JjHNq2oqMX3h45+grnTZ9lky1+X/S46zvVX82AnYadaXn4/dNy
u0ai+xuc30Zi5Bn8PqtVOqvP/5YBN8lua3vRkoZ5/7JrGaCwU8bvCn5fZhu6
+PhoPd5nS5fhp/h9fNRth/GXBpx3fWlyw/j9vnH9wLJ7E9b7mOn0JnRyclwW
fzMDphpbicfx94OH6pmzT1sYoBFENHbD3yfGTRtYdT/g+cjO70jB3z/KxMa8
L60M2LzjR38D/r4Sng244NGO85Hd02sCf7/Nhx4iCHQygM9jbWUDuld8oeRp
F+anU09XxN+LlYVFFN1PeP/1pIqO4+/RFL3LvAPdOK9vUr6T8Pdv4GfZCo9e
zF+qb80Vf28zrgzbCnzG+k4MroXg73v9dY+Ec/oZ8PZc/fcHqwSQeGjxRneA
AR4vvxf///8d83sEHQcG8fvHcrTd02UCtL5t2XJtiAF3XytyFiwRoOBcaIPA
N5wXLRx3ixYJEP1bxzVnhAHPF32WCxcI4BGwInnsB973zmCO/HkCWIqUvh8Y
ZcDPvOJ9OXME0Mp19ro2xoArzNEyWf8IIKmjKCv4iwFZ1eMfMv4SgOXTj86c
CbzfG56eyJwlwPdLqf7HJvH7wePE+OwZAlQyWe0enGKA8qO7Fc+mcf3oTX3X
phmQcl2/oPgPAezl20MEZxngIBHvUTFFAONXt/fl/mXA5ZaTAnWTBFA+o/f1
2Bz2j9xun7bfBLxnzHcH5xlgorW+4ssE7t+7QsNzEc/DueDdxC8C9Aq4/xBc
ZkDgg985q+O4foby/dwVnH8fI4j///0mRfMX6K3heb1lDEuPEf7j4M4Dqdy6
MIAjMkQoKiJTEmUsKpFFlEgh86UknPmEKBUZohAZihCFKJTKGKKQOTKkQipz
iAxRiHzr/f78XTrr3c9ee+9zbqcNgW0PJ3pZSHDMVGev1iiO3/V04iU2EgS3
jDpYjGD9v5sPC7GT4OgfdQvmd27gjvr4K4eDBNNff4mGDXPD+NbolMOcJLBY
+ZX7aAjzLzE26eMiQY8ap0jdIOZ/bPXiJR4SmBf+Oz4ygOMfqHgoxEvCj4dP
rIi/n/T2vnziKR8JzHz7dqr0Y30+DRZDfhKAlHu7VR/mnzb1pE+ABK9aFQ/7
9eL873lse3kdCdiejoVlfcP8m1xWCwvh72tdTv7wFcfvKJn/VJgE1afyr6xC
5851nzLcSIIKB5LSri/cEBoWy9u/iQQuPbQnzj2Yv4RpyWVREmT0x87f+Yz5
F/C4CovheDtL1zV34/iP1Kx7Jk6C5uDni6vQwl/9XhtK4HiFTJ5rdWH+Hpr0
fkkSZPORdl3oxPqcc5t8pEkga//hav4nzD/pWY3wVhKkGJ1Nnf7IDSmqVI9n
siRwDOINV0V7126VOCJHgrXCwQfPfeCGY/99e9u/nQTPybl1RR3cIDuV4O2j
QIJoY+qmpfeYf7CF7IadJNAcC1E/iB4X4W9/pkgCStvwlvB2zP9pw5UjyiQY
mnDo+NiG4z8YtGNAhQRp4fWWMujYzgOdPmokiLBjfeDeivUZC0EbdpMg3nng
ZWULN9iyFag+V8efbzRKWY/WvsP8emQPCaRA0JT0DvPfKX9jYC8JenmE35Y1
4/grBvb4apJAkl1NUAj9zvLe4AYtEvRvNJBmNHFDxphN9HNtEgxH7/hX9xbz
91t/wEiHBP7ib9K3oulC78YGAPOvGRW+2oj5Z4Xc8dXDvGd9zQaI73MdOKi/
UZ8E/zxPWhsQ3+d6vzz13IAE6Wepcln1WJ9UjB+08HkZAZVr0V1LHkaDhtif
Vldlz9dh/tGKf3yNSGBzzvTEt1puuL1t5MHGozheSoOREZr+Ms0014QEOTot
a17UcIOeqcOy0XGsb3cwThYtO7Qxe9AU58uPcyy2GvO/1G51xZwEg63Lq7nQ
42sjVm2yIMFMG9fE5Tc4/geHn+dakkDUeU3SNPF90r1sDsbWJBirG1lPIb5P
2lzGPWRDgtGkIIv+Sszf6ULRFTsShPRVOTigbf+ontlkTwLxX9eVuytw/OHj
/HkO+DwRxQ02aC6pR2XGp0gQ27RvZ9drbugtPE0ZciSBgvy01X/oKiOxDX5O
JFi8XH3k2yvM/9vHqk3OJFBZSmB3QYd6Rp/NcyFBso7N9fFybqByHxU7SiJB
puZwmxf62L3VDUNkXK+wY5AFrbqr0suPin+ejf9VRBnmX39ZWoROgtNRF0+J
oeftNVryGCS4ZHui/slLzH966vLRszi/CsHzB9C51x5vH3bD+VCan2wv5YaQ
za4f/Dywv6din5LRjs8lA0U8STBnbbibBa1n8Fkp3wvn6/GCf0IJ5t8d+/no
BRIURd6+vRvNddY0ZNibBAe42M+2FXPD2Ko16v6XSGB5fpeAG7o5vqZPxAfX
Y8JabwF0rqL/zXxfEvBGBTzMe4H5V2nuN/HD5/3gfdcK7W09933YnwQC+n1W
S0XcYDL+7LZ/IAmEhDI7H6BlA6i6okG4n30ulTRBLwvL/swPJkGeAklxvhDz
z/6WaHKdBIymuuZ0dJVO4uHvISQ4dJH0wByd0WEx6x9GAvJGLzNWdAiFP1U0
nARW9lbZzwsw/38NJgURON9sHE8d0Sa3ghZNIkkg3HrJXhCtul3n0fcoXE+J
uYVV+Zh/+cKJgBgSeOo/KPFEj5sVsGy+TQK+siNkOXTVMDOnIJYEiv/uVXbn
cUPCZXm7Y3dwfoWSa26ifQUGV4/EY79tOOB5EO2YcS8/IBHnd7tP83wu5q9p
67g5iQSGl83anqJlW9bzFSZj/seK/VzQXM7vSo7dx/XyM7tTDD02H+I6kkKC
hAKZno7nmH/EwfWBaSTQ5hQPi0DnSv97vTmdBKF20f2H0LdfFNMLM0hQonx5
iAVNP3pO5PgjEugLf4h5+Qzr9ynWjmRivzxMGDuPFjk/4hGYjft3xJtxNfQy
zwMJsSckmPIzSZh8ivnfd2gqzMH+AbWpJ+jK3ZsuHn9GgqhU+jQVndHQLjv6
nARP/f4kyaNDTka0B+bhflrbPDOSg/n/OuwnVoDPzxybyUSbhLDtLCokQaCv
YTLx78lUxcs7j7/A/Xz1wLQCmivvQvBoMe6n2wunxp9g/UNqaldLsf/WlSY8
Qxd9Hv8qVkaCd8vj4x7oBLdHN4rKcb9QOzKmgfbhcNpr+poEMasbo/8+xvwT
xYZGK0gg+Jk6UIHWVf4UfbWKBI0Sct+uoWWrow+IV5PAwWwxyATNZXv0R1EN
rp+Fbx1C6LGJ1fGmdVjv2ft3PdmYf2Cl/lg9CZY3tnlkoDM2+kxfbcTxD7yv
YKJ9n2jcE2/C+m2fiveizXWnjV40k+BKTqfdKrTGx8d/TFtI4Gva/vBdFuZP
c00fa8XXT6lISkQvrUiaBbVjP0bf1yKhe29/XhbvwOfbSru2G10pH5f94gMJ
uFwlLrGhM16ZWpt9wt93L97Ylon5n1jD/qMT90c3tVMpaOpIzfOgbuzfuFBT
N7SJr7/Dlh4SGGwr/QFo2XX7eYq/kIDpVqGyDr30cK7I7BsJPNriJQYfcUP7
/udnfvSSwC5fp7gIXdhKFQjuJwE9IncxFJ3gIlu+ZZAErINjw8S/n/VZ/EYp
HsJ+NhzxUUM7RiZuMP+O/Wr3sIwTrbvV8s2PEdy/qqUefnmI9Uv43YLHsJ/A
el8BmutYo5jEOJ4/tw+ev4Ee6w9qKJ4ggcjtAfsz6KoLOufNJzE/id0T+9EJ
vIvS41Mk8N6qJieMdkstaAmeIcF4cjfPZAbmr3HWR2KWBB9uKcQ3oNXfysuX
zOF4Nku0pKNFHAc/mP8hQb1V4TN/9NLsvcDxeRLc9Brb54DuDbVVvraI67Xg
JUMTXblFqEdiCfcn+23Gm9AZ+e9CSpZxvdbItf9Ox/wNQ9VPrJDA6EQ520c0
9cvB/nEWMmSeH+wpROt6/Lt5jY0Mwk8THePQIpwl+yXZyfi+40vEBfTU3XMj
JRxkEL+d7WyLbldRij3BSQaOgJXB/ejCmhHdCS4yxP3rWiuBTrB78PMaDxm6
mvb0s6F9Jh3uSvKSYax4w6nvDzD/oE2GpXxkEEj2DG5C64q8nz3BT4Y0x+OW
eWjZpxGpEwJkkJ1PfxeP5jpoeOz6OjLouZyb9kP3fmL7KylEhoqi4nISupBe
/qhUmAxhXOd2maIjWL0tLDaSIeFqivk+tFucGuvPTWTYdFJnswzafMdEznVR
Mhh9NongQ6tXPLKTEiNDqnFj5nwajt/SifOlOBniefMZg+ilUbECCwkytIas
7mlF91755PhTkgxr9775VY6uXB/DFyJNBvX73wseozMyj5ZKbSWDvqmHRCI6
RJuT9FKWDMfqRpRC0Y7tlest5ciQtKa+wRutTvKp+LmdDNMryzVkNN+SBiNE
gYyfI2aWbdBTUdMi0jvJ8OGA0Okj6HbZJ7UvFXE+aM6T+9CFpa7nLJXJoLmn
P1MBnXBcSnJShQxtlhERm9E+g5+bQtQwv0suybxE/YtxF6V3k6HXhtq5nIr5
rzXbVqaOeT68e2ASLftgzXvLPWToFllo6UUv7an1m9yL/UAJDG9Htzf57wzV
JMOc8R7PanTW6f1d0lpkULu88XoROuL3XHCZNub9XLomE+1247malQ4ZxtNt
lO6izSVp3yaBDMVCJVURaPVC2fBQPTJ+vjsY6I8WMerdK6OPr285Tz9H1P+a
OFRmQIbO1I+Brujec5YxVoex3xy+vrFFV3IJ6EwZkiHckF+FuN8iIbnxR6gR
5ilNqQOivlpwvMxRMnTk/AjdjTas0zEoNyGDyOO4C9vR8vaL01bHyRD4hRIl
huabLrg3ZUqGLC6XDgH0VPBZ4zBzMrBMXz/IQYxfVGFexoIMPf+1f1lIwfyf
DaaXW5KByq//4Cc6Qf++mbU1GTLae24R93P4dNn+m7IhA4OR9KwT7cgUehxm
RwavzMDfzWjdVS3WW+3J4GASSX6D3hQfyv7KgQz+26o4StBTO/VzrU+RQWVF
9N1TdH3lP4dpR/z5g4TKdHSWVQnPDScyuPdq9yaiI36ce7HVGcd7lVMhGu3m
r+T8ygVf3/73vetoc+FRARsSGYL38ehcQatnPyifJpMh74cejxdaROck9QaV
DGL6KSx09NL7TRtl6WToF5KWPoP+Sn7/5hUD51OlnmlHjH85ws3mLPYHPWbY
jKgfYyg+40aG5kT/0CNoZ7lVjTc8yFATE2OtizYsKz8v60kGDYV6031oeTNv
mddeZHDcK+WliuYbVmu1uUAG7djkanli/JcmfGa8yVAooq0jjW7nz5QPv0SG
0Psrg6JE/XSnj7I+ZLBgHSpcT+S/T/zqa18yhIhO5PKiL737pGzrRwZ63cYu
DmL8Z2J6Zvxx/Qw571i5j/Xnj4aGB+L6N+vInEezRnBqbAvC5//hYjaDHpSq
6n8dTAbbWyKy4+j6Ip9I2+tkaNg+KTOMzjLeo/UrhAw3I4ZNetERvdMj4WG4
vh6spHWj3byexG4Lx/V0TFPmA9qch6RXEUEGN4+4dy1o9ftSk7aR+Hy/1mc0
ojft7rn7KwrXw4u8hzXoxfo4w4gYMghleLyvQLc7mM1tu02G5AcndhD3z2TN
rEmriCWDwV3Lpy/QAddrj9ndwf3Vy9s+H+0sFvD3VzwZpkTL1J+hDXP3Z0Yk
Yn9ekNR8TIz/0G8LuSQytJ/PoDxC831+zlqZTIZhduPqB+ips7SndvfJoMov
aJRC1Gff9t9sCu4vV/8sJqELE3o5b6bhnzf79zEBHa90t0AuHfdHiuxX4r4c
tzeWpyszyHCglC5wG33IRmDtf4/I8FOjgxGNFp9oLJ3NxPXX9t/vm0T+gcGk
m9lkOOK7KjucyH8DCG1/QgZzpbchYUT+jxcrKnNwfXblxYQQ44dCxn/PyMDl
VVp3jcj/w1nRued4fvzpkwsm6lMV6m7m4Xqxls+/SuS/MnhuewHmezOKEkjk
f/u+ZFUhGQxjNxoHEPnL2zX/94IMMy6vrP2J8ZcLXZorxvn6GxTph641b9kW
WUoGXzPazBV08vfQ99vLsL+d3f0JB/jo+1eVkyFX7c4+ws6CKzvtX5PhXkmP
OGHDhyVdcxVkyJ7XVSQsv9/zWmQVno+TtSTCfK1Ku+Sr8TxJoTUTnnIe/VZV
Q4aRdRccifptCw/C7euwfw/yKRLPV3jz5L7f9Xh+bhw5RDx/uIzIcGQjGUQ9
L70mxudc/D5GvokM68zs7gWhNU1u6rxpJoPVm+sDRF7i/Ybj9i2Y/yBbZCiR
/4VVCb9bcf9tf5vy//zXvDKIasf9N7d/UxQx/hTvGfkOMmzLOvznFpG/+q77
bz6QIXFocX88Ub9xwtjhExlq45eGif5wO5U5/7uTDKPzR+dT0WazThlR3WRQ
0h0/S/SbfKi4uUIPGSi53SY5aJYtnf/efCGD3c1NMUT/dubFPHb4hvur1EOt
UnTpYRObP71kGCy+alJJ5N/DyRHdT4bqR7nV9UT+7lW5CoPY7wYqaa1op9W+
J6uHcD4nV4Y6if67u2fNye9k0OWUiuoj6qvMvPgzQga2mVspY2jemifO0WN4
nm623ThL5G9LEtwxjvvDjNvsMpH/T6lX1RNkqB//vIe43ynrag/15CQZeK8m
9q1D+2+6s3F+igxRu3KmxdE2OWbV0TO4nwUIkYn9TFOP133HLPbLr1Z9dbT4
p1rxmjnsh40D14n9kZUe0HjyD56nV4xVj6H7WbQuzM9j/5Xz6P5H3A8V+1sm
ZhH71U3qBZmor5DbumMJ9yeNqFvn0eGvab41y3j+Flh/DCL2f4ttCqdWyFAa
4+13C20w2vtxnoUC5v6/bqYR9a/cvRrDRoEc5Qb2PPTcOiuVnewUcLFZ7K1E
dz4S+FLDQYGOousy7ehSrbehpzgpoMrr0dSPTm4L1ljgosD5LaWffxHjd4WB
GB4KeBY7mhHnpdPfxcidvBTIzHJV3Ig2iCrUquWjwMXaprPyxPkr6zZ6ip8C
S99vbdIi7qcqVYhbEKCAxniZ3HH04LEhvVvrsH6hYbITunTg/uROIQo47tx7
8Tw62tsuqVaYAlu1wl+Gob34hI84bqSA3kcD5/tom7SWuYVNFMiYcjlXgNbc
E5Z2S5QCi8ETIw1o8Sb944piFKiK/VL9Dc1yeuVvrTgFDLbu4fxN3I81V5Lp
KEGBWM2/z4j3TzVhnpaLkhS4PazwWgadJaHMdluaAlOadbv3o8MLRp8qbqWA
9PE2gRNo5yPp/9XJUoCqY3SChtb8epLrtBwF2nfuWrqKFjwnUri4nQJa2hFr
ktFznB2nbytQwOaubUARujPp5lqlnRSIOZ/gQLz/LFE98rJOkQKKq46ljKGT
a1eRTytTYOcl7yMc+H7W/79XQn9VKMAQEbWVRDtNeVfeVsPnldndsh9tELyL
qbSbAqK9dY+t0fKiP0Xr1bH+3Y8/z6FZnmXWnd5DAe6Hp+Oj0J0Hz3j+3Yv9
YkXNzEE/7xSXitWkQP3qmS1v0dGMzmYlLQp83LD4dwTtyXbrUr02BV6NXdXh
xPf/NndM5Jx0KBD+I2pUFr1vJ1fHX6CAyHXpRX20eGWVf6weBYRUNN2d0SxW
vorK+hSYceg6FoTuH9vTXW+A8xXOeisdXeM3c83pMAXgQIF2DTpZKGfXkiEF
Ev/MHBtGe2WRemONKFB98HUtJ34eOnpAOkL5KOaVJ5ohj1Z637OvwQT9afWY
MVqQfGfY6TgFOo2DY5no2SWzW0umFBB7eudRNLozmhfizHF9pOhIFqJLttWN
K1vg8769stKJTn4ZkNBgif3dZWWwjPY31Tp0xpoCEb4N01L4+c9p6PfMkg0F
8uid7IeJ+6Eu5d6Ps6NA9+ngK3S0OD/9qIo9BdLE2k/GoOcebFtocMB+OV2R
UYxu3NuXceYUrscFsxPf0E+b75ovO1IgNC+EtBo/v0Y7Wa3EOVGg/JRrvyLa
84/AExVnCsR3jr+xRNuEv7VpdMH+XRDnvULcDyV1jcOZRIF7tzziH6LFiyBv
mUwBZrGAaAuaxfjvyTtUfB4Ji71/0P3fCteo0inAOyNRvgU/j5d6uhU3MrDf
/TLvGaCjuXe4OJ+lgNHXsR4amnJvSPCfGwX2Kg1eiEYb7Up5dceDAoLJ0WeL
0Ir1djRVTwqYOk+9Ie57EnQQ3vTWC/NpWPb8h56dbql2vkABHokXgVJZmP+1
MPd/3hRwrRKZOIgu2WywJf4SBbi2yBS4oJOfrzSq+lDAKrP1E3G/k79B6YW3
vhSYGJCweYR26vbc6uKH6+fUWvU69L6zym3//HF9FyUwh9GC7GO+8YEUUIl8
zc6RzQ0j8ekKakH4PMm+f6TRjYqnPr0NpoB9atshQOdUiQS5XKfAV5eSGXt0
tHWHykoIBdTeqP31RnuO3/wSH0YBn+T9jrfRNgFHwtTCKbB2qE3qGXE/1Ab2
PU0RFPxc+kunAS3++NWASySu99J7pf1oFrgYtRKF8+nSFv0X3dmxSzshhgIV
JaE16x9jfcrPUbXb2I8DNZY70MH/MuOaYinAJx6kp4cm3zpz0PUOBZIeV92w
QRtt3zK1Eo959/mpMon7oco7kxIScf2Ile66ihY0v3VkVxIF2mrPxtxBzw6b
/G5KpsA16/smj9Gdl7keuN7HfMwOu7wi7ocSeHOcJZUCxXquXcR9UckZvksJ
afj6dYtZ/WhPzb1Zu9IpYHtt1adfRP2WGcvmDAq47/JzZH/CDVLOOWykR9jP
N+mHhNAcC6RnLFnYL2caQ2TQIxHS9onZuH+G3ZFTQzdKf+Ha/YQCcd/bpYG4
H+rFncLmHPx9+uVLJujoo+ZOpGcU/HwSpWSH9uzj5WfNpUDuGL+OK9rmfN3L
xDzsB7bFx+7ofWsCybsLKLDOz8TLBy2eoiX8rpACfeHcd6+hZ3f/qSS9wPPD
VVE8iqjfkMtkLcH+Myv+G49OPUnffLeUAg9TsjRS0cG/ttXvLqNAah7Lu0w0
OaTP8105BTbMlFUS/3/QSDxJivwa94uPXwSL0Ip5Vu9YKynQ2uf06iVa8LDg
5btVuJ+mG9dVEPU/v5VTr8b1V3pnZw260+1ax7saChi+PfSzHl3CoRtArqNA
Y5gNbxMx/sS/imwNFAgpabr2jqivXNR9txH7YesDB+J+Lah2u67eRAHxB5+j
2oj8bXfsbmnGfDafl2wn8v851Etuwf31igcv4ZHAlAi2Ntx/GlstiN9v3Pif
ZlI7BVI4oxdaiPyfCH9X78D+Ppq/2EzU12291fIB673cY/OWyP9jGFA+UeBJ
wJZ1xPPa0Awm2LrwvOsmba8m8mdhSUzqpoAmn9Dd18T4Y0sPafRQ4ANNhlpK
1Jf3+tXyBX/fMi62AF3xSjmF8o0CyRoM8adE/ifGjq7qo0BDcCbrIyL/kfSF
pH4KKNUZ6t0nxu976qHGIAWawo59iyPyXyd6onWIAtP00s4IIv9HHSuU77ge
N0QoBRH1tSKfrBqlQJdmXe9FIv/WI7bJYxTQTqJMMtEfXdhX7xnH84/Ty+4M
Mf7FV3mtExTwtRyTsibqR148RZ3E9URvNDBC22/dzcs+TQEn7Q21xP1oUPKz
OHmGAkO179KUiPyPZbnsmcXnWTf3WYLIf+DMurY5CvzeE+YuQIz/wpbX1D94
XtpEnmEh8uftorEvUCD6AUfeJLH+U29turdIAWGLn/Zf0dEax2r2LFHAItfI
uQnt8ZbLo22ZArVrxepLiPXn+GYLbYUCm5rOhDxES835vmVnpYKipUxGDHoh
dK/3PTYqiEvbb7mC7tnya+tedipovuCfJaMr8nPa2jiowJOhs+0EOtWQfIXG
SQXGT+1+LWL/+SK9g4ObCue/KAdvI/Yfjy+f7vFQYVm3nClA1OeMD9rLSwWr
SK22RdzPFJPMVdv5qNDKofJsCC2oyveVxk+FIx5xXG3omZq6MA5BKiRmMr+U
EfuvXeCe++uoEHX1hWIWOnVSa3CvEBV6B88uxKIvBv2JahemAhTGwVW0vUie
Nn0jFWwGFVa5o+EpfYxDhAr15B26p9BSB+Xu3BelgizcWTRBc3T2HdwnRoUZ
JkNZm9j/6UlT7eJUeMiS820nUZ/VOpkuQYUcTss14sT+HydotFoKx5/snMeH
jtrR9Pu+NBW0+7s7/uF5Qq649mDfVipQlos8ptAHLHVN38tSQUV8/kY/Wnjs
7xJdDp/nfLLkB/TClaKs1fJUsDz0UKUe3bPe3SpFgQoL7wTLXqIrMnes0txJ
hTy7b1XP0Knaw8/eK1LhpuZaA+L+wuD2FHuGMhV8a5P1Eoj6pP+4OVWp4OYQ
8fIm2mhJuChFDefTpedZEFoxutVJczcVnhqFSVxGC2y7wd+hjq8XEMfjgR4p
NShj7KFCXBCLO3F/4qvjLBTOfVSgfqgzP42OHSwVTtWkQvbSj2e26IsXvao0
tXA+Qukh5mj7tSpnO7SpkLD+SA9xHyM8GNvM1KGCwZ6AxwZoqb0Z9Zy6VDBN
EPqtg+ZoPuWVqkcFviG2Mk2i/mlR6f36VOhoMl5WRzf87njXYUCFPu7JElXi
fsYbkZeZh6lAth+fVkQHSRpt5zpChfgbBzMUiPqF7B9SjagQ4jL7Xg6tZvQ6
YP9RKpi8/ucrS+T/7aLSBxMq9Hg6PZAh8j+3+zPzOBW2UyT0pYn8uSavc5nh
erim7ki8/6hIztqdZk6F6LL0P5JE/mrOffst8PnZGTzEz4Pqttz8YEkFAfub
8YTJ9l2aZ62pENzAlUa83pHpW9+5bLH/bXu2bSXGf+3Y7TQ7KkhKcMttQ8+L
cutq2VPBWT0ybTu69dmbiQ8OVEgqZybsQOfpX0k8e4oK+3ofrSHuu4zt2nuY
+zQVkps0F9SI/Jm/fqU5UUG0RM5pDzH+VU9TtJypsNjPPKRF9F882eSjCxW8
bwo81CXqK8osniVR4dVqvoDDaPaqLw+5KVQYSXb+ZELkbxV/4gEVx5OzMcuC
yP+HOYs2nQpqt7f9/o8Yvz9fzkcGFcxLo1+dQXsL19u6ncX+jbBlo6NNswNX
87hTYUvglUpPIn8d7fwHHlhfiHXJl8i/488pbU8qKNT15V4n8ifn8X7ywvUn
IzUQje5eppe4XaCC58vXkUlE/8XIufJcpIKd7KsXxPu5VLn+demXcL5YxP/L
J/IvS3qt7YP9Pt1z8TWRv5k1/ZMvFe5l/FvfhNYeFhRx96OCUmugfBdR/3JT
DU8AFTx2UEuJ938T/Nc90gOp0OhdWDtL5J+uK3EgCF/P3+UY8fdjefuW3n4K
xvUieNlsHTr2XZG3+3UqZLD9aZEi9p8z7rJrQnH9qHQ3qKLt5ne0p4dRwd1P
VkcPrR0xfOVAOD5/d5fyCWL/kU7d0RlBhUO75u86o9lf/NfpHkmFnVcDrp5H
9xhvCF4TTYX5hvPDIUT93lbVjBjs57Vd1XfRoV43vh64jfvByawtxPtJBs+h
G52xVFBvGflVhTa9z7LX4w7uL5fj9T+h1Xa/HFyTgPNxvURgHC3c4BWdkUiF
flETG+I+0XkHlQM6SVR4TrLYvBHdPTM21plMBd6MVltFdPn1jDse96lwSfDN
en1i/xdz1OdNpcKVmZ1H/kMH5YpOZ6Th893mX/RA2x/6kKyTTsXPEfRtN9Bq
nyONujKwf9303z1Ac7sZ/fF4RIX0f9ajZegJdo503iwqpE2/PvkR3Zrw2vRh
NhXGvZX5ptB5SpeWdZ7gemhM/MyN52Hsm93ZXTm4fiqSKon3i942k1bnnlEh
LEX9tTbabiJrFV8ungf5Lh3E+awd6Pz8YR7uJzqKrMTfz0ptlHCAAirI3ww3
CEfPP+7i7i6kgtPw1dSH6Fa4XXTuBf5+1HrhSnTmh2Nn+ErwvPi4P+UzOpTK
LfCoFM/PlSU94r5SxsqbMiijwiZL62WBHMz/9hVKdzkV9KWMW3YQf58sv2+D
52sqOOR0Fh9CC7/6VcVXSQXdgyylp9Hz5k/PPqqiwgbFqnYfdPd3sphuNRUM
C7esikeX+8g0dNdQIWDbBuN8dKzgVy/POuy/t5nZ79CMh/HSaxuo8GXyo9QY
Wn//iZZHjVSI/ZrynOMpN2xv5fPRbaJC0MBqayk0t0v99s/NVIgx4hbWRo8v
BH7wbKHCz1OZY8R9p603tQPXtlGBw23wkyc6V2ZeKbOdChF15T1R6NjivM+6
Hbg+83cvEH//7m3CCPn8gQpT/kcUG9B2/XLqXp+o4OO75D2E1r7Q37e2iwpN
v016WJ/h+HmTb2Z2U6FT84D1FvREivV+vR58P3CneVQTXaW+buTzFyrstl+6
ZY1+2Nh02+sbFco+Nlp6okNPXdfl76PCSat9ytFo+qzuz8x+nD8FQ8mnaNPQ
pUS9QVxfaX+2v0WrbnlxuGcI1zef4ZERon6++6zXdyqMle0L4HiO+R/emco/
SoWhlaZWaXR3z7BJ1hjmL8e2F9B57qmLeuO4nq52FTmgQ1fbP+qZwPXgesLk
MnH/6t0NFucn8f2KpNvfeLSeShuLwDQVylepVBahZWtu5GTNYH+fvnWP+L4E
t90hu4Oz+P4kPPHWDHr8JwvnlzkqbP1okCKQi/lffZl//g++XnRstRI6d9N5
R4EFPE8Ew1hM0LE5KnzZi1SYy5SxoKG99X6UHFyiwoHHTq9D0XafMly/LOP6
oR3Wy0Sr0R3XX1ihwtcD7T21aG7WzRUCrDQQ914VOYTujf1Az2ajAQf9sw17
HuavECWiz04D2bN2mjLojNdGtV84aODw0X+XHjrUguPcBU4aNP8+pn8aTR99
LSHIjZatofujTa9casrmocFc8cCT+2jV9eoX9Xnx9VY/Zn+NFs6clP3KRwPP
M5s9v6LntbLbL/DTwFRO/e8yurXN2U9QkAaWmfMJ4vk4/64SOx+vo4GLtqup
Ntr3b1envhAN0rWvbHFAO0bdDv4qTIOLLLrsvmg92eNq3htpEPflKWsyWraU
+5ugCA26d9ZvKEdzH6++8ViUBu6HIg5+Ib5PM3Blr4EYDeoD/11fRrd67xv6
Kk6DME2xQfECzJ9vNtpbAuvVDlsfQMemPT2wTooGh/xPDpxE0/dQfjyWpkFv
xdVrfmi9Jpl4g600UOm30k1Bi57+qv9NFvM+0Lm+Er08Fz/tLUeDISWuf33o
3rAT99bJ02B57fcVNuL7RBJrjZ8o0EB0n5fIVuL7RAX1fwx20kCLK9/IAB16
5Gr6N0UaxH5KueWKpn/VNruoTIM8Np3Z62jTc/PL61RpcGQogp6FVuXKz36i
RgOLzxFLjWjhZIb1od002KSrkz6OHlfdzt6rjj6XdmZtEdav7X9+cQ8NNrx7
oamCTvgv2WH9Pnz+Z37y5mjfKWueHE0aeJxbVPZEOwave3FIiwZp3tuPxaH1
RJvP9GrTwEuMJ6iY+D7Vs+sCl3RoMF92v60bza2vV75eF39ePKqxjB7vXKLk
6NHAlzGSL/EC82e82HBYnwZ9mkmGeuhcNo83vQY0KPbjmHNGh97Z6XbpMA2O
de3Kv4523PldTOgIDVq1hujZ6L2VqQ05RjRQcj/P2owWsbI/f/goDVh8dltN
opfHNsj0mdDgSUi5o2Ax5u/X1nLpOA12nxWQ2oWuEgr3ETKjwXaenXcs0BlZ
h+SfmtMgQYP/jRc69ADrx8MWNODqKE6PQ9Pfvwzss6RBaLWc1gu0Kfm88mVr
GmSN24V+Qqsuq/QI2dLg2i6z8D9o7pgfIU/taFAYyG2wsQTrb3uobmhPA/Pa
wHwNdPFLx/4+B+yH8ZefiPtrE0w3R14+hf37PT/XE+079GG/8GkahGdTdG+h
HS9FjTx1wn7b0XMtF63Hbxxr6IzrwYknsIX4Pl06h16/C/aL8S+1CTT3voqf
l0k00ByMTeApxfybL90VptDg5s7pQjl0q5O64TMq5ivHHqKPzvgzOWtIp0Fp
VzP/abRveHZqP4MG0cYmJr5oCymXYz5nabD2egAkEPffFkn8FXbH9R9PGS1A
ixh3P3rmgfWj2A1b0cvfblsc8aRBpZ+Z/Q90r+dx1gEvGlRcOr5t9UvMn5vn
qc8FGrjGL2dIojPuVdttuEgDvhm7z5ro0F1+nM8v0SD+gWutBZpev6/giA8N
Tr6VIDHReg6zjgO+NNANCy6/jhaZecrn60eDnFV3GlLQ09copRsCaBDhcOJG
Cbpj81bS80AaWFWUsLWji59/XW8UhP1q1aA8hk4wSKgYCMbxHAtYx1aG4+8+
wfC9TgPtzt5sEbTj2bWiG0NpYCP7fV4FrcfeUPs8DOvTbi0dRssmXD1nFI79
0TdYeBLNrXRAcjAC12dV91Yv9FjVfJNvJA14jDyP3EBXWedf3BhNg7EXz2VS
0QnjjG25MTQ4bxKZX4R2D9j+3ug2Db4e4194i7bYMOA3GEuDKjaV2V703sfJ
O6/cwf0zbyp9Di0CNl0bE3C+s0zX8JRj/h3rruUm0iBT/bgccT9vL6VZzTiJ
2G9/zKuiq/5d/zaYTINAC1l/A3TGLb3wK/dpMBv5t8wGHbp9ee+mVHy+PMYz
Gtqx/MVQbhrmsemy9RW0hrlHjHE6DdTEZQqj0Hzfd+oMZeB6k3KpT0NPX/7+
48ojGixch+gCdIdAWvymLBqwFhbw16KLM+wN8rJpsE2g8uAndILmxhnjJ5jv
KhfFEbRvS9u9oRwarP57v2meqO8cbuz3jAZbXd2luF9h/guH5jfl0kChqHMH
cR+w7E3WjLw8Gkie+vBjO5pLpszsaAHu759cT+9F9744/2+okAZu8eHhh9FF
R1Uf+73A80b8EMMKHdH3w1qkhAaXBmNWEd+ndT//kD2/lAZHmR7Hz6Et1pzO
PVpGg0XtQdMA9N6UzSeHy7F+13fOSLSI+kce/9f4vPU+nkno5YaoFyKVNDCM
TYvLIuqfNHbOr8Lnf2fDLEJX/eIQNKnG85bt/t8q4vu8IRXlwzW4n1V7HmhB
+4hfpvrX4c8zuzQ+E/Xz1DeKNtBA/VDz4DBa4fDUm/xGXJ97jhvOoPl6st1M
mmhQu+nU6WX0tJuL+PdmXM8hS8pcrzF/DslG/xYavNsuV7AOXZzYfV60Dec3
6euEGDpBOVamoB374Yb0F+J+Y9/q460mHTQITp4JUEE72vL4fv9AA58rx3r2
oXV/VssHfML56lEf10OLXPX7KNqF+x0pM9cYPbVR82pBN67f9xk7LdD1T2aV
j/Xg/vpB0cEena37rOf7Fxo0ycJBZ3TER0powDc8n6/0fKWh3WlbNTb30eBV
MpvKObQFy7f+gn4aOOrlaVxC741NiDw2iOex0o8Zf6K+goXWyBCxPlacr6OX
Xq0dDfiO4x0IfRRBfJ/6REPs5lEaJL6UnLyFrhy5qlc4huOrWO2WSIzf98Dk
sXEasDfv1k9Fu61buDsygfu19GNaJtrwUb5h4CS+Pjt1+BlaQYs5t3kaz/eX
7gUv0Hxt29MKZ3C+Yqo+vCbuf3YZOHZ8Fl/vo71RPbp9MfnvyBwN2j/BujZ0
UaRNZuAf3G9+MBW7ifpb11uKLdCgnPL97gDap6SZtWgR99PH2Q4TRP7HQp4e
X8L3V/wlHn/Q6gN6/40u43kwt+4zawXW917mvLpCg4zK4jhe4v5n3uICMVY6
JHzOztiIrk/1OF3ERgfznFFOGXS2huJaU3Y67E33KldCR7z9XjrKQYdOleO1
mmh3xzTSVU46DNaelz6MNp+zFxLnpoPRl/G2E2j1sI2VRTx0WPczt8MRLSLR
zjDlpQPjfK0CE72UHy46xkeHvN8KHZfRHYaH667y04E68601lKj/hdVTXJAO
B6aGJOPRAR5lki/W0WH1Je3qh2gXzgvNpkJ0qBD7XlqINkxSvTQmTIco8gB7
DVpBdXxb0EY61EyppXUQ4699+F5chA4fjT/GDKKn7E77vxClA2X9u4+z6PbJ
zYpmYnTQHxRlclRyQ2HQx64xcTpYnSy32YBOEIm+FiRBh/KtRXFyaJ+nxru2
SGH9Lxzb96EtDq7ufSFNh3dqObzGaIXOinCzrXTwbX2iT3y/n5Vxed8PWTqE
uXK0nkUPsWoMB8nRofvRi6eB6Pq4qZgt8nQIMarujUVn73isU6xAhwbOna5Z
6IgKl3GznXTgTpo8UI52s5RM+KFIh+Zaflob2nys2yBYmQ7tRhFjQ2h1v9iZ
Lap0WJogly+iRYRM7xer0eHYxQcD/FU4/kyeo+a76cBWou0gi67Xrpn/oY75
++xV2I9OaffLCN5DB9G420Zm6ACSprnEPjqUfDZ/RUK7LM3+K9akg/w2z+Ar
aMPoZ4/NtejgbrZwPxatsI1qM65Nh2KtAb4cNN/LrRzXdOhg06jWUk3UP/4t
V0IX8/o2MtCDbh9MOFmiR4dGl9VH59CFFy3WnNCnw3bDcM61b3D8a/mLxw3o
0ON1eYMccf/0gwbna4fpIN7X4Q1orb1BgpJH6LDPL0HJDi3ZfOBViREdnhs2
7vFEszotUE8cpYPiPvJt4v7rwd/5GydM6BB43FM/C11/g1l97TgdnkZMHq5G
Z0nKu0uaYb/Pd9/7RtQvHBAvNaeDWcKeI3/Rbkb3Gk9Y0CHu0urDG6sx/282
FyYs6WD72DB+F1rdc/3W69Z0cNJe0TJF83G/a5W0pUOVwQ51BnooOcS31I4O
4T3N/mHoMrWDChb2dJAVH5HIRN+rW/444YDzs+3yulp0gH3x1euncH43hdgM
op2nPVSkTtPBTVRghq0G87+m+KXUiQ4fzIW+SaHlN4+EWjjTQWMiVkIXzfc8
TeOnCx36N8blO6Kn9B0GrpPo4MC+4a4/ur1rY5QUBZ//+4aPKehsZrvWSyod
CucTnCvRAasiRi3odPA6l3KoH20bfzjuJwPnK3aHz6pabtBUZDsYcpYOfKla
HLLoLVVlk1LudGjr6ug7hGa1vpD00gPn+/qcIAU9+EP1iKUn7h9z92OJ+6/r
/cfnfnrhfHp8oD9FZwk/Sgu5QIdSkzt32tAR2aePS1+kg9iXYeE5tJuO2NLL
S9gPF2q+b6rD/Ds+Zlr64H7ivZtPG61Aibac9KVDkrb6tdNo1n/GbKF+dHgo
12B+Dd0Vs/qZdADWuzvt8RhdKlf5X1kg9v/Ks+FWdHLZZS6rIMzvNcfT3+gA
M43CyWA6ZKW31YjVY/7DU6dDr9NB+EKUyEG04eXHa2VC6VCp43eNgpYXcH1Z
FkaHRMHl8Ug0X4Yk2SqcDt7UxgNF6Kl9n4WmIuhAnhi+3IOufxdbGRpJhxRt
83S2Bpz/M6ZMmWg6BP9bU7wd7TXPs7k8Bufj/foXx9A2ETV1VrfpsOhISfVE
a0r7e07F0sHOiPdCIlr8haZU2B06sOxe2lOBZj061yyTgPNbtXdwCD3Y++xS
eSIdJhIqL69pxPpeVDnrJNyfTsX9U0Fn8ch2TCXTQaq4iG6Fjrj/zT/sPh1G
DaVrL6Oddycqbk2lg+aLTp5UtGaDRXd5Gj5/ZpdmLXrdSf7r1uk4P1VbrX6g
52Yadk1noB+X2Au85YbO60G9YY/oUM8df0wdXSqmE7E1iw5Tga932KGTcxf2
vcqmQ2+58uwVdMChgmHrJ3QwPT3y6AHa+TPz1nQOHdSERg/Vow3d5OHGMzqk
+6q2jaPlOQbHt+bi8+pXHhJswvwT7yW8ysM8BeMfqaMHlWwP2RTgn79R+MsW
Xfpm/a/pQlzvtiI7rqCjbd7dv/GCDkGyb0zS0F4TIUdlS+gQEJf3Xy3aJvDg
wqtSOhy1/G4xhtbc+C/Dpgznm+f0vrXNmP+TYvOZcjw/T0lwq6FZdc+t3HhN
B8MlqWpL9OAHxSeylXRYDiNTL6LrqSM2r6swn4KZv0norJU0DttqOlyUqfCu
QAfcdsibqcH+8m/tHUDbyG86FV6H/XBeZjfnO25QedW+ZlsDHeKfFXsooAVP
RBS/bqRD04fIJBP03PfDLrZNdJi/lZnrhu70YVv3q5kO07fZ8m6hSwXLX4W3
4Hq7mpxchE5+eIG2rY0OEWsuenahA/arbapop0Prp9saS2jn1vFq2w48H25P
DWxpwfxdHrn/+kAH7fEbPrpo8cXTWyI+4fjDXVmc0XM3xd5u66IDSPqfvYZu
kvl0oaIbn9+isyET/bw4eqtdD+5/H5n8b9HRJkfbfn3BfjU7CBNor/7VVyK+
4fuTc5b2/K04/guVCnJ92H+j6WdU0Zq8Pp8q+vH8cVS1OoEWT9UIshvE8/fa
4i4vNKvGtMrsEB22cbMsx6EHGx9/ifiO+1+cbm4xuv6Ua5jcKL5/6Xll2o1O
npXcUzlGhyOhFz7/RXuFfh6wG8fz2phmJt7GDUe3xEXNTuB8tCfkHUCr5Jtq
35ykw1gT28optKDhmjG5aZy/0QyNAPRcT01c5Qy+H/kUaJuG7nT3P/jfLB10
DyeQ3qBLV++fmp2jQ9H3EcdBdPLduaSbf3D/p7gbcLRj/irPj2xfwP65rCa8
De1cQ/1duYjn/7sdrYfQmnayD/5bosMGIYfzJLTg5Lfjc8t4Xvyt4QxBj15N
XLq5QodhDdegTHTTJsus7awMoJ/XHq9HP8/ht6piY0AuzVhnFB2t18hmz84A
+fpIX+73OP5PQc/mOBjgo83zSB5tQ9exj+RkwDXf0pdH0Jqsi1zy3Aw4rZny
koIWjysorOJhgOm2lw9D0aw7zjrZ8zKg4RePbxa6/7U8/28+Br6PiTzQgC61
GHwZyc8A6X+Hf4ygo0fvkeUFGTCSsvsqVwc3UK7YCr9ZxwCuaYvV29FH1wtV
2QsxYCw10/MwWiXzHfO3MAPUScrvXNGC2qGbozYyoHx2ZN019FzbwXp5EQaE
/evQy0B3uv7zfCPKgM69vxyq0aV/i6UcxBjAbXPQeQCdHHXu3W9xBlQJ1Fiy
fcD8ZZUuR0ng72/0VpNC25SOyClI4fik7Rd10ErHH3S8kWaAzZBbzkk0x6BD
gMNW9IYiY1/0qPcmpT+yDDAo/ffxLrqJ7313lBwD9tYcsytFP0+LuK4gz4C5
ac6RTnT0HsPd1Qr4+xPFUX/QXk1sfQ47GeBc9Pq/DR+x/unyiD+KDMioEzui
jtb8fUEzWpkBpXdbbSzQ4jfUviuoMkDg6eewc2gWyYlb1WoMYF468C0G3Vnw
CE7uxtf3XbDMQz894jTxRx3ndxffZBs6+KtYYvQeBoSKXsom/v0y5dynQzv2
McD9OYQIfsL8uWJ+VWsyoPjc6RBV4v715KMpJ7UY4DHQk22GFlTjNJnXZuD7
sfxJd/RcbeVCtA4DlOqGrGLQnf/5PNyhywAWLc/ePHTplMaJGj0GDJ88Ff4e
nRw8vXJSnwHxuY/sZtGeok+ezBswgFpkYizcifWfudrGHGbAlimzkxpoaX2p
1TuPMEC0v+CWNZqj63NejRH2g8CFH97oUUbcqVNHGTD4L94lEd3EZsa7YIK/
v2szWxn6+Z01JTHHGWCr9q/iCzp6Z63LTjMGPAzUS1tBe1X6r6s1Z0Bs9kiG
VBfmb7X/9SkLBmipTr89iNb8MUdbsGSA5j17IVe0oP/zTbessf8u7vALQY8I
0Wp22mK+R0/yPkZXZMl61Nrhz+/PvWxGpx3o3eJoz4BDy9MRU+jg94lvFxwY
QJ48Ebi+G/MnW3rfOsWA3yxiCRroo8v8soqnGWBRbtRui1aJaWyrdWKA5/Ne
RV+0oFzwFUdnBrxz/fo4BT37UmfHogv2D0P/aDW603Tx0y0SA8rM1vOPoEuG
CoIUKQz4mWo8u+Yzjv/SWdU6Ko53fOKvMprMr/DVkc6A1opFWQs0pA+GLTIY
YPbUw8MbLb3v/p7bZxlgZGDVl4TmeGc7qOjOgPANDz0q0aNOQtF1HgywzHfa
Noxu+vNO+7Qn9ldO+BJPD/ZfeOjYohcDvO9snVNGR0vp37l9gQHr2HcIWKI9
i/4dVLrIgJprKSaX0DbGJVN1lxgQkh+ccx+t2Hsu+bQPA4a2fFauQXN4KRn9
9cV+ckjtGEN/4R79fduPAQqru+4KfMH87z14oBSA+1FOYLAGOm3XSdP6QKz/
4160PTq4ftPy6SDcz6yUKgLRFIf3WX+DGXDkmqpgFtpoJsIq9jrO5/qsoBa0
0nXDVcqhDPwcFyv6Gy0otup5fRg+X9afdrGvmP/zcnuncAZED7XkHEQ3GXhz
L0UwwGloy2MqOq1brSg2kgEzB4cao9EXz044KUfj8yXJ8BH33zuwZ/I3xDBg
/Ea3ey8aEpzKnG7jfOXwLHB+w/yVxClLsQyYuF+QRtyHz/Hmk3DcHQYkrnQy
rdGj1jFVygkMkKV5O/ihG8ePnm1IxP0r4BbzETongFPsTBL2U59CWgs6ekNV
/VIyAwR36Mz/QXs+9vGKu8+Arn+tbpK92H+wR1olFdfncu+aI2jpD9PvGtIY
kFd/tsEdvUB5cvlMOgO2sl3JSkR/+ee6fTkD9/ujvE/eoCtuSX2Ie8SALKPN
bePotO09ASpZDHBMebxpQx/mXx6n1JiNrzddHqiDJpubfT7zhAHHBsz5KWij
72tClnMYQBGlvYpBK/rU7r7zDNeTFmdUGVpQMKBPJZcBcVNyQcPokYz9Nxvz
GFDd05wo0I/1NX9rOhcwIDNz4b0mOr7l+fflQgZsW3qs7IK+6Ey7fecF1vcb
yolEOyzI6qqWYH/3PDxWioabvRONpVj/5ZTgEFpa5m6icxnmW/fmD/8A5l9s
efhfOfZvtiTLfvTIUYHZO68Z4MDPtcMV3djXmKJaia+fdsk7Gp1zPtjkbRW+
vsDFkTJ08BpYdK7G842d/TJxf4ZDyuLDfzUM2B4Rs1dokBt2qxeeiK9jQF/x
1kxAb2o8y6LWgPtFbGstE71wUiHnbSP2m8n+0PvoL78GbV2aGGA4dM3lPboi
5P7qlWZ83ns1//EMcUOquF1+fAv6Ew9dHx2cJ+So1ob7PS8tLgBNPtzC29TO
gPRPf7sr0UY9oSUuHQwomXy/j2MY83fXd135gOe3/Jp8YzTH6pV1CZ8Y8NWr
9FAs+ktiyWu1Ljx/hv7O9qELlD3pTd0M4MkYK1f9jvlXK4m49uB+sZKWGoS+
aDtas/IF+9dBL6Ubbf/zgUfCNzzvDL6X7BrB/K+elNjVxwBe+9yfkWipTSJN
Tf34/GcqD0yiOXLee7sO4n6zf1+22Sjmr3tTlmUYfz6wX/UFuvGjYXvCdwbo
X5h4LzGG/Udb5bdrFPtH7VzMDfRFllc7mscYMMX8RV9Em8V6d7qOM6DiQewZ
+g/MX2FXMMtPBtwmBZ7vQ294PaGaOMkA37MDGbbjmP+JzK+7phlgHjkw3YHu
GXG60TyDr1/y1O7EBObvK76XNIv7C4tHbwc6dV3nIMtvPJ9u/XfV9ifm/ygm
OvEPA6SqEw/2oclaJgd2LzBAlcVRij6J+bdx/mhexHw+9ogtoqVdq+6Qlhhg
N3dQ48YU1l/00Wf9xwBhhQaGxDQ3tEXumU5cwfPSKfVNETpv60zyblYmPM1m
22tG3E9T8sToHRsTZlW2vv2JvniM9IfEzgRdvQO+kb8w/wGpdNbVTNh+NOzY
rlnM37vH9C4nE9J69HS60VJ8d5Z3czNBPO3B8aA5zD/NLPsdDxOqaKN+qr8x
fw1eazIvEzzkzVv70BVva1exrWUCz7iYbuwfbohzDHh+l58Jl4ZC243nuYEx
t99BXZAJQ+TuII4FbjAN+83dso4JP8dMbarQahK5RWQhJmSwqpoELnKDcAHt
DNsGJow4vz5j8BfHb7hNIGkjE2x+6iYR9zv3fOktUxdhQnbCyu8OdIXHXUqL
KD5fEHimLmP+nFYbKGJM6J80EXL/h/knCbxh28KED9oenw6u4PhV355NkmCC
wOx8uQgLD+yuDRbTkGLCeKlS/Qya5z9oaJFmQqfD6d/vWHlgYnLRi7KVCYFv
vxk+ZeOB1qBC6VXbmPBbePF11CoeyBNxa0mSY8KwB6v9eXYeiH2q4KMhz4TW
/Ybipzh44OLBoe2tCkzY+VOK3Xg1D9h33v9A2cmE9B0DApqcPAAMu8BVSkww
LO07uJOLB6TYhJWTlZlQGeSZLMXNAxx3Wj5rqGKeib/ERXl4oGdHWEirGo5H
ubhGeA3Wr9BXp+5mgs89sVghXh4Is1zpW6XBBKqLT/gGPh5gjJXcTN7DBEv5
3U82r+UBUz/P/Xv2MaGkIHVWhp8HP3crj7RqMkF1XsZVWYAHhLNGb1O1mBDK
s5n1gCAPLGin67IfYMI2+ZGa4+uwfvvJn8k6TJAunihwXs8DFSSRu3t0mRCl
F/nOh7ifa+n94TY9JhReUl0fL4zjj745S9Vngram5tWiDVh/25FU9kNMiA0U
kOjcyAPbX646du8wE9h9xb4vbeIBbtNXi3uOMGH5Ut3nraKY/6D3ozYjJpz8
fXn5+GbM/+IuC9pRJuREZxy9IobjX/uTheMYjm9TbsMzccz/QWbOveM4n1d4
vQa3YP29Z+z2mjHBc2DbcTFJzL9ZnLPdnAn3ItxsrKUwf6fOfJoFE9ZN2kXH
SuP4/8Q4clgxIeWBzeJHGax/w4TvvjUTkt2/3NosywPVklyle22ZIGx08uSZ
bTyQWVjl2m6H6+mImd1TOR4INfJdT7dnglaRYsjSdsz/254KjpNM0GOnj5go
4Pg9Z+j3TzFBsj34ctoOzJ87R2TfaSaUjc3pLu7E+vdIte1OWM9gr5alEuav
Jn2O7syEjtWN1HxlzL+uR2K1K65XP/l3QqqYv/2dpvskJjhsoCleVMPxT5td
3EdhwkK0961vu7D+Nd5t76nY769sQw6p84D+5rp2Op2J/92g+YkG5v88wG81
kwnulk7fBPdi/gZaO1POMsFIxPeV1z4cf9fvzn3uTDgw5kTt1MT8mbnB7z2Y
EMHT179PC/NfRVdjeDIhc7haLlEb68dv+7b6PO4fwj17Fw5g/op9N1Iu4M+t
ZoWtAfOvurtX8yITDsV9fpWvi+O3thp6fwlff/TULv6DWH9cIIbhw4TdkcfP
UfR5oM//7QHOK0zYNON9pcoA8xe+9iPFjwlOD7MtRA9j/tkQrxnAhDlq/pyb
Ieav81e/IxDXk7zT6dojOP6OwmlGEBOOzgXfETXG/Clu9ziv4fzz/bzDOIr1
/ykYp17H9fWZ4vTaBPO/NfRHM5QJvTP1v/mPY/5yKekdYfjzdZ8tTpli/mV2
ZsxwXH8ybj45Zjh+M+F/nDexv/fbMBbNsf5wS3ZqJBOm75yRO2TBA6cvh1nv
j8b8052yoywxfwED9g8xTHg1K/u7ywrzz1h5zrzNBFmjKzzSNjh+zVIHrjgm
MCO1vpNtMf93njxpd3B/6VYNf2qH+Z9RfrE/AdcHQ3lh5j+sPz965kMiE+wK
VytpOGD+EekCZ5Nw/zMMVfA+iflLnyrnuof744+Qn8WncPwvRKhp93F/CP90
cd4R6x/t2KCViutV/3CThhMPLPfefPMhjQndttlD585g/l5H3M6mMyFe633N
M2fMn4ddnPshE4RCb9PHXDD/+68a0h7h+Dgru2RIOP7dF89rZTHhY9YOPnsy
5t+wS+ZjNq7fqEerb1Gw/smfLWefMEGdg6u2nor5/8r04X6K+/8VSeNlGuYf
ckb+wTMm5N2rjlVhYP5iWz5q5TJh7676DCcmjj+3M/BjHhO+qK9cunWWBx4e
uqXsVoD5NWkLv3HjAd/PJj3cRUwIOGzjOe2O+btxhT54wQQTWZn4Lef+V2GZ
h2OZfnE8RjGPPVve6KdVQiQT4s2xhhomyQiVSsOYem6vfem1ZQlZhoSSiexb
KclIlH0Lyfbac9VbCkWLijLn9+fnup7rOdf3c8597hv9r274hfkvDe9FPEMs
vDD/VfbUQDUNvRw5VW9v9K+mneBeg/6jPl3P9EH/DQu6VC3ePya9vc2+WN+u
9PXNOhoOnbvYMeuH/mddUpiP8f8Rs1ESAeg/bJPhYD0NbP1Bfu1ACs7KjM25
N+L3AesPOJzH+iWp16hmPD+QeIjNpoBhYG2W04LnrU1wfWYQ+u8X+sRso0HE
zzn/YTD6d2vJGmyn8b3r/nkkBP2vhFqyOjH/XX6Br6Ho/7LeEtWFfrgrI5IX
0L/SYn5ONw2O0eoeauHov7bcZt9TPA8T7u1mEej/8FmeoV4abtumvXCKRP+v
t5Wx+vC+iwl65BuF+dnP7QUHaHhqtHQs7iIFk+IZ/LmD2D8fbk1WNAVVebYV
+zg0CBuvG6uIoeCqrvjJoWEa9i651jbHov+eDmGPUZwPmXKnwUvo/0xkteA4
1tNva+DGYf5v4JI7QYO4Rcyrj/HoP2FJQv85DXu0n3TwJGL9LZWPhqZokNb5
y134b/Rf5X7O4wUNhQXMfpkk9P+rMkOIS8MqsQ3fFJIpKJ962Zz76v/95Y5v
v4z5fW946k/j+6GDXFBLocBJyEGB8wb3jWTKK80rFGhnST3xmKFho566oE4q
+t/T4y80h+ehbP2cbhr6b4/ZlveOBtefNBKZ6ej/hMkz/Xnct6ss55lX0f/H
lWDOAg0C6RbizGvoP7paxfMj7osZ3vd7M7D+Bm+O0Gca3phbx2ldx/7fVYvM
W6TBUllyWiMT/Zu90YCv2E+dLT+p/kPB1rGcCc43GrwPHB/ZegPrs05c8lym
QdU5kyWfRUH/GoaO8A+8P+49apLIRv/X+l7mreB9cT1rUOAm+ldPSAIeAswi
+fxlZHaTuf4wLwG5FHHNdzno355vxpOPwDlT+6DJXPT/rjZNeA2B1X19ET15
FGwL9zfJ5ycQEnrcoi4f/ctqLsDPBEyU+CpLCiiYKZ3LHKYI9Ow0SE8rxPyG
hQe8hAiUyXU9CivC+oOnvwiLEDCXUhP9q5gC1tkNufmiBJ4ueIUcKqHgCA/n
kIE4AZ0HtOSeUvR/JfnH8FoCSUNv29eVoX9ly2IvSQICsjU3vyJ/rxOwE5Em
MFd2K3PoFvq3aeArkCEwpZ764N5tCuqn2eUGsgT6042+JZZTuDe0j48wCEia
R9q73UH/Eh8obzkCjry7Rg3uov+C0vsiGwjMzkoFy1Rgfqarc8H/CGSn8Ru9
RWb0bhI33Ehg+cOQ4sN7FMz/MfZwZBMBedtjqnGV6H8p1c17C4E1Aa6HHe6j
/0RrGdFtBLyCu9IVqzD/VuHGAkUC0m9Pr1pAZle3uBsqEWDnfY+s/hfnzypM
fnQHgV9XsVRDqykwfKHX7q1CQLUk+YPJA+y//6KP6E4C0/W6HIEa9C9yZ3Oh
GgHvev3xNuTJ7LM9hrsIUPE+vNEPsb6WIntUg4AGfd/EtJaCxM7nSj6aBOrF
hvN56tD/yYwB0T34fXTl9gfIRz7bXijUItBotbXV4xH6jxVXN9IhsN1oJWL7
Y8yv0Dk6upeAcL78qVHk7xWR0T56BMa22DvG12N9c4M9YvsIdHbEe+1rQP/j
S1OF+gQKxK4UzSDnelYmGBkQ2Nhl8SOtEfMLsPTGDAnkGl8kRk1Y/7rytI8x
gTzGjh9vkVU0uClipgRcHYWKkpopEGu5YVi0n8Av5wU9tVrQv4PDOyNzAk7W
fEeHkfvfS2WMWWA/5fscAlsxf0SPme9BApWhdoGMNvTPiP0kZklgUwy5fx+Z
fcsku8iKQEb+oujhdvRvvMrK+BAB2/Lu8BlkQ0710pg1zteLAanwDvRPexf4
2hAw487Uy3Zifl71I+K2BGrq5mNLkftT3/AU/05g7VSTu/4TCkpUcsuMjxJI
22LB6kZOfHzCYdyegELTibhjXejfliHg50iA4fq6cRr5yNu+CvHjBFLWNct4
daP/kISTxSdwHsxGIpaRZaUsRExOos9uSvRCD9Yv5HswforA0KzWXf6n6H9f
nYufM4FhM1OPGOT6Z/6Sa/8g4D8re1CwF/O7aj4udiHgZpUKMcis73PnTP4k
sNf8phX/MwrMkwoZE24EAuQ2+4chqyg6t/idxf6wlmuWkEVqNnitpQkY2Emt
9+xD/79xFEoIgfemNsmvkfteJj8xYRE4tf7GVsd+9B9gGTDhQeAMY/LpE+R0
0Z8V/b3wfL1bSmUOoP+chmdrfQhsuzXiW4zspBMUUuKL56HXhSUziP67tFVN
/dGHbnR4KDLj9AfORAD+f7dS+TTy/GJppP95Akpuuxathihou+S6WyKIQNxi
rG0FctHGzZMlwbg/7Dd3S3MoiK8cu2QaSuCO/5STLzLrQJrOZBiB5uwKwQFk
m0lrrn84gZ2xEd0aw+jfWzhZIpJAk5VBSRyyLNWqXxpFYN6rL4uL/D0zbMY0
GueVq3ybOYL+dzPTJ2PQ7xfNwSTkqtZFk4BLBJzPjElzkeOP3VmQiCdw7DcJ
ojVKwRl83pcmYH2jpolIZPMoxYP7/ybQumvKtQ95h9zUl8kk3IdeRymFMQqE
yzNyAy4TKOpkNP6JPG/yu7XkFQJ+ztJXypH7hsVXSlMJ3OvUC1lEriKdxfvT
cX5+BIXpjqN/vii751cJfDvalcFGZqcbrA7MIGBZINf9ENlm53K5ZCaBKllH
2WVklYbK42X/EIgxDQ7UnqCA144laJZF4MtO/08eyC9nlKueZ+N+0mVGFSO3
hnKdA3MIqOjWqU8hF0lniUvl4b52+TAvPUlBXLFDbVk+gXCjc53myP8B05Wo
Vg==
        "]]}}, 
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[1.6], 
      CapForm["Butt"]}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 360], 0.002777777777777778]], AbsoluteThickness[1.6], 
       CapForm["Butt"]}, {}}}, {{}, {}}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{Automatic, Automatic},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->FrontEndValueCache[{{Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}, {Automatic, 
      Charting`ScaledFrameTicks[{Identity, Identity}]}}, {{Automatic, {{3., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {3.1, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {3.2, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {3.3, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {2.9, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.92, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.94, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.96, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {2.98, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.02, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.04, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.06, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.08, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.12, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.14, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.16, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.18, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.22, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.24, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.26, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.28, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.32, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.34, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.36, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.38, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {3.4, 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}, {Automatic, {{0., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {50., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {100., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {150., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {200., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {250., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}, {
         AbsoluteThickness[0.1]}}, {-50., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-40., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-30., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-20., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {-10., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {10., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {20., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {30., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {40., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {60., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {70., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {80., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {90., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {110., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {120., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {130., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {140., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {160., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {170., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {180., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {190., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {210., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {220., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {230., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {240., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {260., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {270., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {280., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {290., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}, {300., 
        FormBox[
         TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, {
         AbsoluteThickness[0.1]}}}}}],
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImagePadding->All,
  ImageSize->{1062.8753869968925`, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "DefaultBoundaryStyle" -> Automatic, 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> 
    AbsolutePointSize[6], "ScalingFunctions" -> None, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.8504654220840316`*^9, 3.850465486131172*^9}, {
   3.850465521585468*^9, 3.850465547549424*^9}, 3.8504662131498795`*^9, {
   3.850466441653139*^9, 3.850466459239359*^9}, {3.8504677046736794`*^9, 
   3.8504677237681484`*^9}, {3.850468043006319*^9, 3.8504681084912634`*^9}, 
   3.8504681427584496`*^9, {3.850468713060189*^9, 3.850468758589138*^9}, 
   3.85047037924429*^9, {3.8504709551368413`*^9, 3.850470963957961*^9}, 
   3.8505392959510794`*^9, {3.851056347190409*^9, 3.8510565154744625`*^9}, 
   3.8510570256348968`*^9, {3.851057545310006*^9, 3.8510575539357643`*^9}, {
   3.851057837924884*^9, 3.8510578489230776`*^9}},
 CellLabel->
  "Out[1153]=",ExpressionUUID->"eea72658-7214-4b20-9de8-199886a7a4fa"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<cyclic-shocks-100mM-120sec.pdf\>\"", ",", "cplot120"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8504662170751324`*^9, 3.8504662246011634`*^9}, {
  3.8505398426123204`*^9, 3.8505398429341326`*^9}},
 CellLabel->"In[69]:=",ExpressionUUID->"1d199c82-5a09-4e2f-bdaa-04a1c4714855"],

Cell[BoxData["\<\"cyclic-shocks-100mM-120sec.pdf\"\>"], "Output",
 CellChangeTimes->{3.8504662358051305`*^9, 3.8505393085390687`*^9, 
  3.850539843604568*^9},
 CellLabel->"Out[70]=",ExpressionUUID->"ca9c5358-ee6b-4472-8124-e7941c991a71"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["endT"], "Input",
 CellLabel->
  "In[113]:=",ExpressionUUID->"4c47f254-f1c0-4797-98a8-0ff041b8f2b8"],

Cell[BoxData["5.19670713191572`"], "Output",
 CellChangeTimes->{3.850465469612779*^9},
 CellLabel->
  "Out[113]=",ExpressionUUID->"166338ef-d1a3-415f-9583-89409b448a20"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"s1", " ", "=", 
    RowBox[{"2", " ", 
     FractionBox[
      RowBox[{"3.10657", " ", "-", " ", "3.0263"}], 
      RowBox[{"3.10657", " ", "+", " ", "3.0263"}]]}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"s2", " ", "=", 
    RowBox[{"2", " ", 
     FractionBox[
      RowBox[{" ", 
       RowBox[{"3.06814", " ", "-", " ", "3.16422"}]}], 
      RowBox[{"3.06814", " ", "+", " ", "3.16422"}]]}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"s1", "/", "s2"}]}]}]], "Input",
 CellChangeTimes->CompressedData["
1:eJxTTMoPSmViYGAQBmIQLcfl/lNvwxvHacUvGfWBdNuqShUQHeycrQOio3h6
zED0Ge5FYLq4I94dRKcdPh0Ioqf8CCwB0TX7D1SC6Fvz1/eAaKYJLZNAtNiq
6vkg+twE/WUgWnmh5D4QLRpYdRREx+SmSxgA6aJN2+RAdK/a6l4QzSFzahKI
3sO2fj6IfrU5eRmIFuwK2Aqip71ZuwdEb5jQfh5Eu6xuvgmiW7pdn4LopIpj
b0F0RehypyCQefw2niD6bzJnOIgOFJwbDaIfCH2747fxjePVLRyPQbTUbJVM
fyBdnHQ8F0RXPvS/CKKzmKqug2gAJbuaHQ==
  "],
 CellLabel->
  "In[1399]:=",ExpressionUUID->"bd42cb84-779a-4c65-a42c-3949e5ee3bb2"],

Cell[BoxData["0.02617697749993072`"], "Output",
 CellChangeTimes->{
  3.8504673523112583`*^9, {3.8504676703453574`*^9, 3.8504676844474983`*^9}, 
   3.8504677658250732`*^9, 3.8504679848148365`*^9, 3.8504683033797274`*^9, 
   3.850468500814396*^9, 3.8504686635068645`*^9, 3.8504689084589586`*^9, 
   3.8504696224521585`*^9, 3.8504705511167517`*^9, 3.8504707081693225`*^9, 
   3.850470886231676*^9, {3.8504710740751867`*^9, 3.8504710985954294`*^9}, 
   3.850471128887246*^9, {3.850471250349904*^9, 3.850471278674803*^9}, 
   3.8505395952996454`*^9, 3.850539741984641*^9, 3.851056920924984*^9, 
   3.851058031883765*^9, {3.851058871428397*^9, 3.851058876496174*^9}},
 CellLabel->
  "Out[1399]=",ExpressionUUID->"5708114a-0068-4b2a-87f7-103ead018851"],

Cell[BoxData[
 RowBox[{"-", "0.030832621992311012`"}]], "Output",
 CellChangeTimes->{
  3.8504673523112583`*^9, {3.8504676703453574`*^9, 3.8504676844474983`*^9}, 
   3.8504677658250732`*^9, 3.8504679848148365`*^9, 3.8504683033797274`*^9, 
   3.850468500814396*^9, 3.8504686635068645`*^9, 3.8504689084589586`*^9, 
   3.8504696224521585`*^9, 3.8504705511167517`*^9, 3.8504707081693225`*^9, 
   3.850470886231676*^9, {3.8504710740751867`*^9, 3.8504710985954294`*^9}, 
   3.850471128887246*^9, {3.850471250349904*^9, 3.850471278674803*^9}, 
   3.8505395952996454`*^9, 3.850539741984641*^9, 3.851056920924984*^9, 
   3.851058031883765*^9, {3.851058871428397*^9, 3.851058876528902*^9}},
 CellLabel->
  "Out[1400]=",ExpressionUUID->"d1b56278-0f3f-47e3-9598-8f36f0090475"],

Cell[BoxData[
 RowBox[{"-", "0.8490026409839126`"}]], "Output",
 CellChangeTimes->{
  3.8504673523112583`*^9, {3.8504676703453574`*^9, 3.8504676844474983`*^9}, 
   3.8504677658250732`*^9, 3.8504679848148365`*^9, 3.8504683033797274`*^9, 
   3.850468500814396*^9, 3.8504686635068645`*^9, 3.8504689084589586`*^9, 
   3.8504696224521585`*^9, 3.8504705511167517`*^9, 3.8504707081693225`*^9, 
   3.850470886231676*^9, {3.8504710740751867`*^9, 3.8504710985954294`*^9}, 
   3.850471128887246*^9, {3.850471250349904*^9, 3.850471278674803*^9}, 
   3.8505395952996454`*^9, 3.850539741984641*^9, 3.851056920924984*^9, 
   3.851058031883765*^9, {3.851058871428397*^9, 3.851058876562812*^9}},
 CellLabel->
  "Out[1401]=",ExpressionUUID->"85855366-d40c-49f7-a377-f82581b7f54f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "this", " ", "data", " ", "is", " ", "extracted", " ", "from", " ", "the", 
    " ", "cyclic", " ", "figure", " ", 
    RowBox[{"above", ".", " ", "It"}], " ", "is", " ", "really", " ", "hard", 
    " ", "to", " ", "nail", " ", "this", " ", "down", " ", "since", " ", 
    "the", " ", "answer", " ", "is", " ", "sensitive", " ", "to", " ", "the", 
    " ", "details", " ", "of", " ", "how", " ", "this", " ", "is", " ", 
    RowBox[{"measured", ".", " ", 
     RowBox[{"That", "'"}]}], "s", " ", "becasue", " ", "we", " ", "are", " ",
     "looking", " ", "for", " ", "differences", " ", "in", " ", "strains", 
    " ", "which", " ", "are", " ", "on", " ", "the", " ", "order", " ", "of", 
    " ", "a", " ", "couple", " ", "of", " ", "percent", " ", "and", " ", 
    "the", " ", "magnitude", " ", "of", " ", "the", " ", "predictions", " ", 
    "are", " ", "10", "%", " ", "of", " ", "that", " ", 
    RowBox[{"(", 
     RowBox[{
     "so", " ", "precision", " ", "of", " ", "0.2", "%", " ", "in", " ", 
      "length", " ", "is", " ", "needed"}], ")"}]}], " ", "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"downStrains", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{
     "0.025714267123867027`", ",", " ", "0.026692087702573926`", ",", " ", 
      "0.02794622914493498`", ",", " ", "0.020280233920751792`", ",", 
      "0.01688115114380704`", ",", " ", "0.0181441088739745`", ",", " ", 
      "0.018541984507093136`"}], "}"}]}], "\[IndentingNewLine]", 
   RowBox[{"upStrains", " ", "=", " ", 
    RowBox[{"{", 
     RowBox[{
     "0.030946448213604188`", ",", " ", "0.032130932180195915`", ",", " ", 
      "0.032594673581655714`", ",", " ", "0.03212746721470036`", ",", " ", 
      "0.028910686628807462`", ",", " ", "0.03025780853087901`", ",", " ", 
      "0.029455099953031222`"}], "}"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"whiskerChar", " ", "=", " ", 
    RowBox[{"BoxWhiskerChart", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"downStrains", ",", " ", "upStrains"}], "}"}], " ", ",", 
      RowBox[{"ChartLabels", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"\"\<Hyperosmotic\>\"", ",", " ", "\"\<Hypoosmotic\>\""}], 
        "}"}]}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "18"}]}], "]"}]}]}], "]"}]}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8504677804544444`*^9, 3.8504678115196924`*^9}, {
   3.8504679914967375`*^9, 3.850467999520158*^9}, {3.8504683184073877`*^9, 
   3.8504683243108397`*^9}, {3.850468509070654*^9, 3.8504685148075027`*^9}, {
   3.850468687358672*^9, 3.8504686938875484`*^9}, {3.8504689154384294`*^9, 
   3.8504689210142736`*^9}, {3.850469094372741*^9, 3.8504691141179733`*^9}, {
   3.8504696453427553`*^9, 3.8504696502062516`*^9}, 3.8504703375904493`*^9, {
   3.8504705618313107`*^9, 3.8504705658756866`*^9}, {3.8504707216354127`*^9, 
   3.8504707263959475`*^9}, {3.8504709149961653`*^9, 3.850470923500269*^9}, {
   3.8504711351230774`*^9, 3.8504711398918915`*^9}, {3.850471286691737*^9, 
   3.8504712928118854`*^9}, {3.85053961942267*^9, 3.850539625182252*^9}, {
   3.850539747884908*^9, 3.850539753429601*^9}, {3.8505649758012457`*^9, 
   3.850565129687004*^9}},ExpressionUUID->"50cabe51-9a6a-46d7-9dc1-\
0e33c4989fa4"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.025714267123867027`", ",", "0.026692087702573926`", ",", 
   "0.02794622914493498`", ",", "0.020280233920751792`", ",", 
   "0.01688115114380704`", ",", "0.0181441088739745`", ",", 
   "0.018541984507093136`"}], "}"}]], "Output",
 CellChangeTimes->{{3.8504690967530117`*^9, 3.8504691148654547`*^9}, 
   3.850469650723501*^9, 3.8504703382520723`*^9, 3.8504711403992124`*^9, 
   3.8504712931504884`*^9, 3.8504839439487123`*^9, 3.8504840677565165`*^9, 
   3.8505392731135163`*^9, 3.850539753909191*^9, 3.8505398506198606`*^9},
 CellLabel->"Out[71]=",ExpressionUUID->"32b63c35-5271-468a-9cd3-ae5d923031fa"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.030946448213604188`", ",", "0.032130932180195915`", ",", 
   "0.032594673581655714`", ",", "0.03212746721470036`", ",", 
   "0.028910686628807462`", ",", "0.03025780853087901`", ",", 
   "0.029455099953031222`"}], "}"}]], "Output",
 CellChangeTimes->{{3.8504690967530117`*^9, 3.8504691148654547`*^9}, 
   3.850469650723501*^9, 3.8504703382520723`*^9, 3.8504711403992124`*^9, 
   3.8504712931504884`*^9, 3.8504839439487123`*^9, 3.8504840677565165`*^9, 
   3.8505392731135163`*^9, 3.850539753909191*^9, 3.850539850653966*^9},
 CellLabel->"Out[72]=",ExpressionUUID->"94bac85a-8bb7-40fa-8340-972b77a650cc"],

Cell[BoxData[
 GraphicsBox[{
   {Opacity[0], 
    PointBox[{{0.3836399216673073, 0.016095475021914607`}, {
     2.6163600783326926`, 0.03338034970354815}}]}, 
   {RGBColor[0.982864, 0.7431472, 0.3262672], CapForm[None], {}, 
    {RGBColor[0.982864, 0.7431472, 0.3262672], 
     {RGBColor[0.982864, 0.7431472, 0.3262672], 
      TagBox[
       TooltipBox[
        TagBox[
         DynamicBox[{
           FEPrivate`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           GraphicsGroupBox[{Antialiasing -> False, 
             
             PolygonBox[{{0.7754133086869819, 0.0264476325578972}, {
              1.2245866913130181`, 0.0264476325578972}, {1.2245866913130181`, 
              0.018243577782254158`}, {0.7754133086869819, 
              0.018243577782254158`}}], {}, {{}, {}}, {}, {
              GrayLevel[0], 
              GrayLevel[1], 
              
              LineBox[{{1.2245866913130181`, 0.020280233920751792`}, {
               0.7754133086869819, 0.020280233920751792`}}]}, {}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{1., 0.018243577782254158`}, {1., 
               0.01688115114380704}}, {{1., 0.0264476325578972}, {1., 
               0.02794622914493498}}}]}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{1.112293345656509, 0.01688115114380704}, {
               0.8877066543434909, 0.01688115114380704}}, {{1.112293345656509,
                0.02794622914493498}, {0.8877066543434909, 
               0.02794622914493498}}}]}, {}}]},
          
          ImageSizeCache->{{184.5857864376269, 
           284.4142135623731}, {-80.4142135623731, 113.4142135623731}}],
         "DelayedMouseEffectStyle"],
        StyleBox[
         TagBox[
          GridBox[{{
             StyleBox["\"max\"", Bold, StripOnInput -> False], 
             "0.02794622914493498`"}, {
             StyleBox["\"75%\"", Bold, StripOnInput -> False], 
             "0.0264476325578972`"}, {
             StyleBox["\"median\"", Bold, StripOnInput -> False], 
             "0.020280233920751792`"}, {
             StyleBox["\"25%\"", Bold, StripOnInput -> False], 
             "0.018243577782254158`"}, {
             StyleBox["\"min\"", Bold, StripOnInput -> False], 
             "0.01688115114380704`"}}, 
           GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}}, 
           AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}, "Rows" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}}, 
           GridBoxFrame -> {
            "ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}}, 
           GridBoxItemSize -> {
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaseStyle -> 
           Directive[
             AbsoluteThickness[1], 
             Dashing[{}]]], "Grid"], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}, StripOnInput -> False]],
       Annotation[#, 
        Style[
         Grid[{{
            Style["max", Bold], 0.02794622914493498}, {
            Style["75%", Bold], 0.0264476325578972}, {
            Style["median", Bold], 0.020280233920751792`}, {
            Style["25%", Bold], 0.018243577782254158`}, {
            Style["min", Bold], 0.01688115114380704}}, Dividers -> {{
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}, {
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}}, Frame -> 
          GrayLevel[0], BaseStyle -> Directive[
            AbsoluteThickness[1], 
            Dashing[{}]]], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}], "Tooltip"]& ]}, 
     {RGBColor[0.982864, 0.7431472, 0.3262672], 
      TagBox[
       TooltipBox[
        TagBox[
         DynamicBox[{
           FEPrivate`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           GraphicsGroupBox[{Antialiasing -> False, 
             
             PolygonBox[{{1.7754133086869819`, 0.032130065938822026`}, {
              2.224586691313018, 0.032130065938822026`}, {2.224586691313018, 
              0.029655777097493168`}, {1.7754133086869819`, 
              0.029655777097493168`}}], {}, {{}, {}}, {}, {
              GrayLevel[0], 
              GrayLevel[1], 
              
              LineBox[{{2.224586691313018, 0.030946448213604188`}, {
               1.775413308686982, 0.030946448213604188`}}]}, {}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{2., 0.029655777097493168`}, {2., 
               0.028910686628807462`}}, {{2., 0.032130065938822026`}, {2., 
               0.032594673581655714`}}}]}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{2.112293345656509, 0.028910686628807462`}, {
               1.887706654343491, 0.028910686628807462`}}, {{
               2.112293345656509, 0.032594673581655714`}, {1.887706654343491, 
               0.032594673581655714`}}}]}, {}}]},
          
          ImageSizeCache->{{400.5857864376269, 
           500.4142135623731}, {-160.4142135623731, -93.5857864376269}}],
         "DelayedMouseEffectStyle"],
        StyleBox[
         TagBox[
          GridBox[{{
             StyleBox["\"max\"", Bold, StripOnInput -> False], 
             "0.032594673581655714`"}, {
             StyleBox["\"75%\"", Bold, StripOnInput -> False], 
             "0.032130065938822026`"}, {
             StyleBox["\"median\"", Bold, StripOnInput -> False], 
             "0.030946448213604188`"}, {
             StyleBox["\"25%\"", Bold, StripOnInput -> False], 
             "0.029655777097493168`"}, {
             StyleBox["\"min\"", Bold, StripOnInput -> False], 
             "0.028910686628807462`"}}, 
           GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}}, 
           AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}, "Rows" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}}, 
           GridBoxFrame -> {
            "ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}}, 
           GridBoxItemSize -> {
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaseStyle -> 
           Directive[
             AbsoluteThickness[1], 
             Dashing[{}]]], "Grid"], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}, StripOnInput -> False]],
       Annotation[#, 
        Style[
         Grid[{{
            Style["max", Bold], 0.032594673581655714`}, {
            Style["75%", Bold], 0.032130065938822026`}, {
            Style["median", Bold], 0.030946448213604188`}, {
            Style["25%", Bold], 0.029655777097493168`}, {
            Style["min", Bold], 0.028910686628807462`}}, Dividers -> {{
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}, {
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}}, Frame -> 
          GrayLevel[0], BaseStyle -> Directive[
            AbsoluteThickness[1], 
            Dashing[{}]]], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}], 
        "Tooltip"]& ]}}, {}, {}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, \
{}}, {}}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.70295463955568, 0.016095475021914607`},
  DisplayFunction->Identity,
  Frame->True,
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {{{1., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {1., 
       FormBox["\"Hyperosmotic\"", TraditionalForm], 0}, {2., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {2., 
       FormBox["\"Hypoosmotic\"", TraditionalForm], 0}, {0.7754133086869819, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}, {
      2.224586691313018, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}}, {{1., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {2., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {
      0.7754133086869819, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}, {
      2.224586691313018, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}}}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 18],
  PlotRangePadding->{{
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{{{1., 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {1., 
      FormBox["\"Hyperosmotic\"", TraditionalForm], 0}, {2., 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {2., 
      FormBox["\"Hypoosmotic\"", TraditionalForm], 0}, {0.7754133086869819, 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}, {
     2.224586691313018, 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}}, 
    Automatic}]], "Output",
 CellChangeTimes->{{3.8504690967530117`*^9, 3.8504691148654547`*^9}, 
   3.850469650723501*^9, 3.8504703382520723`*^9, 3.8504711403992124`*^9, 
   3.8504712931504884`*^9, 3.8504839439487123`*^9, 3.8504840677565165`*^9, 
   3.8505392731135163`*^9, 3.850539753909191*^9, 3.850539850751378*^9},
 CellLabel->"Out[73]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
eJztXT2sJEcRnrczs3/vfDaSZSEiZ4gEjgBBRmCBA+slhgSBQE8Hp2dZJyNj
RHKSjwBhoUucngwR9hFffqQHWIgXkLzwwssuJxiq++uu7unpmanendm3uzcr
vb2d6a+qq6ur/6pq5s7OP7r41d3zj967ff7m2x+e//rivdu/efOHH3xIt/KT
LJv9MstO7n01o99VluHPfu7Qn7uMXf1VfedPnjx5+PDh8+fPs6vg+plDFRcX
F5n+PH369Abdmanf+b1798AweypC/cdxLKmSzH4eP36cnbZxFSHB+XONf/bs
2dnZGfCXl5fZOoL/hxgJzl9o/IsXLxhPv7NVBP9PMRKcH2nNkSTcwBj2XyIU
OP5NY1lrVP0ygv1ShALHTyMlS20tdG16ZqH5XV1dsYTMrwQVSf/o0SNFwbzI
2JR2NK+CftH1gwcPyIxARyokEBFR5yhcHpFD17tkWmidONBvssK5lpJ+mCJQ
UzE1XMlaRjgWsZZ51/POGlW/ZHPiTZfAUxHdn7XVZNpNd4kTI6jRSr5v7ELz
3W05Wt2eJdo2keGSeNXGiilY6Gsy1VpbSTzDZUl/RaQ26FHNP0YHupwqoW5T
RTNdzmPflJOSDX1r6zv0XPbUiXK2qSzXX6RKW2dQXx60FfxIMab86yNrua8l
x63dd5IsuQg0WNp7c5KQKqExQ3doB0AzSR5gtbbmThJav/Rgym2LqEit0TE7
161eOa3oqYqq4cqghwWUhA9mKtU7uubSH/uaYoPeKWRy5CwH9F/4FcNqoKlY
jzX1RBZFDNnaqFUp8/vWfZbUXiHFS9VT8tViXucIYehbtQ7y0qoFgdDC0s0+
2C1Cg+qX/hBc7cdjO+qijqSP4lXWuZKJ2D2ortsgN+mRPKE+NwfQDY+/vzPB
R+/tNJI0bZDfvA5Nd7YnBXtYun43zbYLXFPraGiCwo2vgnWPgVrZmb+ggQQm
9GNWv0PNeaVNQw5Foxl7BDXyLadVRGsbabqnntiKFtew4gMk0Rvkt65Pt9HW
SDCHodkfiW0XI0fNpLbmitcDt/dq3aEXPBKpYObxVqP8Zqv1cv1EvmjwwcmX
ZzAavJtrubsmuZbdOdFZnsR+B9dvT4skmEPRb6IVL/mUhIkAbhwyxHmEA1rj
1iLYLo7Wik+b7fbxwSmG2kDqVfLpmangfeeGeu6rtVPPha/nEHVrZ9odAnNo
2v1xkgWDH9ULDK919Z18XFrHSenxZkvL2i04GNdKx8YNGp6yNjn7S+Qe34aH
0+8QmMPTs9yascrzCkM/nGTOiyTVtn992mvZ3L8tc7yLQjAP+Ao28s3mgnpT
Ne44SSx7WF1LdHh8eg4tm0qu9Cdbqq+gjvquB+PYxePKCP9gL6diOZqKD+eN
XlVc1eoGSvbdtO/5XESQFmq134xFrmR7uu7a5Hs6xad9z7wjHUt0d0T6dXvm
17g+Pn1QE6Bb9h7SiHTnZ+f7CM7P1GLoiWcZK7nZMStJcuZDKMMnOOnSj0Xj
jptR3Gy1ZF6uZXlEzrzR55Ia5RpW7Y15LcbQbb+Wjk2TMVvlUwap0Y1ysi9D
M6skXkzVK3lgn/O69GadxK4r9JVzmgIVlA3u7Pc0c5aaGdYsVz1Kls19Tz1k
Djx4bDn9tXbqO/Tfu8wTEuHWmFoWSH6sepXviesrOq8mpETe2ywZTY3wQzrQ
gBs5HE0CmsiUNnDXBIFsgWtHLSZAECJHTMvXRjSWVPKMTh91F/wYSyqk+o2+
UcaeFCDUaFP3F7A8eHJB6SJWzn8rlCtYacQ9OPc5IzFjkxjk4D2a1OKp79r6
Th6VDHY11ED0Jc8txNFJR7IbKPItXK4B9n0udwG5CG7udDwIYyYo7gfuHWTe
LTXO+QHyQOZSfUV8XshRZITxLqvKFoG+C6svMzHq8tLnqHflofaDa8hFXWpE
2yS7ZVj9By1q5MO0lx+qjuU5LkFcgARbWKqCo6P2TskDHHliTi6kARjurjy3
5VCAO5/NscMkfqiauhDeZGTIYSVFRiOS73CqCPPnuNiNpII5E5L3LxDc7CJI
bySvqoPLQWQy/NpkiI/m9l7izCWqzWkLOX/KkiVrybD9s+psX3fpMfaAfEX4
JIL5voDu4wjm9gHWWtiRTWpT+/vvbShFyOdnSVJZz5i6ixWB99xk3t8VytTN
5adiif5kbdlrW7iH+Y6Az+8FfH4ilupTzQJbfew0JHr5pEEFPVTm0/+ExK6v
3tE/79xRf1+jvxO+m+XqNtr55+D6v5HykyOktrp6Y0LtBOVAVfW6ud5/qSfU
fqD+QF/fvn//vrr4xRZIBfyM/p0ZxG+rLkv0kb/rrHVCTsh9Qx6Srd+lr/P/
/V0FNqq3J+SEZAv2ET+ouix4n1tyfUg+T9LRpebxMF4JRFXhHsQzZaWEwvMx
rHW588jnPfQrsezg5PzW8B26J99cPDaIcfXQdEnfR78QS998wkNnnGsV+k8I
Wd8Qog7so6y8pysKqA75m2FUOohw0+FU54WUfF4WcyrT2uYiN1QfIoasVypC
5PLy8hJP3JroTh8V4oysHzIbJftaQCnvGd1Q7hgX4/YjUfwUOYOamEBWuAUy
CeU8TVauQvnkmp7+IC+dipqYeVTWhZRSLqv/EoAwt4h0sazrgoqamEVU1rmA
MkFWZUBw74TPBhta8GJING9pXtefyeruoyrSpOSREPqk+qRWn1VdQjPC+qgS
9biVhBjbfmZF+3PtdQlLkuJ9T7K3zL2hJDvVkvmv3ohFXK9Td6f13q1F/QaT
kAkhIfRhbTuU2C/nZ0yjT6yE6G3mGY75NMamD4uh1kEbchFVOIJt295oyukn
GPfP3fZNGDXMjaiM3TShNjsk9JMo+1dCAjUxp3WMeTKqj0re49hv8BxhMgS9
d9gQ/7UAw9FlEsPtfv0M1ULAZYM9IAdQdCZJYw+ouK8TsEVD7pnOBTaP92Q2
dzzILhFyl7eP9/qGK+KNLj9g3VPOu/FafoHLKix66OUWpHt64fSjF2uTkfxq
RxlmKSojZceiuqsOWvlJ51BOk9NJf0JOyMmCJ+TLjJxsfUIeNnKy4IOJLCz8
TG/a+fvvniz83Me1WPKdxRUKll29b1JTuIy1g4kk3OBTJETAS/pe2JfEESN+
H6ZrXerZfsexhOA9SPWTsTq77Us04Ssax3aXHucYLXagJcs5BzlVY6PFCV7T
cjhvWYJcI8UEIBH7kVMlYusdxv9/sz5OkvxZY3j7tXdTRSv9F35rHe3ev89r
Wu19rqQrI3D02flr8/W3Zvubp6c2svxsCz9/8AROae+ZdyTLV+gxPfwu/uWe
4n4lTbIRfPqld61W4FfTJBrFhw+ZgFEDQC7T7vz1kBF5+artiTLuhW8+fCPz
QuODtzLukT/ezTgod9kzcknH8scvbAu3lvBQzmHTGfkYkfucWXx8SAU8lFzp
CXlMyCGfbKnMZ3q+akKlo35Of7fIvv64BdIC1fyp7P+zqs8SLfIvvbW+LMjh
/eo46xEQ5fZ/xPJO5qseDmEmS7v04/nW3XurFlY64+coe+hDP0i79KN62lfs
c67sgR3/E5U616Bmft8HzjzmLegyeRJbOYrHnW3XyBCc18m6CgEXeUuG8r0H
vg9+i19aFr/6UqcktcP/oCnnAJ74nkxQUf5+j5QD+OXjUqZl7ndIOYiXHn5x
fgslSZALqGJ5vx1Sgvc2nvKaz0m7hQSUibrcSkrQ4O1czh9Tf55KmsuvCt8y
cr5fDevrL4NrfvOSee+O9JmDXek1Lq/T6wjybuz/19clvLRAqJk4bEFfvn+H
dANGA4JZtrkiJWT8S+b6zSMEek3y4qvN95VvPdcPFTXwerkQ0MilHDaOEMT8
3exvYx2Jef89co8VW1jC9Y3/IA+96OdgBE/ibpjz3962YWIM7q3l4f+RWfbQ
y61n0xgDdBHkGuXYCHMcU5jz3y5d7ER4nMgsNy5v+vnvBoUlCJFfVn2+g+tv
2YSckJsgfZtXiLvVcLa+jz6t/UMO4e28fp/t+KgprjChjsf6Dvd9lenUzXd/
Wh3dGfAqO/k/F4m+SQ==\
\>"],ExpressionUUID->"9475d191-8991-458c-a470-33f810bee639"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<100mM-120sec-strain-chart.pdf\>\"", ",", "whiskerChar"}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.8505392641564*^9, 3.8505392675652037`*^9}, {
  3.850539847659653*^9, 3.850539848014589*^9}},
 CellLabel->"In[74]:=",ExpressionUUID->"ae9549ed-761e-4bf5-9bc9-feaf077a1e23"],

Cell[BoxData["\<\"100mM-120sec-strain-chart.pdf\"\>"], "Output",
 CellChangeTimes->{3.8505392757418947`*^9, 3.850539757285383*^9, 
  3.8505398605818996`*^9},
 CellLabel->"Out[75]=",ExpressionUUID->"6c6bb432-96c6-4c7f-b220-9403405e47ae"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"downStrains", "/", " ", "upStrains"}]], "Input",
 CellLabel->"In[87]:=",ExpressionUUID->"533e4b8b-7606-466f-b56f-7c6f5284497b"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.8309278966806577`", ",", "0.8307287056870933`", ",", 
   "0.8573863786340575`", ",", "0.6312428485328061`", ",", 
   "0.5839069600991822`"}], "}"}]], "Output",
 CellChangeTimes->{3.850484076462575*^9},
 CellLabel->"Out[87]=",ExpressionUUID->"556f93ca-cfb9-4313-864b-420f92159f02"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Mean", "[", 
  RowBox[{"downStrains", "/", " ", "upStrains"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"StandardDeviation", "[", 
  RowBox[{"downStrains", "/", " ", "upStrains"}], "]"}]}], "Input",
 CellChangeTimes->{{3.8504696656313925`*^9, 3.8504696741025724`*^9}, {
  3.850471314739651*^9, 3.8504713307952447`*^9}},
 CellLabel->"In[4]:=",ExpressionUUID->"852e456f-466e-4b19-8fa0-e44e29c3f87e"],

Cell[BoxData["0.7468385579267593`"], "Output",
 CellChangeTimes->{
  3.8504696742052994`*^9, 3.8504711465512047`*^9, {3.8504712996817136`*^9, 
   3.8504713312053065`*^9}, 3.850483950208856*^9},
 CellLabel->"Out[4]=",ExpressionUUID->"4b79ff6f-0292-437e-9f10-7ebd89cdb83d"],

Cell[BoxData["0.12868417545233574`"], "Output",
 CellChangeTimes->{
  3.8504696742052994`*^9, 3.8504711465512047`*^9, {3.8504712996817136`*^9, 
   3.8504713312053065`*^9}, 3.8504839502431393`*^9},
 CellLabel->"Out[5]=",ExpressionUUID->"0cd9f93a-d533-4e59-a398-e308b4e1b04b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 FractionBox[
  RowBox[{"86", " ", "-", " ", "58"}], "2"]], "Input",
 CellChangeTimes->{{3.8504841067621975`*^9, 3.850484137162498*^9}},
 CellLabel->"In[89]:=",ExpressionUUID->"fbe86ead-6730-4b9d-9ba1-a5e45ef88bf7"],

Cell[BoxData["14"], "Output",
 CellChangeTimes->{{3.850484115207139*^9, 3.8504841374143214`*^9}},
 CellLabel->"Out[89]=",ExpressionUUID->"a2a440c5-8d45-4b38-813e-186853bee722"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 FractionBox["0.02205243231101291`", "0.03151743855832266`"]], "Input",
 CellChangeTimes->{{3.8504696937012467`*^9, 3.8504696972140417`*^9}},
 CellLabel->
  "In[170]:=",ExpressionUUID->"1e7f665e-7aa5-4671-8b3d-c3bd82ac9601"],

Cell[BoxData["0.6996898643969793`"], "Output",
 CellChangeTimes->{3.8504696976097555`*^9},
 CellLabel->
  "Out[170]=",ExpressionUUID->"4eb1b55e-0adb-42b4-b433-77ff7edeb889"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "measuring", " ", "the", " ", "up", " ", "and", " ", "down", " ", 
    "strains", " ", "differently"}], "*)"}]}]], "Input",
 CellChangeTimes->{{3.8504627018593836`*^9, 3.8504627212140603`*^9}, {
  3.850462757482111*^9, 3.850462770250253*^9}},
 FontSize->24,ExpressionUUID->"18fc652d-3303-4150-94c1-332c5729788a"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"R0", " ", "=", " ", "0.000465"}], ";"}], 
  " "}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"unpert", "[", "t_", "]"}], ":=", " ", 
  RowBox[{"3", " ", 
   RowBox[{"Exp", "[", 
    RowBox[{"R0", " ", "t"}], "]"}]}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"jumps", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"50.7244", ",", " ", "2.99043"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"85.4529", ",", " ", "3.03122"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"140.14", ",", " ", "3.13155"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"170.877", ",", " ", "3.15911"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"224.766", ",", " ", "3.24952"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"258.696", ",", " ", "3.27708"}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"311.787", ",", " ", "3.38182"}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"344.919", ",", " ", "3.41049"}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"399.207", ",", " ", "3.53066"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"431.541", ",", " ", "3.56153"}], "}"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"downJumps", " ", "=", " ", 
   RowBox[{"jumps", "[", 
    RowBox[{"[", 
     RowBox[{";;", ";;", "2"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"upJumps", " ", "=", " ", 
    RowBox[{"jumps", "[", 
     RowBox[{"[", 
      RowBox[{"2", ";;", ";;", "2"}], "]"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"downStrains", " ", "=", " ", 
  FractionBox[
   RowBox[{
    RowBox[{"(", 
     RowBox[{"unpert", "/@", "  ", 
      RowBox[{"downJumps", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", "1"}], "]"}], "]"}]}], " ", ")"}], " ", "-", " ", 
    RowBox[{"downJumps", "[", 
     RowBox[{"[", 
      RowBox[{";;", ",", "2"}], "]"}], "]"}]}], 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"unpert", "/@", "  ", 
      RowBox[{"downJumps", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", "1"}], "]"}], "]"}]}], " ", ")"}], 
    " "}]]}], "\[IndentingNewLine]", 
 RowBox[{"upStrains", " ", "=", " ", 
  FractionBox[
   RowBox[{
    RowBox[{"(", 
     RowBox[{"unpert", "/@", "  ", 
      RowBox[{"upJumps", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", "1"}], "]"}], "]"}]}], " ", ")"}], " ", "-", " ", 
    RowBox[{"upJumps", "[", 
     RowBox[{"[", 
      RowBox[{";;", ",", "2"}], "]"}], "]"}]}], 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"unpert", "/@", "  ", 
      RowBox[{"upJumps", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", "1"}], "]"}], "]"}]}], " ", ")"}], 
    " "}]]}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8231694536292367`*^9, 3.823169723893689*^9}, {
  3.823169756677184*^9, 3.8231697735406265`*^9}, {3.823169809748479*^9, 
  3.823169999622922*^9}, {3.834648934241846*^9, 3.834648934656707*^9}},
 CellLabel->
  "In[334]:=",ExpressionUUID->"448057e8-76e7-4794-9119-28ae7756f5d7"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.0264264889470535`", ",", "0.022003608887521422`", ",", 
   "0.024320556488190214`", ",", "0.024864864965609846`", ",", 
   "0.022501695216425286`"}], "}"}]], "Output",
 CellChangeTimes->{{3.82316993095518*^9, 3.823169936968079*^9}, {
   3.8231699670552883`*^9, 3.8231700002226996`*^9}, 3.823170225946211*^9, 
   3.823170274794181*^9, 3.823170387578374*^9, {3.8346489230696974`*^9, 
   3.834648935276078*^9}, 3.834730079861824*^9, 3.8417577515664315`*^9, 
   3.848408477610824*^9, 3.851578957845886*^9},
 CellLabel->
  "Out[339]=",ExpressionUUID->"d1939822-1eb1-460c-a1c1-040f6f6b53c0"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.028955233663760387`", ",", "0.027397442346545876`", ",", 
   "0.031448039105960106`", ",", "0.0316325316535858`", ",", 
   "0.028669624328569145`"}], "}"}]], "Output",
 CellChangeTimes->{{3.82316993095518*^9, 3.823169936968079*^9}, {
   3.8231699670552883`*^9, 3.8231700002226996`*^9}, 3.823170225946211*^9, 
   3.823170274794181*^9, 3.823170387578374*^9, {3.8346489230696974`*^9, 
   3.834648935276078*^9}, 3.834730079861824*^9, 3.8417577515664315`*^9, 
   3.848408477610824*^9, 3.8515789578843346`*^9},
 CellLabel->
  "Out[340]=",ExpressionUUID->"151ef0ee-c544-45c5-b8a2-fe9062fd32e1"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"1", "-", 
   FractionBox["downStrains", "upStrains"]}], "//", 
  "Mean"}], "\[IndentingNewLine]", 
 FractionBox[
  RowBox[{"StandardDeviation", "[", 
   FractionBox["downStrains", "upStrains"], "]"}], 
  RowBox[{"1", 
   RowBox[{"(*", 
    RowBox[{"Mean", "[", 
     FractionBox["downStrains", "upStrains"], "]"}], "*)"}]}]]}], "Input",
 CellChangeTimes->{{3.823170011271975*^9, 3.823170038161861*^9}, {
   3.823170283919396*^9, 3.8231703139728737`*^9}, 3.823170392030515*^9, {
   3.8515789658636656`*^9, 3.851578967327245*^9}, {3.8515790473500443`*^9, 
   3.851579047452382*^9}},
 CellLabel->
  "In[345]:=",ExpressionUUID->"0a8da150-b1f3-4109-9f66-93b7072332ed"],

Cell[BoxData["0.1879868406003559`"], "Output",
 CellChangeTimes->{{3.8231700191894903`*^9, 3.823170038558855*^9}, {
   3.8231702899694505`*^9, 3.823170315924654*^9}, 3.823170395123925*^9, 
   3.8515789675112686`*^9, 3.8515790483014174`*^9},
 CellLabel->
  "Out[345]=",ExpressionUUID->"e29387dc-f381-4627-8e3f-8d3286f5c787"],

Cell[BoxData["0.05726165992913876`"], "Output",
 CellChangeTimes->{{3.8231700191894903`*^9, 3.823170038558855*^9}, {
   3.8231702899694505`*^9, 3.823170315924654*^9}, 3.823170395123925*^9, 
   3.8515789675112686`*^9, 3.851579048333582*^9},
 CellLabel->
  "Out[346]=",ExpressionUUID->"15bc36fb-8746-4523-83e0-11ea54f38297"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{"9", " ", "-", " ", "22"}], ")"}], "/", "2.0"}]], "Input",
 CellChangeTimes->{{3.851578995159356*^9, 3.851579024246562*^9}},
 CellLabel->
  "In[344]:=",ExpressionUUID->"74791582-d356-4092-9ffd-bd0c0c4ea3ba"],

Cell[BoxData[
 RowBox[{"-", "6.5`"}]], "Output",
 CellChangeTimes->{{3.851579002183322*^9, 3.8515790252326593`*^9}},
 CellLabel->
  "Out[344]=",ExpressionUUID->"04352763-26e2-4f2c-9767-c8cd2d7f8cc4"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"whiskerChar", " ", "=", " ", 
   RowBox[{"BoxWhiskerChart", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"downStrains", ",", " ", "upStrains"}], "}"}], " ", ",", 
     RowBox[{"ChartLabels", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"\"\<Hyperosmotic\>\"", ",", " ", "\"\<Hypoosmotic\>\""}], 
       "}"}]}], ",", " ", 
     RowBox[{"LabelStyle", "\[Rule]", 
      RowBox[{"Directive", "[", 
       RowBox[{
        RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
        "Black", ",", " ", 
        RowBox[{"FontSize", "\[Rule]", "18"}]}], "]"}]}]}], "]"}]}], 
  "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.8484084931345644`*^9, 3.848408513530514*^9}, {
  3.8484085763072977`*^9, 3.848408635426447*^9}, {3.848408707090848*^9, 
  3.8484087384188175`*^9}, {3.8484088594987583`*^9, 3.848408871745126*^9}, {
  3.8484089096201406`*^9, 3.8484089794104667`*^9}, {3.848409365818124*^9, 
  3.848409382728703*^9}},
 CellLabel->"In[27]:=",ExpressionUUID->"5ad5c2b3-a9b0-4c06-8074-45f3422cfb48"],

Cell[BoxData[
 GraphicsBox[{
   {Opacity[0], 
    PointBox[{{0.3836399216673073, 0.021522162749218202`}, {
     2.6163600783326926`, 0.03211397779188902}}]}, 
   {RGBColor[0.982864, 0.7431472, 0.3262672], CapForm[None], {}, 
    {RGBColor[0.982864, 0.7431472, 0.3262672], 
     {RGBColor[0.982864, 0.7431472, 0.3262672], 
      TagBox[
       TooltipBox[
        TagBox[
         DynamicBox[{
           FEPrivate`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           GraphicsGroupBox[{Antialiasing -> False, 
             
             PolygonBox[{{0.7754133086869819, 0.025255270960970758`}, {
              1.2245866913130181`, 0.025255270960970758`}, {
              1.2245866913130181`, 0.022377173634199318`}, {
              0.7754133086869819, 0.022377173634199318`}}], {}, {{}, {}}, {}, {
              GrayLevel[0], 
              GrayLevel[1], 
              
              LineBox[{{1.2245866913130181`, 0.024320556488190214`}, {
               0.7754133086869819, 0.024320556488190214`}}]}, {}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{1., 0.022377173634199318`}, {1., 
               0.022003608887521422`}}, {{1., 0.025255270960970758`}, {1., 
               0.0264264889470535}}}]}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{1.112293345656509, 0.022003608887521422`}, {
               0.8877066543434909, 0.022003608887521422`}}, {{
               1.112293345656509, 0.0264264889470535}, {0.8877066543434909, 
               0.0264264889470535}}}]}, {}}]},
          
          ImageSizeCache->{{180.5857864376269, 
           289.4142135623731}, {-7.414213562373078, 131.4142135623731}}],
         "DelayedMouseEffectStyle"],
        StyleBox[
         TagBox[
          GridBox[{{
             StyleBox["\"max\"", Bold, StripOnInput -> False], 
             "0.0264264889470535`"}, {
             StyleBox["\"75%\"", Bold, StripOnInput -> False], 
             "0.025255270960970758`"}, {
             StyleBox["\"median\"", Bold, StripOnInput -> False], 
             "0.024320556488190214`"}, {
             StyleBox["\"25%\"", Bold, StripOnInput -> False], 
             "0.022377173634199318`"}, {
             StyleBox["\"min\"", Bold, StripOnInput -> False], 
             "0.022003608887521422`"}}, 
           GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}}, 
           AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}, "Rows" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}}, 
           GridBoxFrame -> {
            "ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}}, 
           GridBoxItemSize -> {
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaseStyle -> 
           Directive[
             AbsoluteThickness[1], 
             Dashing[{}]]], "Grid"], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}, StripOnInput -> False]],
       Annotation[#, 
        Style[
         Grid[{{
            Style["max", Bold], 0.0264264889470535}, {
            Style["75%", Bold], 0.025255270960970758`}, {
            Style["median", Bold], 0.024320556488190214`}, {
            Style["25%", Bold], 0.022377173634199318`}, {
            Style["min", Bold], 0.022003608887521422`}}, Dividers -> {{
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}, {
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}}, Frame -> 
          GrayLevel[0], BaseStyle -> Directive[
            AbsoluteThickness[1], 
            Dashing[{}]]], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}], "Tooltip"]& ]}, 
     {RGBColor[0.982864, 0.7431472, 0.3262672], 
      TagBox[
       TooltipBox[
        TagBox[
         DynamicBox[{
           FEPrivate`If[
            CurrentValue["MouseOver"], 
            EdgeForm[{
              GrayLevel[0.5], 
              AbsoluteThickness[1.5], 
              Opacity[0.66]}], {}, {}], 
           GraphicsGroupBox[{Antialiasing -> False, 
             
             PolygonBox[{{1.7754133086869819`, 0.03149416224286653}, {
              2.224586691313018, 0.03149416224286653}, {2.224586691313018, 
              0.02835157883306333}, {1.7754133086869819`, 
              0.02835157883306333}}], {}, {{}, {}}, {}, {
              GrayLevel[0], 
              GrayLevel[1], 
              
              LineBox[{{2.224586691313018, 0.028955233663760387`}, {
               1.775413308686982, 0.028955233663760387`}}]}, {}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{2., 0.02835157883306333}, {2., 
               0.027397442346545876`}}, {{2., 0.03149416224286653}, {2., 
               0.0316325316535858}}}]}, {
              GrayLevel[0], 
              GrayLevel[0.5], 
              
              LineBox[{{{2.112293345656509, 0.027397442346545876`}, {
               1.887706654343491, 0.027397442346545876`}}, {{
               2.112293345656509, 0.0316325316535858}, {1.887706654343491, 
               0.0316325316535858}}}]}, {}}]},
          
          ImageSizeCache->{{414.5857864376269, 
           523.4142135623731}, {-166.4142135623731, -33.58578643762689}}],
         "DelayedMouseEffectStyle"],
        StyleBox[
         TagBox[
          GridBox[{{
             StyleBox["\"max\"", Bold, StripOnInput -> False], 
             "0.0316325316535858`"}, {
             StyleBox["\"75%\"", Bold, StripOnInput -> False], 
             "0.03149416224286653`"}, {
             StyleBox["\"median\"", Bold, StripOnInput -> False], 
             "0.028955233663760387`"}, {
             StyleBox["\"25%\"", Bold, StripOnInput -> False], 
             "0.02835157883306333`"}, {
             StyleBox["\"min\"", Bold, StripOnInput -> False], 
             "0.027397442346545876`"}}, 
           GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}}, 
           AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}, "Rows" -> {
               Directive[
                GrayLevel[0.3]], {
                Directive[
                 GrayLevel[0.3]]}, 
               Directive[
                GrayLevel[0.3]]}}, 
           GridBoxFrame -> {
            "ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}}, 
           GridBoxItemSize -> {
            "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaseStyle -> 
           Directive[
             AbsoluteThickness[1], 
             Dashing[{}]]], "Grid"], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}, StripOnInput -> False]],
       Annotation[#, 
        Style[
         Grid[{{
            Style["max", Bold], 0.0316325316535858}, {
            Style["75%", Bold], 0.03149416224286653}, {
            Style["median", Bold], 0.028955233663760387`}, {
            Style["25%", Bold], 0.02835157883306333}, {
            Style["min", Bold], 0.027397442346545876`}}, Dividers -> {{
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}, {
             Directive[
              GrayLevel[0.3]], {
              Directive[
               GrayLevel[0.3]]}, 
             Directive[
              GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}}, Frame -> 
          GrayLevel[0], BaseStyle -> Directive[
            AbsoluteThickness[1], 
            Dashing[{}]]], {
          Directive[FontFamily -> "Myriad Pro", 
           GrayLevel[0], FontSize -> 18]}], 
        "Tooltip"]& ]}}, {}, {}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, \
{}}, {}}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0.70295463955568, 0.021522162749218202`},
  DisplayFunction->Identity,
  Frame->True,
  FrameLabel->{{None, None}, {None, None}},
  FrameTicks->{{Automatic, Automatic}, {{{1., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {1., 
       FormBox["\"Hyperosmotic\"", TraditionalForm], 0}, {2., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {2., 
       FormBox["\"Hypoosmotic\"", TraditionalForm], 0}, {0.7754133086869819, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}, {
      2.224586691313018, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}}, {{1., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {2., 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {
      0.7754133086869819, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}, {
      2.224586691313018, 
       FormBox[
        TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}}}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImageSize->{460.71428571428635`, Automatic},
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 18],
  PlotRangePadding->{{
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{{{1., 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {1., 
      FormBox["\"Hyperosmotic\"", TraditionalForm], 0}, {2., 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0.008, 0}}, {2., 
      FormBox["\"Hypoosmotic\"", TraditionalForm], 0}, {0.7754133086869819, 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}, {
     2.224586691313018, 
      FormBox[
       TemplateBox[{0}, "Spacer1"], TraditionalForm], {0, 0}}}, 
    Automatic}]], "Output",
 CellChangeTimes->{{3.8484085018483543`*^9, 3.8484085141834884`*^9}, {
   3.8484086037548904`*^9, 3.8484086357186327`*^9}, {3.848408712270709*^9, 
   3.848408738680574*^9}, 3.8484088723302603`*^9, {3.848408915311937*^9, 
   3.8484089414582186`*^9}, {3.848408974241056*^9, 3.8484089805209036`*^9}, 
   3.848409384940689*^9},
 CellLabel->"Out[27]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
eJztXc2PHEcV753untnZteDKMX8DAm4gJMTXwadcg8TGwYwjEYeQBCQW5AvK
xVIgSoLkKxKGcMLA0bn6aomThQCZExYX33No3kfVq+rq6u6qnuqeHm+3tLPT
Va+qfvXq1devX9dcv3h794MfXbx968bFS99+6+LN3a0bP3npW7ffgqD8JMtW
v8qyk19/IYPvVZbxn77eg78se4Cf+cOHD58+fYpf/+fc/4ek/oyfxfPnzzO6
7t+/fwYhK/yeP3nyhDPM/hEk9XeTYwmyIMXi9+7dy7ZtuQZJcs5/IRQAn4Uf
P3586pH9Z5AU5/hXkoVQlgUoG4/sv4KkOMe/kZaxHtACDx5kPsl/B8hwbr/z
xBSUWtBka7rHfLLs+vXr9dwePXq02+0yvocSnz17RkqnNHADQZgmp/jLy0to
CWzlvLVciIWiMA3HQ+5wr9PoeFMmSHKxlJ7CSskTLqwHhpZOrcqe0iRe2Q7H
s2ljlIt+pWsM8jV0d+/eRVv53qiabq/H+oXW6utxVlyABUqvXUvNOBTyhy8G
NYjYKApogExfaMqEg7ur157z+jiBtYVUXCKklEpj+pWKzQrOEy6Il1yDdF+0
l5dLeaq9ZUDkUt0WqJWHOeZSZ/jCkdkrk2g9qD4vsJZvBVs4IS2xz5JW4RM6
CbUAjb4l2K+UBrM0Yyh4GIELvnAJ3FVNLUSCWsTbQ0uZuWHUIE3rUJ6EMu4l
K43YTqu0hIjjWiKPKJlrwq2O42upSyqkJKk/NIAaW6m+kDxk7N5T+1AKhay5
GhIItyxpBwZKArjiSDQcPo4TxjXXCPTIqobcpDy0X5WWMfE4g5hse8PP8zZ7
tuZgKg91ylWDIjceLUXqtDP/trmEwjYSxtWAVKj9G5Norgv1certzSi7Y3uG
kRo7MJVZtpSZ5bxaoDWLpUsc5dutTqqiVm1cDOax1rXlVoPPIdprz79Td2sJ
kwxem0Bj7WiPTVs/DrYyut+IJioaNC2L92vOpNcz9BY6ig+lbwb3YsB1GE5g
mVqjF7J2idZkX3md2rSxO/evTqjPrjJeJJ3ejrNUNarReobuucPhKFe0IHA1
p/sZXqctyENbgXaWarPh7pPjR4CD220C7aaw3ePRbLj18q6Rx4KMVkFcSx7j
cWHbrmEeTWjHSvfcpbFV2usqq/9aS7pzi+RZcJ4gBUOGsEARc1d7/oFzl2QQ
MtOn1GaPZo5Ic2bWvya58+ITMcreWpVuNAT6qmmIux1qcWVpTO+x9JoY4w1C
SFOzN7Nu5lqZfZoZAWTfmBmORnYEcGG5/nVrXUddpQWu0SVDvbdJq8FubRy3
tsyORuusawRClCjT5CiotlSOzVEwNuwzDu8GQZLPFlqnmaiVPcAW9GFymSfK
W62ZeG3PWocvIoh4KHQLdiJ1CcPQqe1TCbO3FZBM+HOV4pV0mj9tU2KHDsur
pu9wftQePakilemNRLrqPErZL9SYaacd12L7YO7QZpp/wxwtOV7pw2SUZTYO
1KssfJEdZjuwdwR6niKNgwRrAXMSpAWPhgyTSwcVsaDJ1dJWUNmQKeqDS+Cy
4YJoqc/ank+NbQx5QpC4Vfx1s5n3K6P92J5hZknm1tz1HOfCqsH5l+/hmyrP
fvYnNbDiqdQ1Kwy+gipZVa1PINWzYs4XFGDvnXN+AFjrZegywJMpFyJDF2fs
7lvKnnLttQM1hqPF1vVsbZ8EN9G9IWVL+Gq2viIaD+8Bb3hkbgek+6FH5vII
S5VR2HquPgSFm89Po1CRbcC4UPM7sPYyu0BUffm8E4yKJJUnDc4/IXp5w0nD
OqjU9d4M7r6KX2/evIl/34W/EwnNcgzmev3Juf+vc/8JfJzUUhdw90lPqj/A
R56wzPFS48fHnSm0Vr+5SM1IyghV1TeqLmubE+pppWjm3Ng7MpiFlY+W7TOA
k3vRI3tG46F5duze50GIaObYymYv0+vqjJb8enVAHjJBklkhcCF0TV4/sleQ
vZqsr9lJydpNxKDmkrjwitY/vHDSnJzmiOW+M0VhoWeJbSPkPAgdLbjsxaPS
jHh06P10KRt6lYB3Pnao9p9yWYI+pGdhSLHSvOkDRZSWzjCQPQckOnPjeZUs
zK/gaISE4RC3B5tfxUDGYbwi3HjxSWDLhKCtPyQMh5BtNlOt/UI1T4ihbrzz
/Bu68rYRchqOg23FwYGXz6/YfQpFWGve0ttGyGYiLFTnwqZLt40Q1F0JZb4P
/798584dzOjnFa9tUuHYWu2HK8Qz537t6INXJgpM5VuZWPYC+vRh0vkjg+HG
b63+hXZ85twPxOP0I5Ofvx+Z+K2D78y5H4hHCuDyeJTCeW7jlO/Gj4Cnb2SG
7sE9xxZqyrhsqPtEoeiJj0fOY754FGo2Wo3G0nqdEsI2Q7TnWYLyXemWGIh8
3Vw3uLPapkuuNidiX7LXEYbTkJldlSr8rwi6cmV0fZhPU472dDHdfq0lXN7J
qPnSu7757fHuKN2P0L/DmlsK3J/f+uzTl/HmtUkkUdCWeLXq2qVMj2+RfJEk
F2tbJKeTXKxtf8kx2Rm9P3Fn83Y0EzAzFu8yFN/YHMzno3FNz758Lh5jYt4F
Q64RTveZUDCahOwLS4gB0iuHqJ/G23hxCBPyMvazI12HAS3I9pSMobHHGGzn
4gComlyN9B5WsOo9GhdyNu9YeC6qcTkbt+VsLNG2lICzKZ02Ww3Dk4yz4fch
7dainjZ0dErA2nDvkxaL189EnM3GaknthRQ5G47Oz2x0HQCw9vWJxDg5E8Nt
Y3vihSNOzbWcWRqPQzJ8val11f28cK5rYu1f8G617C0WyWUne7ySXwJJYmjh
P379YlDKeXLHx5wCE/gkP6z6PbTmgH9+KcbkbeQtTMjCeL8bn9yBz8PG5XVq
77XoE25oGy45DXvePaHfjXpLRvIw50CpszMSP/lNzgrx2tK8Z2nvk8THfOjT
9CSs0donkfNK3SCORpiQSUKEfQzBQJQJ2aSQEw0GouTESRkmTiXvjalUbJdm
Pz8t0jbWSbZ36pwZaxSAL1gS8k9/9CD8QMWNxUPxnMO2zD2It+Rm12nehi32
sdAEHBWPa/JWuHrBRPbGPFkc3NvIeZtd7/IP6G9UWPH4OQDPlP5GJgWAdT1V
5+JhxPykhEAitGDXO3OuXkXyhpb75pPqQ4f3JiJN4rkLIM5VRiuJ79vzXOnv
n+I3lfEv/WWnpLaL5U2HRWpfqcVirqLULyoeaz7olfxtVR/Hut+YC0uhE7iS
3W8CjoXmaqYYn5ly38I2b6O7c34/2qmZKToZyLviMrtTd+8UWouxOSrescpL
+E/4HB7r1wRk3xaD/VAslTn7yN6lke9OfB1GYKli2ZVAlImZquae3Dz1Hogw
MUul64D6LeoSYBQDMUoPSOgFdWrj4g4JaeT9DWPRmF+pIH/kYP19lZYDarJU
bAeyS5P956WctH0InbpcFaMU5kxQGk+8vawzAUPFu2CJ50kCbl2c8bNBWo6q
sOTN+V2sWRxV4+fc9IzVSkYbbuuB7Tvpm3LirNY4XXDgKmZ0Hquw6qHPDLTP
hByIe3JGK6/nBlJ8jJRbanzPS81skUZxfaxOMSL7Ub+W43uTeYrVP/qmvP7Z
py//bGaSWlBLvFv17fnmWpNFci6SePVzHotNLpJzkFysbX/JlOwVrVLVMyk+
n9NhqlrS+mZ2P9rk7JX1CwnOr5fp3XRnHr4VYBfytIyV7EyUjpveE0VvHuE1
GJu3Yivg1fVO/RJM587D4yPWgX4vxsrrx9DHcIXjGsxR+XH1cFrhuAYzU4yL
7c6cJ98uH4mLK7sPG1X75VryngxIqX2RMPL7Ch2+F5fyXTjMIL/0/+rhEIZ0
LC1iBnyG7E6fWR70yymDLHAA+0TjWmnO2eVf0it6Uu3Xb8M5p1Orf8izhw75
QePcAK7p1NPKXfIRuBJxTYzQcO5FQJpwlKl4pRUAFBw7/ZOVZW/ayPVEUiZJ
+wv6TnbPA0vzMUh+/LHMEecMX8AYL9Vh7Pb515uWdOFry2NZsS97pEXy+CUX
u1wkp5MslODHlOr4/aTwhIWvBHmd4TWeR9xU7JHPN+pAZ193Mka2D1HmPYPp
cGdfB7JFMzwL22WGygbOKU7C9p95MvU52H4U9rPdKU7BdvmdTR3F1GdgN9gc
9uJxz8EuBU5Vfb2ahrfxn4I9hWZ8DM251a6+t4N7bSUZE3Nu9ba2nW9Y3xnO
upz7kMaMIgkYloEYRmJTGG27J08YunFZFF4rxJxf3YFyMgaFS4s/q9qPPTV7
0ueXE/YrAvN4I2N8qdyaR7rf9In/3aM5/UrTmKm/hmEYCX/fkVCt1f1+gys7
+T+UEjrq\
\>"],ExpressionUUID->"99261731-fdd0-44d8-be08-c3bc641461b8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"strains", " ", "=", " ", 
  RowBox[{"Abs", "[", 
   RowBox[{"strain", " ", "/@", " ", 
    RowBox[{"Range", "[", "12", "]"}]}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"downStrains", " ", "=", " ", 
  RowBox[{"strains", "[", 
   RowBox[{"[", 
    RowBox[{";;", " ", ";;", " ", "2"}], "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.850462491942561*^9, 3.85046255884585*^9}},
 CellLabel->
  "In[361]:=",ExpressionUUID->"b71d0193-5809-48dd-aee7-2c8f55ae6650"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.029426686960924445`", ",", "0.03315019744289788`", ",", 
   "0.031922979478075555`", ",", "0.033630970641388154`", ",", 
   "0.03242147922998079`", ",", "0.030666883414648398`", ",", 
   "0.029426686960924552`", ",", "0.030682159618852355`", ",", 
   "0.029426686960924563`", ",", "0.030640470374867397`", ",", 
   "0.02942668696092457`", ",", "0.030132626814411565`"}], "}"}]], "Output",
 CellChangeTimes->{{3.8504625347877426`*^9, 3.8504625596133757`*^9}},
 CellLabel->
  "Out[361]=",ExpressionUUID->"d27dbb68-2f91-45a6-95c4-bb96a5c7b2f9"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.029426686960924445`", ",", "0.031922979478075555`", ",", 
   "0.03242147922998079`", ",", "0.029426686960924552`", ",", 
   "0.029426686960924563`", ",", "0.02942668696092457`"}], "}"}]], "Output",
 CellChangeTimes->{{3.8504625347877426`*^9, 3.8504625596433105`*^9}},
 CellLabel->
  "Out[362]=",ExpressionUUID->"a7e0f5ea-c362-493c-aaf0-0dd6294e1b33"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"SetDirectory", "[", 
    RowBox[{"FileNameJoin", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"ParentDirectory", "[", 
        RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
       "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], "]"}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<100mM-strain-chart.pdf\>\"", ",", "whiskerChar"}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8484089622880993`*^9, 3.8484089670808983`*^9}, {
  3.8484090312176237`*^9, 3.8484090324158087`*^9}, {3.8484091187206273`*^9, 
  3.8484091253446417`*^9}},
 CellLabel->"In[28]:=",ExpressionUUID->"7d3940f6-0e5d-41ca-a819-6e435929bab8"],

Cell[BoxData["\<\"100mM-strain-chart.pdf\"\>"], "Output",
 CellChangeTimes->{3.8484091283372855`*^9, 3.8484093885520935`*^9},
 CellLabel->"Out[29]=",ExpressionUUID->"eecfa3d3-01dc-43a0-b708-41f6ddc74f5d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ystored", "[", 
   RowBox[{
    RowBox[{"g1", "[", 
     RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", " ", 
    RowBox[{"g2", "[", 
     RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",", 
    RowBox[{"\[CapitalSigma]", "[", 
     RowBox[{"0", ",", "0", ",", "0"}], "]"}], " ", ",", " ", "\[Epsilon]z"}],
    "]"}], "[", 
  RowBox[{"R0", " ", 
   RowBox[{"(", "45", ")"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8231690227655373`*^9, 3.8231690306217766`*^9}, {
  3.8231691119033527`*^9, 3.8231691120214787`*^9}},
 CellLabel->
  "In[186]:=",ExpressionUUID->"85766194-d7d7-4daa-9b24-874a0122f8eb"],

Cell[BoxData["0.9047753441137468`"], "Output",
 CellChangeTimes->{3.8231690311983643`*^9, 3.8231691121674376`*^9, 
  3.8231700527022333`*^9, 3.8231702702783117`*^9, 3.8231704107666593`*^9, 
  3.82317063832828*^9},
 CellLabel->
  "Out[186]=",ExpressionUUID->"791f9fb7-e1e8-4519-9796-89f8acbaebd3"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 FractionBox["downStrains", "upStrains"]], "Input",
 CellLabel->
  "In[376]:=",ExpressionUUID->"cbb7dc7d-baed-49c4-bdda-d5632e287b2b"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.9126670934149015`", ",", "0.8031263870985212`", ",", 
   "0.7733568508435531`", ",", "0.7860535867919131`", ",", 
   "0.7848618788493317`"}], "}"}]], "Output",
 CellChangeTimes->{{3.8346489210251937`*^9, 3.834648938576234*^9}, 
   3.834730083698409*^9},
 CellLabel->
  "Out[376]=",ExpressionUUID->"b13fdfeb-8818-4f68-a5b5-1155e77ee373"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"downStrains", "//", "Mean"}], "\[IndentingNewLine]", 
 RowBox[{"downStrains", "//", "StandardDeviation"}], "\[IndentingNewLine]", 
 RowBox[{"upStrains", "//", "Mean"}], "\[IndentingNewLine]", 
 RowBox[{"upStrains", "//", "StandardDeviation"}], "\[IndentingNewLine]", 
 FractionBox[
  RowBox[{"downStrains", "//", "Mean"}], 
  RowBox[{"upStrains", "//", "Mean"}]]}], "Input",
 CellChangeTimes->{{3.823170471221344*^9, 3.8231704820921135`*^9}, {
  3.8231706455482454`*^9, 3.8231706668844824`*^9}, {3.823170721636221*^9, 
  3.8231707382847877`*^9}},
 CellLabel->
  "In[197]:=",ExpressionUUID->"4baf562f-f99f-4e94-b9e4-6ace41155f7d"],

Cell[BoxData["0.039337499483379126`"], "Output",
 CellChangeTimes->{{3.823170471985546*^9, 3.8231704830071635`*^9}, {
  3.823170656590918*^9, 3.823170667466855*^9}, {3.823170729773776*^9, 
  3.823170739426984*^9}},
 CellLabel->
  "Out[197]=",ExpressionUUID->"cd005952-afad-44d7-b94a-2abe0d9b8ca6"],

Cell[BoxData["0.00863656385008796`"], "Output",
 CellChangeTimes->{{3.823170471985546*^9, 3.8231704830071635`*^9}, {
  3.823170656590918*^9, 3.823170667466855*^9}, {3.823170729773776*^9, 
  3.8231707394645343`*^9}},
 CellLabel->
  "Out[198]=",ExpressionUUID->"c6b7487a-0f8f-41a1-aadc-7efa5efb8dc2"],

Cell[BoxData["0.04704879928255215`"], "Output",
 CellChangeTimes->{{3.823170471985546*^9, 3.8231704830071635`*^9}, {
  3.823170656590918*^9, 3.823170667466855*^9}, {3.823170729773776*^9, 
  3.823170739734721*^9}},
 CellLabel->
  "Out[199]=",ExpressionUUID->"1d70fc76-d459-41d0-87ca-684d0b07fe42"],

Cell[BoxData["0.00991147818192732`"], "Output",
 CellChangeTimes->{{3.823170471985546*^9, 3.8231704830071635`*^9}, {
  3.823170656590918*^9, 3.823170667466855*^9}, {3.823170729773776*^9, 
  3.823170739949528*^9}},
 CellLabel->
  "Out[200]=",ExpressionUUID->"c7294d04-4955-47a9-91a0-c0f6ac22648a"],

Cell[BoxData["0.8360999660615627`"], "Output",
 CellChangeTimes->{{3.823170471985546*^9, 3.8231704830071635`*^9}, {
  3.823170656590918*^9, 3.823170667466855*^9}, {3.823170729773776*^9, 
  3.823170740166829*^9}},
 CellLabel->
  "Out[201]=",ExpressionUUID->"98eb32b5-89c9-4833-8f8e-063558388058"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"R0", " ", 
  RowBox[{"(", "45", ")"}]}]], "Input",
 CellLabel->
  "In[202]:=",ExpressionUUID->"9f2a4d83-b92b-408c-a2d8-a08833005dab"],

Cell[BoxData["0.024089708388568727`"], "Output",
 CellChangeTimes->{3.8231708503987665`*^9},
 CellLabel->
  "Out[202]=",ExpressionUUID->"5ee24bfc-25b6-45a4-a03e-16c02bf92f1a"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"pts", " ", "=", " ", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"4", "t"}], ",", " ", 
       RowBox[{"Sin", "[", 
        RowBox[{"4", " ", "Pi", " ", "t"}], "]"}], ",", "0"}], "}"}], ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{"t", ",", "0", ",", " ", "1", ",", "0.01"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"strtSpring", " ", "=", " ", 
  RowBox[{"Graphics3D", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"Green", ",", 
      RowBox[{"Tube", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], " ", "}"}], ",", 
        "0.03"}], "]"}], ",", "Orange", ",", " ", 
      RowBox[{"Sphere", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", " ", 
          RowBox[{"{", 
           RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], " ", "}"}], ",", " ", 
        "0.1"}], "]"}]}], "}"}], ",", " ", 
    RowBox[{"Boxed", "\[Rule]", "False"}], ",", " ", 
    RowBox[{"ViewPoint", "\[Rule]", "Front"}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"buckledSpring", " ", "=", 
  RowBox[{"Graphics3D", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"Purple", ",", 
      RowBox[{"Tube", "[", 
       RowBox[{"pts", ",", "0.12"}], "]"}], ",", "Orange", ",", " ", 
      RowBox[{"Sphere", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"pts", "[", 
           RowBox[{"[", "1", "]"}], "]"}], ",", " ", 
          RowBox[{"pts", "[", 
           RowBox[{"[", 
            RowBox[{"-", "1"}], "]"}], "]"}]}], " ", "}"}], ",", " ", "0.4"}],
        "]"}]}], "}"}], ",", " ", 
    RowBox[{"Boxed", "\[Rule]", "False"}], ",", " ", 
    RowBox[{"ViewPoint", "\[Rule]", "Top"}]}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.8233475172374973`*^9, 3.8233476471304417`*^9}, {
  3.823347798044401*^9, 3.8233477982759466`*^9}, {3.823347850330311*^9, 
  3.823347928525816*^9}, {3.8233479642048535`*^9, 3.823348078788013*^9}, {
  3.8233481605185575`*^9, 3.8233483195402765`*^9}, {3.823348357403883*^9, 
  3.823348361677137*^9}, {3.8233484019086266`*^9, 3.8233484662414017`*^9}, {
  3.823348547365116*^9, 3.8233485572985363`*^9}, {3.823348608219794*^9, 
  3.82334863802041*^9}, {3.823348708483487*^9, 3.82334870932518*^9}, {
  3.823349383986784*^9, 3.8233494037534695`*^9}},
 CellLabel->
  "In[197]:=",ExpressionUUID->"0a1cea21-15a9-4716-9556-d2d43d658e34"],

Cell[BoxData[
 Graphics3DBox[{
   {RGBColor[0, 1, 0], TubeBox[{{0, 0, 0}, {1, 0, 0}}, 0.03]}, 
   {RGBColor[1, 0.5, 0], SphereBox[{{0, 0, 0}, {1, 0, 0}}, 0.1]}},
  Boxed->False,
  ViewPoint->Front,
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{{3.8233484347598066`*^9, 3.8233484674199767`*^9}, {
   3.8233485518666773`*^9, 3.8233485578726797`*^9}, {3.8233486333899746`*^9, 
   3.8233486382644157`*^9}, 3.823348709646154*^9, 3.823349404361869*^9},
 CellLabel->
  "Out[198]=",ExpressionUUID->"cb118a6c-c461-4169-b145-b9b599fd3a42"],

Cell[BoxData[
 Graphics3DBox[{
   {RGBColor[0.5, 0, 0.5], 
    TubeBox[{{0., 0., 0}, {0.04, 0.12533323356430426`, 0}, {
      0.08, 0.2486898871648548, 0}, {0.12, 0.3681245526846779, 0}, {
      0.16, 0.4817536741017153, 0}, {0.2, 0.5877852522924731, 0}, {
      0.24, 0.6845471059286886, 0}, {0.28, 0.7705132427757893, 0}, {
      0.32, 0.8443279255020151, 0}, {0.36, 0.9048270524660196, 0}, {
      0.4, 0.9510565162951535, 0}, {0.44, 0.9822872507286886, 0}, {
      0.48, 0.9980267284282716, 0}, {0.52, 0.9980267284282716, 0}, {
      0.56, 0.9822872507286886, 0}, {0.6, 0.9510565162951536, 0}, {
      0.64, 0.9048270524660195, 0}, {0.68, 0.844327925502015, 0}, {
      0.72, 0.7705132427757893, 0}, {0.76, 0.6845471059286888, 0}, {
      0.8, 0.5877852522924732, 0}, {0.84, 0.4817536741017156, 0}, {
      0.88, 0.36812455268467814`, 0}, {0.92, 0.24868988716485482`, 0}, {
      0.96, 0.12533323356430454`, 0}, {1., 1.2246467991473532`*^-16, 0}, {
      1.04, -0.12533323356430429`, 0}, {1.08, -0.24868988716485502`, 0}, {
      1.12, -0.3681245526846783, 0}, {1.16, -0.481753674101715, 0}, {
      1.2, -0.587785252292473, 0}, {1.24, -0.6845471059286887, 0}, {
      1.28, -0.7705132427757894, 0}, {1.32, -0.8443279255020153, 0}, {
      1.36, -0.9048270524660198, 0}, {
      1.4000000000000001`, -0.9510565162951535, 0}, {
      1.44, -0.9822872507286887, 0}, {1.48, -0.9980267284282716, 0}, {
      1.52, -0.9980267284282716, 0}, {1.56, -0.9822872507286887, 0}, {
      1.6, -0.9510565162951536, 0}, {
      1.6400000000000001`, -0.9048270524660196, 0}, {
      1.68, -0.8443279255020155, 0}, {1.72, -0.7705132427757896, 0}, {
      1.76, -0.684547105928689, 0}, {1.8, -0.5877852522924734, 0}, {
      1.84, -0.4817536741017153, 0}, {
      1.8800000000000001`, -0.36812455268467786`, 0}, {
      1.92, -0.24868988716485535`, 0}, {1.96, -0.12533323356430465`, 0}, {
      2., -2.4492935982947064`*^-16, 0}, {2.04, 0.12533323356430418`, 0}, {
      2.08, 0.24868988716485488`, 0}, {2.12, 0.3681245526846782, 0}, {
      2.16, 0.48175367410171566`, 0}, {2.2, 0.5877852522924736, 0}, {
      2.24, 0.6845471059286893, 0}, {
      2.2800000000000002`, 0.7705132427757893, 0}, {
      2.32, 0.8443279255020147, 0}, {2.36, 0.9048270524660194, 0}, {
      2.4, 0.9510565162951535, 0}, {2.44, 0.9822872507286886, 0}, {
      2.48, 0.9980267284282716, 0}, {2.52, 0.9980267284282716, 0}, {
      2.56, 0.9822872507286886, 0}, {2.6, 0.9510565162951536, 0}, {
      2.64, 0.9048270524660192, 0}, {2.68, 0.8443279255020151, 0}, {
      2.72, 0.7705132427757886, 0}, {
      2.7600000000000002`, 0.6845471059286884, 0}, {
      2.8000000000000003`, 0.5877852522924734, 0}, {
      2.84, 0.4817536741017162, 0}, {2.88, 0.368124552684678, 0}, {
      2.92, 0.2486898871648555, 0}, {2.96, 0.1253332335643039, 0}, {
      3., 3.6739403974420594`*^-16, 0}, {3.04, -0.12533323356430318`, 0}, {
      3.08, -0.24868988716485477`, 0}, {3.12, -0.36812455268467725`, 0}, {
      3.16, -0.48175367410171555`, 0}, {3.2, -0.5877852522924728, 0}, {
      3.24, -0.6845471059286892, 0}, {
      3.2800000000000002`, -0.7705132427757891, 0}, {
      3.3200000000000003`, -0.8443279255020156, 0}, {
      3.36, -0.9048270524660189, 0}, {3.4, -0.9510565162951534, 0}, {
      3.44, -0.9822872507286885, 0}, {3.48, -0.9980267284282716, 0}, {
      3.52, -0.9980267284282716, 0}, {3.56, -0.9822872507286886, 0}, {
      3.6, -0.9510565162951538, 0}, {3.64, -0.9048270524660192, 0}, {
      3.68, -0.8443279255020152, 0}, {3.72, -0.7705132427757886, 0}, {
      3.7600000000000002`, -0.6845471059286885, 0}, {
      3.8000000000000003`, -0.5877852522924735, 0}, {
      3.84, -0.4817536741017163, 0}, {3.88, -0.3681245526846781, 0}, {
      3.92, -0.2486898871648556, 0}, {3.96, -0.125333233564304, 0}, {
      4., -4.898587196589413*^-16, 0}}, 0.12]}, 
   {RGBColor[1, 0.5, 0], 
    SphereBox[{{0., 0., 0}, {4., -4.898587196589413*^-16, 0}}, 0.4]}},
  Boxed->False,
  ViewPoint->Top,
  ViewVertical->{0., 0., 1.}]], "Output",
 CellChangeTimes->{{3.8233484347598066`*^9, 3.8233484674199767`*^9}, {
   3.8233485518666773`*^9, 3.8233485578726797`*^9}, {3.8233486333899746`*^9, 
   3.8233486382644157`*^9}, 3.823348709646154*^9, 3.8233494044216623`*^9},
 CellLabel->
  "Out[199]=",ExpressionUUID->"1388444a-2f5b-4d56-9e0b-b60ad30ab490"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8233484100606546`*^9, 3.8233484100626493`*^9}, {
  3.8233494191128426`*^9, 3.8233494194101205`*^9}, {3.823349483938403*^9, 
  3.8233494892409286`*^9}},ExpressionUUID->"35bda14d-abfc-42b1-b54b-\
011b45e93f6f"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{"FileNameJoin", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"ParentDirectory", "[", 
       RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
      "\"\<Figures\>\"", ",", " ", "\"\<Figure 3\>\""}], "}"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp1", " ", "=", " ", "strtSpring"}], ";", " ", 
  RowBox[{"ppp2", " ", "=", " ", "buckledSpring"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<straight-spring.pdf\>\"", ",", "ppp1"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<buckled-spring.pdf\>\"", ",", "ppp2"}], "]"}]}], "Input",
 CellChangeTimes->{{3.8233494374506445`*^9, 3.82334954168311*^9}, 
   3.823349687778065*^9},
 CellLabel->
  "In[222]:=",ExpressionUUID->"abe52da1-7e4b-4a3e-a06a-10e2563ff3f9"],

Cell[BoxData["\<\"straight-spring.pdf\"\>"], "Output",
 CellChangeTimes->{{3.823349473220889*^9, 3.8233494917734137`*^9}, {
   3.8233495329659953`*^9, 3.823349542147002*^9}, 3.8233496884181314`*^9},
 CellLabel->
  "Out[224]=",ExpressionUUID->"fcf5b91e-84f4-46e8-b629-ae64fcf227be"],

Cell[BoxData["\<\"buckled-spring.pdf\"\>"], "Output",
 CellChangeTimes->{{3.823349473220889*^9, 3.8233494917734137`*^9}, {
   3.8233495329659953`*^9, 3.823349542147002*^9}, 3.823349688950778*^9},
 CellLabel->
  "Out[225]=",ExpressionUUID->"52fb82b3-b14c-4e78-b518-61d2adcbc42d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "studying", " ", "eigenvalues", " ", "of", " ", "the", " ", "linearized", 
    " ", "stored", " ", "growth", " ", "model"}], "*)"}], 
  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"\[CapitalSigma]", " ", "=", " ", "0.22596007807663557`"}], ";", 
    RowBox[{"g1", " ", "=", " ", "4.356076133639439`"}], ";", 
    RowBox[{"g2", "=", "5.9646572643958535`"}], ";", " ", 
    RowBox[{"\[Delta]L0", " ", "=", 
     RowBox[{
      RowBox[{"-", "0.5"}], "  ", "0.10675660308544596`"}]}], ";", " ", 
    RowBox[{"\[Epsilon]", " ", "=", " ", "0.10"}], ";", 
    RowBox[{"pf", " ", "=", " ", 
     RowBox[{"1", " ", "+", " ", 
      FractionBox["\[Delta]L0", "\[Epsilon]"]}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Clear", "[", 
     RowBox[{
     "\[CapitalSigma]", " ", ",", "g1", " ", ",", "g2", ",", " ", 
      "\[Delta]L0", " ", ",", " ", "\[Epsilon]"}], " ", "]"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"rateMat", " ", "=", " ", 
     RowBox[{"-", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"g1", " ", "+", " ", 
           RowBox[{"pf", " ", "g2"}]}], ",", " ", 
          RowBox[{
           FractionBox["pf", 
            RowBox[{"1", " ", "-", " ", "pf"}]], " ", 
           RowBox[{"(", 
            RowBox[{"\[CapitalSigma]", " ", "-", " ", 
             RowBox[{"pf", " ", 
              RowBox[{"(", 
               RowBox[{"2", " ", "+", " ", "\[CapitalSigma]"}], ")"}]}]}], 
            ")"}]}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           RowBox[{"-", "g2"}], " ", 
           RowBox[{"(", 
            RowBox[{"1", " ", "-", " ", "pf"}], ")"}]}], ",", " ", 
          RowBox[{"pf", " ", 
           RowBox[{"(", 
            RowBox[{"2", " ", "+", " ", "\[CapitalSigma]"}], ")"}]}]}], 
         "}"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"eigs", " ", "=", " ", 
    RowBox[{
     RowBox[{"Eigenvalues", "[", "rateMat", "]"}], "//", "FullSimplify"}]}], 
   "\[IndentingNewLine]", " ", 
   RowBox[{
    RowBox[{"Eigenvectors", "[", "rateMat", "]"}], "//", "FullSimplify"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.8319703574914894`*^9, 3.8319703723127627`*^9}, {
  3.831970471334567*^9, 3.8319705319314427`*^9}, {3.8319706019590173`*^9, 
  3.831970602111229*^9}, {3.831970636362849*^9, 3.831970693979642*^9}, {
  3.831970892713853*^9, 3.8319709060932026`*^9}, {3.831971008352625*^9, 
  3.831971028263545*^9}},
 CellLabel->
  "In[705]:=",ExpressionUUID->"2dd190ed-a051-4edb-bf7a-bd8069e35220"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"-", "7.486950333455872`"}], ",", 
   RowBox[{"-", "0.6877307193805271`"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.831970481468299*^9, 3.831970532580062*^9}, 
   3.831970604650978*^9, 3.831970662448036*^9, 3.8319706946645813`*^9, {
   3.8319708948355303`*^9, 3.831970908608042*^9}, {3.831971008686861*^9, 
   3.831971028902774*^9}},
 CellLabel->
  "Out[707]=",ExpressionUUID->"1dda2bc3-d98d-4f06-8914-2290c0485c66"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.8966821542716489`"}], ",", "0.4426749532227395`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.10928744463247664`"}], ",", 
     RowBox[{"-", "0.9940101883007556`"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.831970481468299*^9, 3.831970532580062*^9}, 
   3.831970604650978*^9, 3.831970662448036*^9, 3.8319706946645813`*^9, {
   3.8319708948355303`*^9, 3.831970908608042*^9}, {3.831971008686861*^9, 
   3.831971028931447*^9}},
 CellLabel->
  "Out[708]=",ExpressionUUID->"06192f9a-7091-4fa3-8ba4-ba76d5772815"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"pf", " ", "=", " ", 
  RowBox[{"1", " ", "+", " ", 
   FractionBox["\[Delta]L0", "\[Epsilon]"]}]}]], "Input",
 CellChangeTimes->{{3.8319707754245005`*^9, 3.83197077554281*^9}, {
  3.8319708848406324`*^9, 
  3.8319708892546077`*^9}},ExpressionUUID->"c55e2506-e1eb-4f7f-aa43-\
7b9cf97aa4c6"],

Cell[BoxData["2.9410291470081087`"], "Output",
 CellChangeTimes->{3.831970775867886*^9},
 CellLabel->
  "Out[692]=",ExpressionUUID->"32392337-078e-4625-ad92-7f5a7d9f4207"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"L0", "[", "t", "]"}], " ", "\[Equal]", " ", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"1", " ", "+", " ", 
        RowBox[{"\[Epsilon]", " ", 
         RowBox[{"(", 
          RowBox[{"1", " ", "-", " ", "p"}], ")"}], 
         RowBox[{"u", "[", "t", "]"}]}]}], ")"}], " ", 
      RowBox[{"L", "[", "t", "]"}]}]}], ",", " ", 
    RowBox[{"u", "[", "t", "]"}]}], "]"}], "[", 
  RowBox[{"[", 
   RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], "Input",
 CellChangeTimes->{{3.832152261019801*^9, 3.832152269250989*^9}, {
  3.8321523105703173`*^9, 3.832152315223893*^9}},
 CellLabel->"In[62]:=",ExpressionUUID->"f0c750c0-da0d-4099-8b4e-de9d991ddaec"],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"L", "[", "t", "]"}], "-", 
   RowBox[{"L0", "[", "t", "]"}]}], 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "p"}], ")"}], " ", "\[Epsilon]", " ", 
   RowBox[{"L", "[", "t", "]"}]}]]], "Output",
 CellChangeTimes->{{3.83215226179885*^9, 3.832152269682415*^9}, {
  3.8321523129668865`*^9, 3.83215231548006*^9}},
 CellLabel->"Out[63]=",ExpressionUUID->"cb544011-0d17-4b8a-800b-d20172ec1122"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Series", "[", 
  RowBox[{
   FractionBox[
    RowBox[{" ", 
     RowBox[{"(", 
      RowBox[{"1", " ", "+", " ", 
       RowBox[{"\[Epsilon]", " ", "U"}]}], ")"}]}], 
    RowBox[{"1", " ", "+", " ", 
     RowBox[{"\[Epsilon]", " ", "p", " ", "U"}]}]], ",", 
   RowBox[{"{", 
    RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.832152724686163*^9, 3.832152775264002*^9}},
 CellLabel->
  "In[127]:=",ExpressionUUID->"d705eece-5c8f-4760-b3ed-7d682a17ec67"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"1", "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"U", "-", 
      RowBox[{"p", " ", "U"}]}], ")"}], " ", "\[Epsilon]"}], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]", "]"}], "2"],
    SeriesData[$CellContext`\[Epsilon], 0, {}, 0, 2, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon], 0, {
   1, $CellContext`U - $CellContext`p $CellContext`U}, 0, 2, 1],
  Editable->False]], "Output",
 CellChangeTimes->{3.832152748042302*^9, 3.832152790167946*^9},
 CellLabel->
  "Out[127]=",ExpressionUUID->"2912035a-3344-4143-82ef-cef3ce67a03f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"L0", "[", "t_", "]"}], ":=", "  ", 
  RowBox[{"Exp", "[", 
   RowBox[{"1", " ", "t"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"L", "[", "t_", "]"}], " ", ":=", " ", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"1", " ", "+", 
     RowBox[{"\[Epsilon]", " ", 
      RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], 
   RowBox[{"L0", "[", "t", "]"}]}]}], "\[IndentingNewLine]", 
 RowBox[{"sgc", " ", "=", " ", 
  RowBox[{
   RowBox[{
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"L0", "[", "t", "]"}], " ", "\[Equal]", " ", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", " ", "+", " ", 
          RowBox[{"\[Epsilon]", " ", 
           RowBox[{"(", 
            RowBox[{"1", " ", "-", " ", "p"}], ")"}], 
           RowBox[{"u", "[", "t", "]"}]}]}], ")"}], " ", 
        RowBox[{"L", "[", "t", "]"}]}]}], ",", " ", 
      RowBox[{"u", "[", "t", "]"}]}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "//", 
   "FullSimplify"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"u", "[", "t_", "]"}], ":=", "sgc"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"l", "[", "t_", "]"}], ":=", " ", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", " ", "-", " ", 
      RowBox[{"\[Epsilon]", " ", "p", " ", 
       RowBox[{"u", "[", "t", "]"}]}]}], ")"}], " ", 
    RowBox[{"L", "[", "t", "]"}]}]}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"eqs", " ", "=", " ", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"l", "'"}], "[", "t", "]"}], " ", "==", " ", 
      RowBox[{
       FractionBox["1", 
        RowBox[{"1", " ", "+", " ", "\[Epsilon]"}]], 
       RowBox[{"L", "[", "t", "]"}]}]}], "//", "FullSimplify"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Solve", "[", 
   RowBox[{"eqs", ",", " ", 
    RowBox[{
     SuperscriptBox["\[Delta]L", "\[Prime]",
      MultilineFunction->None], "[", "t", "]"}]}], "]"}], 
  "\[IndentingNewLine]", 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8321509796360054`*^9, 3.832151016204089*^9}, {
   3.832151068964123*^9, 3.8321510827319098`*^9}, {3.8321511219317684`*^9, 
   3.83215124744313*^9}, {3.8321516431958895`*^9, 3.8321517434315386`*^9}, {
   3.832151795794089*^9, 3.8321517973242726`*^9}, 3.832152078908491*^9, {
   3.832152138724903*^9, 3.8321521577905045`*^9}, {3.832152227617957*^9, 
   3.8321522597713103`*^9}, {3.832152291508093*^9, 3.8321523550202446`*^9}, {
   3.8321524023795757`*^9, 3.832152402593446*^9}, 3.832152495139677*^9, {
   3.8321525544425507`*^9, 3.8321525560756955`*^9}, {3.8321526280485086`*^9, 
   3.8321526508485117`*^9}, {3.8321527011717033`*^9, 3.8321527035496283`*^9}, 
   3.8321528278374257`*^9, {3.832152898735224*^9, 3.8321528989618025`*^9}, {
   3.8321529914234076`*^9, 3.8321530122104626`*^9}, 3.832153058384307*^9, {
   3.8321533280446596`*^9, 3.832153346127552*^9}, {3.832153418220366*^9, 
   3.832153419064873*^9}},
 CellLabel->
  "In[203]:=",ExpressionUUID->"57952ff9-2007-4bb9-bccf-6ced9d3a4bd6"],

Cell[BoxData[
 FractionBox[
  RowBox[{"\[Delta]L", "[", "t", "]"}], 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "p"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", 
     RowBox[{"\[Epsilon]", " ", 
      RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]]], "Output",
 CellChangeTimes->{
  3.8321520801260986`*^9, {3.8321523371311574`*^9, 3.832152355349138*^9}, 
   3.8321524032332897`*^9, 3.832152558174754*^9, {3.832152645213358*^9, 
   3.832152651252846*^9}, 3.832152828831875*^9, 3.8321529286527925`*^9, {
   3.832152969702307*^9, 3.8321530125774994`*^9}, 3.8321530591408525`*^9, {
   3.8321533284162955`*^9, 3.8321533472305593`*^9}, 3.832153422294353*^9},
 CellLabel->
  "Out[206]=",ExpressionUUID->"4ed0151e-123d-423e-9d28-1fb787b58b5a"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{
     SuperscriptBox["\[Delta]L", "\[Prime]",
      MultilineFunction->None], "[", "t", "]"}], "\[Rule]", 
    RowBox[{"-", 
     FractionBox[
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "p", "+", 
         RowBox[{"p", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}], "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Epsilon]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "p", "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]]}]}], "}"}], 
  "}"}]], "Output",
 CellChangeTimes->{
  3.8321520801260986`*^9, {3.8321523371311574`*^9, 3.832152355349138*^9}, 
   3.8321524032332897`*^9, 3.832152558174754*^9, {3.832152645213358*^9, 
   3.832152651252846*^9}, 3.832152828831875*^9, 3.8321529286527925`*^9, {
   3.832152969702307*^9, 3.8321530125774994`*^9}, 3.8321530591408525`*^9, {
   3.8321533284162955`*^9, 3.8321533472305593`*^9}, 3.8321534223192987`*^9},
 CellLabel->
  "Out[210]=",ExpressionUUID->"45de9318-5a7e-4fbc-96b2-0e6434819f48"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"Series", "[", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "p", "+", 
         RowBox[{"p", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}], "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Epsilon]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "p", "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]]}], ",", 
    RowBox[{"{", 
     RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "//", 
  "FullSimplify"}]], "Input",
 CellChangeTimes->{{3.8321529750433097`*^9, 3.832152997531596*^9}, {
  3.8321534392195396`*^9, 3.8321534541209574`*^9}},
 CellLabel->
  "In[212]:=",ExpressionUUID->"66b6aa11-5300-4328-977b-5626e2ebcd80"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", 
     FractionBox[
      RowBox[{"p", " ", 
       RowBox[{"\[Delta]L", "[", "t", "]"}]}], 
      RowBox[{
       RowBox[{"-", "1"}], "+", "p"}]]}], ")"}], "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", "+", 
      FractionBox[
       RowBox[{
        RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"3", "-", 
             RowBox[{"2", " ", "p"}]}], ")"}], " ", "p"}], "+", 
          RowBox[{
           SuperscriptBox["p", "2"], " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "p"}], ")"}], "2"]]}], ")"}], " ", 
    "\[Epsilon]"}], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]", "]"}], "2"],
    SeriesData[$CellContext`\[Epsilon], 0, {}, 0, 2, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon], 
   0, {-1 + (-1 + $CellContext`p)^(-1) $CellContext`p \
$CellContext`\[Delta]L[$CellContext`t], 
    1 + (-1 + $CellContext`p)^(-2) $CellContext`\[Delta]L[$CellContext`t] (-1 + \
(3 - 2 $CellContext`p) $CellContext`p + $CellContext`p^2 \
$CellContext`\[Delta]L[$CellContext`t])}, 0, 2, 1],
  Editable->False]], "Output",
 CellChangeTimes->{{3.832152977147772*^9, 3.8321529977491837`*^9}, {
  3.832153448284233*^9, 3.832153454547531*^9}},
 CellLabel->
  "Out[212]=",ExpressionUUID->"ff1f321e-047b-47fb-ad20-994b533ee4b3"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{
    FractionBox[
     RowBox[{
      SuperscriptBox["\[ExponentialE]", "t"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "p", "-", 
        RowBox[{"\[Delta]L", "[", "t", "]"}], "-", 
        RowBox[{
         SuperscriptBox["\[Delta]L", "\[Prime]",
          MultilineFunction->None], "[", "t", "]"}]}], ")"}]}], 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p"}]], "\[Equal]", 
    FractionBox[
     RowBox[{
      SuperscriptBox["\[ExponentialE]", "t"], " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"\[Delta]L", "[", "t", "]"}]}], ")"}]}], 
     RowBox[{"1", "+", "\[Epsilon]"}]]}], ",", 
   RowBox[{
    SuperscriptBox["\[Delta]L", "\[Prime]",
     MultilineFunction->None], "[", "t", "]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.8321518069528923`*^9, 3.832151837217821*^9}, 
   3.8321520916175957`*^9},
 CellLabel->"In[55]:=",ExpressionUUID->"301f98ec-a0c8-4074-896c-2afc8f6420bd"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{
     SuperscriptBox["\[Delta]L", "\[Prime]",
      MultilineFunction->None], "[", "t", "]"}], "\[Rule]", 
    FractionBox[
     RowBox[{
      RowBox[{"-", "\[Epsilon]"}], "+", 
      RowBox[{"p", " ", "\[Epsilon]"}], "-", 
      RowBox[{"p", " ", 
       RowBox[{"\[Delta]L", "[", "t", "]"}]}], "-", 
      RowBox[{"\[Epsilon]", " ", 
       RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], 
     RowBox[{"1", "+", "\[Epsilon]"}]]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{{3.8321518137643585`*^9, 3.832151837584392*^9}, 
   3.8321520920682974`*^9},
 CellLabel->"Out[55]=",ExpressionUUID->"71116032-56b7-401b-869a-5d032c51c08b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Series", "[", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "p", "+", 
         RowBox[{"\[Epsilon]", " ", "p", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}], "+", " ", 
         RowBox[{"\[Delta]L", "[", "t", "]"}]}], ")"}]}], 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Epsilon]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "-", "p", "+", 
         RowBox[{"\[Epsilon]", " ", 
          RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}]]}], ",", " ", 
    RowBox[{"{", 
     RowBox[{"\[Epsilon]", ",", "0", ",", "1"}], "}"}]}], "]"}], "//", 
  "FullSimplify"}]}], "Input",
 CellChangeTimes->{{3.8321510877982388`*^9, 3.83215111079496*^9}, {
  3.832151430580041*^9, 3.832151432743905*^9}, {3.8321514815707006`*^9, 
  3.832151481810978*^9}, {3.8321515766137047`*^9, 3.8321515907983403`*^9}, {
  3.8321516221914043`*^9, 3.8321516304744234`*^9}, {3.8321525793765287`*^9, 
  3.832152620579645*^9}},
 CellLabel->
  "In[108]:=",ExpressionUUID->"bf5bcd37-5ed8-461d-936f-501b1c7f5107"],

Cell[BoxData[
 InterpretationBox[
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", 
     FractionBox[
      RowBox[{"\[Delta]L", "[", "t", "]"}], 
      RowBox[{
       RowBox[{"-", "1"}], "+", "p"}]]}], ")"}], "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", "+", 
      FractionBox[
       RowBox[{
        RowBox[{"\[Delta]L", "[", "t", "]"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "-", "p", "+", 
          RowBox[{"p", " ", 
           RowBox[{"\[Delta]L", "[", "t", "]"}]}]}], ")"}]}], 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "p"}], ")"}], "2"]]}], ")"}], " ", 
    "\[Epsilon]"}], "+", 
   InterpretationBox[
    SuperscriptBox[
     RowBox[{"O", "[", "\[Epsilon]", "]"}], "2"],
    SeriesData[$CellContext`\[Epsilon], 0, {}, 0, 2, 1],
    Editable->False]}],
  SeriesData[$CellContext`\[Epsilon], 
   0, {-1 + (-1 + $CellContext`p)^(-1) $CellContext`\[Delta]L[$CellContext`t],
     1 + (-1 + $CellContext`p)^(-2) $CellContext`\[Delta]L[$CellContext`t] (
      1 - $CellContext`p + $CellContext`p \
$CellContext`\[Delta]L[$CellContext`t])}, 0, 2, 1],
  Editable->False]], "Output",
 CellChangeTimes->{
  3.8321511115127296`*^9, 3.8321515570213537`*^9, 3.832151591678253*^9, 
   3.832151630771265*^9, {3.8321525905473537`*^9, 3.8321526213689566`*^9}},
 CellLabel->
  "Out[109]=",ExpressionUUID->"e08a7d4a-bdf8-41f6-8d4d-ce51223fd563"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"0.07", "/", "0.4"}]], "Input",
 CellChangeTimes->{{3.832170044674461*^9, 3.832170046666789*^9}, 
   3.832170081031824*^9},
 CellLabel->"In[2]:=",ExpressionUUID->"3da9de9d-662d-446b-a732-a561816112b8"],

Cell[BoxData["0.17500000000000002`"], "Output",
 CellChangeTimes->{3.832170046992845*^9, 3.8321700816136255`*^9},
 CellLabel->"Out[2]=",ExpressionUUID->"0b280c2b-141d-4e16-ac20-59cbfc9fe197"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"data", "[", 
  RowBox[{"[", 
   RowBox[{"20", ",", "1"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.8347377575745726`*^9, 3.8347377952173395`*^9}},
 CellLabel->
  "In[1745]:=",ExpressionUUID->"37466798-7486-46c2-b261-fd5d949f74f6"],

Cell[BoxData[
 RowBox[{"-", "27.5`"}]], "Output",
 CellChangeTimes->{{3.8347377620110865`*^9, 3.8347377956228156`*^9}},
 CellLabel->
  "Out[1745]=",ExpressionUUID->"3a4a5a0f-3ef6-4515-8bef-ebf481f9bc95"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"SetDirectory", "[", 
   RowBox[{
    RowBox[{"NotebookDirectory", "[", "]"}], " ", "<>", " ", 
    "\"\<Data 11-11-2020\>\""}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"data", " ", "=", 
   RowBox[{"Import", "[", "\"\<length-vs-time-400mM.csv\>\"", "]"}]}], " ", 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"data", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        RowBox[{"data", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", "1"}], "]"}], "]"}], " ", "-", " ", "1350"}], 
       ",", 
       FractionBox[
        RowBox[{" ", 
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{";;", ",", "2"}], "]"}], "]"}]}], 
        RowBox[{"data", "[", 
         RowBox[{"[", 
          RowBox[{"20", ",", "2"}], "]"}], "]"}]]}], "}"}], "//", 
     "Transpose"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"fitRes", " ", "=", " ", 
   RowBox[{"FindFit", "[", 
    RowBox[{
     RowBox[{"data", "[", 
      RowBox[{"[", 
       RowBox[{"5", ";;", "20"}], "]"}], "]"}], ",", " ", 
     RowBox[{"a", " ", 
      RowBox[{"Exp", "[", 
       RowBox[{"b", " ", "t"}], "]"}]}], ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"a", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"b", ",", "0.02"}], "}"}]}], "}"}], ",", "t"}], "]"}]}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"data", "[", 
     RowBox[{"[", 
      RowBox[{";;", ",", "1"}], "]"}], "]"}], " ", "=", " ", 
    RowBox[{
     RowBox[{"data", "[", 
      RowBox[{"[", 
       RowBox[{";;", ",", "1"}], "]"}], "]"}], "  ", "-", " ", "150"}]}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"fitRes", " ", "=", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"a", "\[Rule]", "1.0973712210539464`"}], ",", 
      RowBox[{"b", "\[Rule]", "0.0004377482574550649`"}]}], "}"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Delta]len", " ", "=", " ", 
   RowBox[{
    FractionBox[
     RowBox[{
      RowBox[{"data", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", "2"}], "]"}], "]"}], " ", "-", 
      RowBox[{"a", " ", 
       RowBox[{"Exp", "[", 
        RowBox[{"b", " ", 
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{";;", ",", "1"}], "]"}], "]"}]}], "]"}]}]}], 
     RowBox[{"a", "  ", 
      RowBox[{"Exp", "[", 
       RowBox[{"b", " ", 
        RowBox[{"data", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", "1"}], "]"}], "]"}]}], "]"}]}]], "/.", " ", 
    "fitRes"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"\[Delta]time", " ", "=", 
   RowBox[{
    RowBox[{
     RowBox[{"data", "[", 
      RowBox[{"[", 
       RowBox[{";;", ",", "1"}], "]"}], "]"}], " ", "b"}], "/.", " ", 
    "fitRes"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"\[Delta]Data", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Delta]time", "  ", 
       RowBox[{"(*", 
        RowBox[{"-", " ", "0.1"}], "*)"}], ",", " ", "\[Delta]len"}], "}"}], "//",
      "Transpose"}]}], ";"}], "\[IndentingNewLine]", 
  " "}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Show", "[", 
   RowBox[{
    RowBox[{"ListLinePlot", "[", 
     RowBox[{"data", ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"Blue", ",", " ", 
         RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", " ", 
      RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
      RowBox[{"LabelStyle", "\[Rule]", 
       RowBox[{"Directive", "[", 
        RowBox[{
         RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
         "Black", ",", " ", 
         RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", " ", 
    RowBox[{"Plot", "[", " ", 
     RowBox[{
      RowBox[{
       RowBox[{"a", " ", 
        RowBox[{"Exp", "[", 
         RowBox[{"b", " ", 
          RowBox[{"(", "t", ")"}]}], "]"}]}], "/.", " ", "fitRes"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"t", ",", 
        RowBox[{"Min", "[", 
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}], ",", 
        RowBox[{"Max", "[", 
         RowBox[{"data", "[", 
          RowBox[{"[", 
           RowBox[{";;", ",", "1"}], "]"}], "]"}], "]"}]}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Darker", "[", "Red", "]"}], ",", "Dashed", ",", " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], "}"}]}]}], " ", 
     "]"}], " ", ",", " ", 
    RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"ListLinePlot", "[", 
  RowBox[{"\[Delta]Data", ",", " ", 
   RowBox[{"PlotStyle", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"Blue", ",", " ", 
      RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}], ",", 
   RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
   RowBox[{"LabelStyle", "\[Rule]", 
    RowBox[{"Directive", "[", 
     RowBox[{
      RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
      "Black", ",", " ", 
      RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}]}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8322270813054247`*^9, 3.8322270858128347`*^9}, {
   3.832227129680301*^9, 3.8322271411064224`*^9}, {3.8322271732058105`*^9, 
   3.8322271811393757`*^9}, {3.832227224086557*^9, 3.832227329009537*^9}, {
   3.8322275904030714`*^9, 3.8322277044939594`*^9}, 3.8322278469783187`*^9, {
   3.832239328580351*^9, 3.8322393840391407`*^9}, {3.832239419360382*^9, 
   3.8322395191881742`*^9}, {3.8322396051274514`*^9, 
   3.8322396065587444`*^9}, {3.832239665997337*^9, 3.832239667625739*^9}, {
   3.8322397704098554`*^9, 3.8322398787415543`*^9}, {3.8322399307466908`*^9, 
   3.832239940055513*^9}, {3.8322407068978214`*^9, 3.832240706966903*^9}, 
   3.8322409968399744`*^9, {3.8322411273438606`*^9, 3.832241127428083*^9}, {
   3.8322411614658575`*^9, 3.832241162171764*^9}, {3.832241574258977*^9, 
   3.8322415907323837`*^9}, {3.832242173199852*^9, 3.832242173300132*^9}, 
   3.8322424276031733`*^9, {3.832242487506481*^9, 3.832242562845334*^9}, {
   3.832242824356452*^9, 3.8322428415547953`*^9}, {3.832243149186205*^9, 
   3.832243164749606*^9}, 3.8323108696152673`*^9, {3.832311060914834*^9, 
   3.832311091255811*^9}, 3.832311146631381*^9, {3.8323125600768166`*^9, 
   3.832312587451577*^9}, {3.832312637248681*^9, 3.8323126383976636`*^9}, 
   3.834389593804819*^9, {3.8343896424336104`*^9, 3.834389642528354*^9}, 
   3.834389688351956*^9, {3.8343898250259743`*^9, 3.834389905608785*^9}, {
   3.834671615707345*^9, 3.834671655989607*^9}, {3.8347358372399464`*^9, 
   3.8347358441695795`*^9}, {3.8347370589162054`*^9, 
   3.8347371941190605`*^9}, {3.834737611575093*^9, 3.8347377304214234`*^9}, {
   3.834737800864833*^9, 3.8347378077282867`*^9}, {3.8347384559869423`*^9, 
   3.834738485914627*^9}, {3.8347385396889563`*^9, 3.834738564504387*^9}, {
   3.8347386233808255`*^9, 3.8347386417009263`*^9}, {3.834738713600311*^9, 
   3.8347387345110135`*^9}, {3.8347388175410266`*^9, 
   3.8347388325823755`*^9}, {3.8347408937372265`*^9, 3.834740919042444*^9}, 
   3.834740971979024*^9, {3.8347410069503784`*^9, 3.834741016807379*^9}, 
   3.8347416944077463`*^9, 3.8347418083854313`*^9, {3.8362863807175584`*^9, 
   3.83628638079903*^9}, {3.8417263754178467`*^9, 3.841726377061413*^9}, {
   3.8502871098421583`*^9, 3.850287109935277*^9}, {3.850287143515049*^9, 
   3.850287159611523*^9}, 3.850290625780567*^9, {3.8554693367203884`*^9, 
   3.855469348262061*^9}, 3.855469379871359*^9},
 CellLabel->"In[47]:=",ExpressionUUID->"060fbc49-8bce-4dcc-96e8-5563ec2d456d"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"a", "\[Rule]", "1.046326164573027`"}], ",", 
   RowBox[{"b", "\[Rule]", "0.00020823913797625402`"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.832239608349182*^9, 3.8322396691295433`*^9, {3.832239770625654*^9, 
   3.83223987934487*^9}, 3.8322399404612045`*^9, 3.8322407072673264`*^9, 
   3.832240997456769*^9, 3.8322411279292946`*^9, 3.83224116240432*^9, {
   3.8322415750612216`*^9, 3.832241591950754*^9}, 3.832242173918489*^9, 
   3.8322424277561398`*^9, {3.8322424881910906`*^9, 3.8322425630675497`*^9}, {
   3.8322428253433504`*^9, 3.832242865006857*^9}, {3.832243149368102*^9, 
   3.8322431648876696`*^9}, {3.832310865161872*^9, 3.8323108698136473`*^9}, 
   3.8323110614201164`*^9, 3.8323110918502607`*^9, 3.8323111468218956`*^9, {
   3.8323125605131183`*^9, 3.8323125875963078`*^9}, 3.832312638585519*^9, 
   3.834389596044707*^9, 3.834389643100169*^9, 3.8343896885395837`*^9, {
   3.834389825197404*^9, 3.834389906240694*^9}, {3.834671626560317*^9, 
   3.8346716572552214`*^9}, {3.8347358380183544`*^9, 3.834735844595003*^9}, {
   3.8347371456041517`*^9, 3.8347371947667522`*^9}, {3.83473763908812*^9, 
   3.8347377306034517`*^9}, 3.8347378078839903`*^9, {3.8347384570893583`*^9, 
   3.8347384867085724`*^9}, {3.8347385437571716`*^9, 
   3.8347385646560135`*^9}, {3.8347386353357143`*^9, 3.8347386422535105`*^9}, 
   3.8347387349197702`*^9, 3.8347388330485196`*^9, {3.83474089550482*^9, 
   3.834740919243265*^9}, 3.8347409722235465`*^9, {3.8347410072727346`*^9, 
   3.834741017041716*^9}, 3.8347416949542856`*^9, 3.834741808812152*^9, 
   3.8362863813988733`*^9, 3.841726379834937*^9, 3.850287111197888*^9, {
   3.8502871438937616`*^9, 3.8502871599208107`*^9}, 3.8502906262691207`*^9, 
   3.855468918014473*^9, 3.8554689948378086`*^9, 3.8554691385266895`*^9, 
   3.855469176379367*^9, {3.8554693421985416`*^9, 3.855469348449551*^9}},
 CellLabel->"Out[50]=",ExpressionUUID->"0aea6a6a-2d80-4829-8671-00e5589b5ca3"],

Cell[BoxData[
 GraphicsBox[{{{}, {{{}, {}, 
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
       "Butt"], LineBox[CompressedData["
1:eJw11gs0lFkcAPAJy4SWNqYpWu+Q92CSXv/KEast6YGcZUK28oyNTuSREJtG
lsqjPPN+jNeModqrh2PjCC2rs5VHuyFTocTm0Q73fnPOd+b8vvvNvff7///f
/xsNz0CnExI0Gi1BfCx9L39y01DkxE/qD+JGdi6b9xsS9fJ9NbRHsVEqSr3p
3yVoJe66hrZNM5wLjo5hD6agmSGGI7OXMhftD+qwWXR/i027igq8uWu5c8Tq
V1ByRtuAQ8o4NiSh9I8R3jErRNicy8gq8bn0BV/i6HhUecr7fKjsO+zcS6iz
Uuvz6b+J0UUkYR/f1o/ek/WjUUiLbf2Fsg9k/Ug04FoUwHKaIOudR6kaLDZP
koxHh6IdLyRkC6yp+YLR1kyZh89VyHy0AKRl/HDETIO63gfh82Q+mjt6p6IT
fvcc5f1oQ1mHa85ryjSa9sHzgVEOk9Q4JAfG971/SNkdXmXPP+JaT1HzA/fT
XyHK7VPU+sAWXO0v9/9I7Q9ete7oFEl/ovYPW09ZW/lXfqLuD87GhQ+YeE9T
9w89umH2PNnPVHzAtplu+LX2MxU/KJPbbhToNUPFF3rN1l9aYM5S8Qfba62a
+W9mqfxA9TRkVNT9R+UP0Murb1qCvlD5BSP9aYUOjTkq/2AQI3rrPDFH1Qe0
Kl15XSqYp+oHQm5zDU2jF6j6Ap/jnvc6OItU/YHMSjsDoc1Xqj5hpe8wpGrQ
AO83DdxYDgcvxxGnpIP+fOaPZmPE0dchKslx99qQFdhBN8BFPkJx4T0x5ybo
JPaEz7lJYDtmQPG//qLXHcSQCTz7x+U++ySxTbNAXDzO2e3E6tnQybBPPnRM
ClvxFnTl61QkSn6DTbsNd/cqJO8QEk/chp1Kbgw1B2nswRxo67ZM3veU+GQu
+CXZC9K9ZMh4LuxlMFHbO2KXPJB43ls9mEPH7sqD4PD+wuEjK7Ht8oH9rOnV
2DQxyofhLTK5mmmy2FYF0LdR1Vp1lxw2rwAa2UNdQ3R5bL1CuOHRVF8sIs4t
BL/Y+5bxLauwmXfgxjZJo2MPviXxvgMlp39PlP1TAZteBMNe9qVRHEUS/yKQ
m7nv0faEeLYI7i0YNXQbryb5KAan3sg1yiXEo8Ww/Ph9/x3JTwlIXY9yjRUQ
95eAn9Nk2bpDa0i+SuHkk4TDDQPEbaVg21XKM8pQIvkrA+Mq28opPWXsxjLY
HvIyuKmZ2LQcPtrIix8ZBnZJOQywP7z5R3ctyW8FaGW57RX1Et+sgPpQtYAV
cUyS70qyn3XYlyuh3DKK3WGyHptWBXnLBUV8rgq8BmNHw7gq2BNVsOpLH1N6
syr2yWrwk4/NilwkHqwGF9ez4ik2YBvyQDQ5fMaj4ntyPQ8MaoVnH7mrYRfy
oGq5X6qT3/Ng1jLLs8efWLUGOE+PGKoMELvUgMd4DMv1Zw3stBrgtS9yD4wQ
d9UASy+TZuWiiS1fC62b9/jODBHb1YLJ0QM9Pse0sC/VQrcUavEcJEa1kK5Q
Kq4Qbez5WngKv17nbdTBtqqDdSr9MQadxL/UQXHO1xd25zZi8+qAbp5kwVit
iy2qA18HH33ZGmK9ekhYfmHoYXvXwzY1Vw5NSx87tx6y+EejcyaJX9RDMyuA
rvhsEzazAXRPmVeO3zLAPtwAu739ODJVhtgpDUCbGpsfbDbC7miAMz/IrQ8d
Mcam82HL1OKtE29NsG34oHA6wWzR2RQ7mg/iZiB+QxHf5UNWWMjUmp1m2LN8
uKP3aPeuBmILAaQxLESdBizsIAFIbg16LIwgrhCA7iZHNc448agAAsTdKgDM
sbUb4fhSw9Yk5jRCRt/0/moT4uxGEDdHfnAFcX8jKLcvZdQCW0kI9KV2O0Ps
KITtzjV+EeaW2FeEMJrXrRv2B3GbED507yk4EMDGlmoi/ZcYmmD578DFzfA/
c3+i1Q==
        "]]}}, 
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
      "Butt"]}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
       "Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[
        NCache[
         Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
       "Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0, 0], Thickness[0.007], 
       Opacity[1.], Dashing[{Small, Small}], LineBox[CompressedData["
1:eJwVxXk01AkAB3ByJ4kWpYght3XMz934fRfRk/Rqo2Mlird2WbZNiBYt2bBp
MbkmR+XIkYwczdTyk2m2RrWiell6hZw75D7GMbv7x+d9dE9HHA7eICEhceA/
/y9dvfpaXMykzAM/1jo3DJJahdwXtBwmJV0sfZjNGSRtr8Xw9/7GpPgbqajd
rYNkyLm55vQYJpWyVO6uKhgkO5yEBRqHmJQgZkhx/cMgmfW8N8BiA5OisuTT
tDd9InUmuUL/oGxq2FvHMyX4E8mwuiDdYpRFcW0Th+W1hsgrP3W68pcyqK5k
0/nAtmHSvtHRiSdKpd6qGEf6fjtKvtcsXe5Wu0ytvP9rRw1tnNwjP2R45moC
dfMIKXIwFJKSKHhzufQ8lc/TZzmYT5Kra9ZRV14GUxeltAZOuE2RR5epsnQF
DUry1SgvKWma/KhX/kxn9jRk2v2q9rTPkFd1zqFaLxI/zKZ6tdrNkaPPRLf8
t8VjxaXLOvXuPFmj/tgpeiIJGu7hBca2i+RTnq7ntH0qfh+1Ki4TL5EumGc1
G2fgZ93qRUeBiNzSNy1/7HEmTtXu6L70cZVMTvkuYP8ZJsSRxxPi1MTkHQ1W
z6e3OVDcJxFQWCaBdYO/g3IT8hEXNRRL/ywJKa1ulSkRC6mefGmBgxQcM3s6
A6uLIGPguDzBlcaKg6VvWUUJutL8zE4elgW7qPO1cOAmwnqTOIXjckh8HN1H
2d+GK2O3pBtfAeU9K3Mj0aVI0/cqr7ytCGUjiiWoK4PqeuKCdb4SMm3SOxyk
K0CbUP6Q1a+MUFv6plXcwRGW/P5WNRX4L/S/8cyrRNBTl+XNoarInug09xmr
wm2e8LjC663QeXcjp16vBlrz14rzGGrgX4q4ciPmLrqLHZR6B9TRrr0rvaep
FhMuft8npG6D1OzmnV2T97Cz6s3p4L2asGjfwKouqYPBLa+qEs+d+DUlrC7X
mQ2O5tgm2UPaCKs8vlEwxkavt2J/vK8O1vY2CstS68HKMIqsvKwLi3XLnFMG
9xG8cNHXhkfDpJpl8qnO+/Dw92n3s9PHsYpCkXxEAy4cuMDOqd6Ng3kZjUua
jdCL+nKGcdIQI6XFdvz2RnR8LWUwZ2gMU9NdLozAJkzbqXgnz5pgZQstU6TY
jM64FwpzG80R/WN2SGB1M6ZnlPrc9S1w/R99uXKPB2jJFoZ9U2MJku8wbjn9
AKqfyRireStc1/zDJ/gaB0frGZk9znS8pTlRhlkcjFT8IvfSjQ51U47JOJOD
pa9ifXiedOQ5NYrDCzhQDngW2+RLR4Hf3cqYMg5qN4+J6sLpKCkqXEt/yEF6
3KtD4iI6qmnxZfUjHKjVtYXISBIQmqwqnx/nQM4zZ9ZGjoAZPTbWboIDcVZD
SIgSgVrXqIOPZjg4Ym3+Rfd2AnVB4ctP1jhgTbETW60JNJX7H+jZyoUgrcVm
PojAYm1fM0udi/wGdo1bKAH75hM0/+1c1M4maOScJcD503dxQJuLiLRtHc7x
BB6Net8UGnNhmWT5sCKXwOrUc8V7Zlzwzk73yxYRYCx7Rp214KJJNkQypJRA
i4LH/gWCi9H1YTNLNgGxypPGB3Zc3Nhn5JjbTACarjpxjlzUyGS6SLQQSKS1
pTEYXJyntbiH8gi0mZDzYpKLDw+9PN4JCPwLNaZSEw==
        "]]},
      Annotation[#, "Charting`Private`Tag$16020#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.02], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.832239608349182*^9, 3.8322396691295433`*^9, {3.832239770625654*^9, 
   3.83223987934487*^9}, 3.8322399404612045`*^9, 3.8322407072673264`*^9, 
   3.832240997456769*^9, 3.8322411279292946`*^9, 3.83224116240432*^9, {
   3.8322415750612216`*^9, 3.832241591950754*^9}, 3.832242173918489*^9, 
   3.8322424277561398`*^9, {3.8322424881910906`*^9, 3.8322425630675497`*^9}, {
   3.8322428253433504`*^9, 3.832242865006857*^9}, {3.832243149368102*^9, 
   3.8322431648876696`*^9}, {3.832310865161872*^9, 3.8323108698136473`*^9}, 
   3.8323110614201164`*^9, 3.8323110918502607`*^9, 3.8323111468218956`*^9, {
   3.8323125605131183`*^9, 3.8323125875963078`*^9}, 3.832312638585519*^9, 
   3.834389596044707*^9, 3.834389643100169*^9, 3.8343896885395837`*^9, {
   3.834389825197404*^9, 3.834389906240694*^9}, {3.834671626560317*^9, 
   3.8346716572552214`*^9}, {3.8347358380183544`*^9, 3.834735844595003*^9}, {
   3.8347371456041517`*^9, 3.8347371947667522`*^9}, {3.83473763908812*^9, 
   3.8347377306034517`*^9}, 3.8347378078839903`*^9, {3.8347384570893583`*^9, 
   3.8347384867085724`*^9}, {3.8347385437571716`*^9, 
   3.8347385646560135`*^9}, {3.8347386353357143`*^9, 3.8347386422535105`*^9}, 
   3.8347387349197702`*^9, 3.8347388330485196`*^9, {3.83474089550482*^9, 
   3.834740919243265*^9}, 3.8347409722235465`*^9, {3.8347410072727346`*^9, 
   3.834741017041716*^9}, 3.8347416949542856`*^9, 3.834741808812152*^9, 
   3.8362863813988733`*^9, 3.841726379834937*^9, 3.850287111197888*^9, {
   3.8502871438937616`*^9, 3.8502871599208107`*^9}, 3.8502906262691207`*^9, 
   3.855468918014473*^9, 3.8554689948378086`*^9, 3.8554691385266895`*^9, 
   3.855469176379367*^9, {3.8554693421985416`*^9, 3.8554693485432844`*^9}},
 CellLabel->"Out[55]=",ExpressionUUID->"2a7c6c25-2bec-462f-be13-74e5d10eaed8"],

Cell[BoxData[
 GraphicsBox[{{}, {{{}, {}, 
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
      "Butt"], LineBox[CompressedData["
1:eJw1lAs0lOkfx2eMYS2KWnY5isjlkOtGsvJ7xG7/aiXSukRJCrs2yiVtKqR0
c0tyie3PkrETxtLk8m/eeWcwIq3EXzEpt7SyaFxzXXs875zznjnPed/3eb6/
7/fzfTf5hbgel6LRaAkr17//ubbm8Snn+4hyyWEj+WeNEPj+uVzA/V6imOjz
1hQ0gsXt08k7/nxLxHO0T1/iNsLsRT1Dg/E3xNHA9zv0NjVCYmeAZYd9D5Gr
eG1Ra70ItE2LUVyamNAIMbfcYNMA3CvDe00Hu4h1W2YdJdX1sLfHyF1s9YpY
PnN3j+NCHbyx/Nnv2tVOwtfATe1umBDCE0t/turqIMSupbM5fBLkBsei+o3a
CRVbp4aE9SSs6m0jaE1P8pN2k1hfK5HWmzDQU0diPc+I2PaD9ju3CvD5TcTU
fErFcIsAnyci5F8c3c2NKsP71xEn3N3od02yidX9+ESf+vaLx5rvEKvv1xBR
F15az3knE6vPVxJXx/Z5+1fdxPd/J6RG4uP9VBPwOpvw916nL51+jaDh3/VM
tYMqpUnUfRB2uzOGLidS78O60Vvb1qQkUftDxTT9iRXtCnU+EOrFdcb7Qyh9
4OuypG+XaUbph9e2L35JCImi5gPH1sZt8mo3qfnh113hl+X6Uil/YFxnz5yD
bjrlHyx1K/+aOJ1J+QuHhG2eC/wcyn8w8n/W2d6WR+UDA5HuL49xCqj8YGpE
9FVOUyGVL+x7EJBZlVhI5Q9BCxFOh42LKD7AxyN16mV7EcUPPFWqkTtjzKL4
AvlArzW8P4sp/qDhbWqE5XY2xSf8J0pCRI+XYL19YLPorYjYD+BFSspStVs/
SEzOS+SV2Fj/AKjK69aEt5aA3XbnCQXGILDUNjfqB5bieQYhZTk5vLz/Afze
q/j+SPk70IpX7fW7wsbzDYFi0QjTPZINKtefiv848h68TLJTNaTYeN6/wEs/
486RNjbEWNx4zlwzDKbRPXMFQ6V4/mEQpLpYNHmUw0jX7gaP/30Ax/sntwrt
yrEfI2BzbiIg5gAH3C99Vsv+8W+wdtrDENI42J9R4LF8pwK0S0FoJCpb+moM
QqtlHaZOlmG/xsAqWSH91n4OfDm8s411bBwOFefn1WaVYf/GIf/MXHPIhlJw
ssv/vs3mI3jcQfoR0SXYz4/wTbt6ukFiKcTdoovmlSVQbV2lbZXHwf5KQCbU
bMdhi3Koeudrr/uXBNZfnDj/jWoF9nsCikPMxAOOD2HUhl+7jz8BnRXCotSx
h9j/SWBo+CxrZD4EnWRNq6iMSfAOnQxv4FTiPKYgf9EB7kkqwbP/Aifv5BT4
xNBFtNZKnM8UhHCPuyokcSF5W49h87fTMPvfvoHFzVU4r2nQ3Zl15/hvVVB/
Y0fhpMYMRB7QWtRyq8X5zYBmNTdIP64W5t7kaG6cnIGQrZcKPApqcZ6zcIbM
Jba3PgazrQtZu5pnocl5LI/O4+F8P4HPfXazQxwBJ64e+uJU/ifITopwrpDn
47znwLrbalr7Ax/uimuSss/OwReJ8CF7hsT5z8Ecy1Q0RhPAczN1ubr986BH
LujuEZKYh3kI0ud+a3SIBNnLZy/9rb8ATkt+pgkXSczHAgSPe74a1BGA7auX
i6rLC1DSGUPaKQgwL4tw+NTXuj9dIOG0sXUU+v8inD0nxW0b42N+lsDytfl4
ZCYfWLEZkqCSJVCmn8hTKeBjnpahTJO7+PEgCT0d08Fp8ctgI2d0yzOfxHwt
Q36GUnesFwmfq7DDeoxpSDXmnZ7iYxLzRkOv1fw1Dqzo3Ux0mYVl0ZBtmnSC
JIn6PtOQ8mU90y9jBQBBn4/KMulotNcPuc8IMI90JI52bb2dLgSv9TbsnNCV
Nb9bq1KnDvNJRxYd9nH9m+og4nFQoLmYjhrdog1+/LoO8yqFbnjKmIqt6iEl
IEu3YdfKuk8vmGdej/mVQqxTLzKtl+qBrfykz6tCCjn/xO4PUBJhnqXQic/C
av64IIKG2tl7YxsZqGNv2MP98ATzzUCeli4F3YImeHvcwCf+OgMV+eiSZaVP
Me8MVHWuVoWV2wLzaz3U1aYZaNI5qHKLXQvmXxqd1nrn7Li7BVRrEjpLjkqj
Lnvm5sqQFtwHacQJCjbkRbSAuf+j2ztbpFGuTiez8FgL7gcT3durNiD+1Azf
rxly6bRmopwfeD4a0c24L0yU7JKhsWVDEwRUqa4NLmCipn22+SYW9bg/TOSW
PslbqCEh1u+7pzQlGaQjiu2aWslntU8y6CYn47WhgRByFCKvpZ+TQb0xz9JC
TYS4XzJoKOuKx9lPfHjELfzOcEgG3cvpDvDZSOK+ySIHLccD3VdJaPPtYBCu
soj3qK3jfjMf908WsR7Fbqit5sM/WhEvbg==
       "]]}}, 
    {RGBColor[0, 0, 1], PointSize[
      NCache[
       Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
     "Butt"]}, {
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
      "Butt"]}, {}}, {
     {RGBColor[0, 0, 1], PointSize[
       NCache[
        Rational[1, 72], 0.013888888888888888`]], Thickness[0.007], CapForm[
      "Butt"]}, {}}}, {{}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->{{-0.5778276998406856, 
   2.9416682900980358`}, {-0.02556841083158847, 0.23137379704618666`}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.832239608349182*^9, 3.8322396691295433`*^9, {3.832239770625654*^9, 
   3.83223987934487*^9}, 3.8322399404612045`*^9, 3.8322407072673264`*^9, 
   3.832240997456769*^9, 3.8322411279292946`*^9, 3.83224116240432*^9, {
   3.8322415750612216`*^9, 3.832241591950754*^9}, 3.832242173918489*^9, 
   3.8322424277561398`*^9, {3.8322424881910906`*^9, 3.8322425630675497`*^9}, {
   3.8322428253433504`*^9, 3.832242865006857*^9}, {3.832243149368102*^9, 
   3.8322431648876696`*^9}, {3.832310865161872*^9, 3.8323108698136473`*^9}, 
   3.8323110614201164`*^9, 3.8323110918502607`*^9, 3.8323111468218956`*^9, {
   3.8323125605131183`*^9, 3.8323125875963078`*^9}, 3.832312638585519*^9, 
   3.834389596044707*^9, 3.834389643100169*^9, 3.8343896885395837`*^9, {
   3.834389825197404*^9, 3.834389906240694*^9}, {3.834671626560317*^9, 
   3.8346716572552214`*^9}, {3.8347358380183544`*^9, 3.834735844595003*^9}, {
   3.8347371456041517`*^9, 3.8347371947667522`*^9}, {3.83473763908812*^9, 
   3.8347377306034517`*^9}, 3.8347378078839903`*^9, {3.8347384570893583`*^9, 
   3.8347384867085724`*^9}, {3.8347385437571716`*^9, 
   3.8347385646560135`*^9}, {3.8347386353357143`*^9, 3.8347386422535105`*^9}, 
   3.8347387349197702`*^9, 3.8347388330485196`*^9, {3.83474089550482*^9, 
   3.834740919243265*^9}, 3.8347409722235465`*^9, {3.8347410072727346`*^9, 
   3.834741017041716*^9}, 3.8347416949542856`*^9, 3.834741808812152*^9, 
   3.8362863813988733`*^9, 3.841726379834937*^9, 3.850287111197888*^9, {
   3.8502871438937616`*^9, 3.8502871599208107`*^9}, 3.8502906262691207`*^9, 
   3.855468918014473*^9, 3.8554689948378086`*^9, 3.8554691385266895`*^9, 
   3.855469176379367*^9, {3.8554693421985416`*^9, 3.8554693486214094`*^9}},
 CellLabel->"Out[56]=",ExpressionUUID->"1935a92e-2e71-45ce-a7f6-9285d22c5df3"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.832239267437463*^9, 
  3.8322393269694953`*^9}},ExpressionUUID->"329ebff4-3fda-49ab-a352-\
eb89c51361ad"],

Cell[CellGroupData[{

Cell[BoxData["fitRes"], "Input",
 CellLabel->
  "In[2359]:=",ExpressionUUID->"8a8ffb99-c9a5-4a9b-b6a7-91d363b60487"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"a", "\[Rule]", "1.0973712210539464`"}], ",", 
   RowBox[{"b", "\[Rule]", "0.0005377482574550649`"}]}], "}"}]], "Output",
 CellChangeTimes->{3.8347379023230715`*^9, 3.834738840202323*^9},
 CellLabel->
  "Out[2359]=",ExpressionUUID->"ca2225c3-b6d0-4bdb-866f-4cda3cb1b155"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"fitRes", " ", "=", " ", 
   RowBox[{"FindFit", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"data", "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", "1"}], "]"}], "]"}], ",", 
       RowBox[{"Log", "[", 
        RowBox[{"data", "[", 
         RowBox[{"[", 
          RowBox[{";;", ",", "2"}], "]"}], "]"}], "]"}]}], "}"}], ",", "  ", 
     RowBox[{"Exp", "[", 
      RowBox[{"b", " ", "t"}], "]"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"a", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"b", ",", "0.02"}], "}"}]}], "}"}], ",", "t"}], "]"}]}], 
  "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.832239907254244*^9, 
  3.8322399228637495`*^9}},ExpressionUUID->"c6762416-02f3-4371-b6d9-\
c22ec8e201bd"],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"\[Epsilon]", " ", "=", " ", "0.10"}], ";"}], 
  " "}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dat0", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"0", ",", "0"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.2", ",", 
       FractionBox["0.042006447294796294`", "\[Epsilon]"]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.4", ",", 
       FractionBox[
        RowBox[{"0.", ";", "07979761194836375`"}], "\[Epsilon]"]}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"0.6", ",", 
       FractionBox["0.115", "\[Epsilon]"]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.8", ",", 
       FractionBox["0.135", "\[Epsilon]"]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"1", ",", 
       FractionBox["0.20", "\[Epsilon]"]}], "}"}]}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"pfData", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.2", ",", 
       RowBox[{"1", "-", 
        FractionBox["0.042006447294796294`", "\[Epsilon]"]}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.4", ",", 
       RowBox[{"1", "-", 
        FractionBox["0.07979761194836375`", "\[Epsilon]"]}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.6", ",", 
       RowBox[{"1", "-", 
        FractionBox["0.115", "\[Epsilon]"]}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.8", ",", 
       RowBox[{"1", "-", 
        FractionBox["0.135", "\[Epsilon]"]}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"1", ",", 
       RowBox[{"1", "-", 
        FractionBox["0.2", "\[Epsilon]"]}]}], "}"}]}], 
    RowBox[{"(*", 
     RowBox[{",", 
      RowBox[{"{", 
       RowBox[{"1.2", ",", 
        RowBox[{"1", "-", 
         FractionBox["0.18", "\[Epsilon]"]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"2", ",", 
        RowBox[{"1", "-", 
         FractionBox["0.15", "\[Epsilon]"]}]}], "}"}]}], "*)"}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"f", " ", "=", " ", 
    RowBox[{"Fit", "[", 
     RowBox[{"dat0", ",", " ", 
      RowBox[{"{", "x", "}"}], ",", " ", "x"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"1", " ", "-", " ", "f"}], "\[Equal]", "0"}], ",", " ", "x"}], 
    "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"pressureVSmolarP", " ", "=", " ", 
   RowBox[{"Show", "[", " ", 
    RowBox[{
     RowBox[{"ListPlot", "[", 
      RowBox[{"pfData", ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Blue", ",", " ", 
          RowBox[{"PointSize", "[", "0.025", "]"}]}], "}"}]}], ",", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "16"}]}], "]"}]}], ",", " ", 
       RowBox[{"GridLines", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{
               RowBox[{"Solve", "[", 
                RowBox[{
                 RowBox[{
                  RowBox[{"1", " ", "-", " ", "f"}], "\[Equal]", "0"}], ",", 
                 " ", "x"}], "]"}], "[", 
               RowBox[{"[", 
                RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", " ", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Opacity", "[", "0.8", "]"}], ",", "Red", ",", " ", 
                RowBox[{"Thickness", "[", "0.0075", "]"}], ",", " ", 
                "Dashed"}], "}"}]}], "}"}]}], "}"}], ",", " ", 
          RowBox[{"{", "0", "}"}]}], "}"}]}]}], "]"}], ",", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", " ", "-", " ", "f"}], ")"}], "/.", 
        RowBox[{"x", "\[Rule]", "u"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", "0", ",", "1"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}]}], "]"}], ",", 
     " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8214412709014835`*^9, 3.821441311118063*^9}, {
   3.821441396382062*^9, 3.8214414334299383`*^9}, {3.8214415233445215`*^9, 
   3.8214415274225917`*^9}, 3.8214416103125024`*^9, {3.8214450669895153`*^9, 
   3.821445070101194*^9}, 3.821514386171164*^9, {3.8215180005141644`*^9, 
   3.8215182412939982`*^9}, {3.8215186334684553`*^9, 
   3.8215186549332137`*^9}, {3.8215186919346457`*^9, 3.8215187455024786`*^9}, 
   3.8215187883277855`*^9, 3.821541639872239*^9, {3.8215418261371217`*^9, 
   3.821541826287737*^9}, 3.821541924201022*^9, {3.8215419571130114`*^9, 
   3.821541957270591*^9}, {3.8215421384098616`*^9, 3.821542149511176*^9}, 
   3.82154256953174*^9, {3.8215426186533833`*^9, 3.821542622661666*^9}, {
   3.8215426695841894`*^9, 3.8215427122381296`*^9}, {3.8215554733497562`*^9, 
   3.8215554746035347`*^9}, 3.821555526208335*^9, 3.8224684962783947`*^9, {
   3.823079575390283*^9, 3.8230795804860153`*^9}, 3.823327571810317*^9, {
   3.823331711751459*^9, 3.8233317160630445`*^9}, 3.8233348371631727`*^9, {
   3.8233385738868012`*^9, 3.823338574934807*^9}, {3.8233386871116705`*^9, 
   3.8233387249409556`*^9}, {3.8233388209115458`*^9, 3.823338843932528*^9}, 
   3.823338877790536*^9, {3.8248125864483395`*^9, 3.8248126105724845`*^9}, {
   3.824812642547243*^9, 3.8248126623814397`*^9}, {3.83086301033364*^9, 
   3.8308630105193176`*^9}, 3.8308630564666104`*^9, {3.830863129138797*^9, 
   3.8308632715870595`*^9}, {3.830863425985051*^9, 3.83086346811007*^9}, {
   3.8322422082843366`*^9, 3.8322422294055424`*^9}, {3.832242461347411*^9, 
   3.8322424617538233`*^9}, {3.8322426155532804`*^9, 3.832242628542795*^9}, {
   3.8322429052424564`*^9, 3.8322429348321714`*^9}, {3.832311175820121*^9, 
   3.8323112117902546`*^9}, {3.8323126132751646`*^9, 3.8323126516222153`*^9}, 
   3.832312751647225*^9, {3.833701540605051*^9, 3.8337015880328417`*^9}, {
   3.834389536368841*^9, 3.834389536387066*^9}, {3.8343896276168537`*^9, 
   3.8343896618262033`*^9}, {3.8343896983219757`*^9, 3.834389793634487*^9}, 
   3.83438985510118*^9, {3.834389888040037*^9, 3.8343899020731516`*^9}, {
   3.8343899411899157`*^9, 3.8343901148636866`*^9}, {3.8343921060474615`*^9, 
   3.834392145429639*^9}, {3.83473144227169*^9, 3.8347314475061464`*^9}, {
   3.8398395122025967`*^9, 3.8398395450178885`*^9}, 3.850390567519235*^9},
 CellLabel->"In[1]:=",ExpressionUUID->"e3059cb7-46b2-40f0-9e59-60e35200aa4a"],

Cell[BoxData["6.892436835777738`*^-17"], "Output",
 CellChangeTimes->{
  3.8214412775317774`*^9, 3.821441311185881*^9, {3.8214414142372613`*^9, 
   3.82144143354862*^9}, 3.8214415328969736`*^9, 3.8214416116159973`*^9, {
   3.8215181026301155`*^9, 3.8215182113360653`*^9}, 3.821518244505819*^9, {
   3.8215186384471483`*^9, 3.821518655305195*^9}, {3.8215187246257415`*^9, 
   3.821518746205914*^9}, 3.8215187885006742`*^9, {3.821541640172439*^9, 
   3.821541649489496*^9}, 3.8215418264193945`*^9, 3.8215419248453264`*^9, 
   3.8215419574052305`*^9, {3.8215421265704985`*^9, 3.821542149723608*^9}, 
   3.8215425702478256`*^9, {3.821542623242113*^9, 3.821542712736795*^9}, 
   3.8215554755925894`*^9, 3.821555526433402*^9, 3.8215555626123753`*^9, 
   3.8224684980596027`*^9, {3.823079576556179*^9, 3.823079580650011*^9}, 
   3.8231636751315575`*^9, 3.823327571966501*^9, {3.8233317118671355`*^9, 
   3.8233317163623915`*^9}, 3.82333383299719*^9, 3.8233348373171678`*^9, 
   3.8233386541702147`*^9, {3.82333868837786*^9, 3.823338725410966*^9}, 
   3.8233388477369933`*^9, 3.8233388789993486`*^9, 3.824812611988924*^9, 
   3.824812667458674*^9, {3.8308631419176607`*^9, 3.8308631520174303`*^9}, {
   3.830863182967808*^9, 3.830863272246542*^9}, {3.830863426083627*^9, 
   3.8308634428592696`*^9}, 3.8321754036332984`*^9, 3.8322422298219614`*^9, 
   3.8322424638964596`*^9, 3.8322426292819815`*^9, {3.8322429319245195`*^9, 
   3.8322429350365973`*^9}, 3.8323094664458723`*^9, {3.8323111760015836`*^9, 
   3.8323112119322386`*^9}, 3.8323124921855993`*^9, 3.8323126556227894`*^9, 
   3.832312753229306*^9, 3.8324076132262793`*^9, 3.8337014978720665`*^9, {
   3.833701541594068*^9, 3.8337015881483483`*^9}, 3.8337018462676697`*^9, 
   3.833702390575014*^9, 3.8343895380445175`*^9, {3.8343896280041695`*^9, 
   3.834389654414184*^9}, {3.8343897631404657`*^9, 3.834389794399441*^9}, {
   3.8343900133490458`*^9, 3.834390018761058*^9}, {3.834390057911209*^9, 
   3.834390115182616*^9}, {3.834392106350724*^9, 3.834392145982484*^9}, {
   3.8347314436940784`*^9, 3.8347314481930957`*^9}, 3.8398395564285717`*^9, 
   3.8503905719778156`*^9},
 CellLabel->"Out[5]=",ExpressionUUID->"8974bcf9-e086-4e67-bedc-d1309ece5730"],

Cell[BoxData[
 GraphicsBox[{{{}, {
     {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
      "Butt"], PointBox[{{0., 1.}, {0.2, 0.579935527052037}, {0.4, 
       0.20202388051636244`}, {0.6, -0.15000000000000013`}, {
       0.8, -0.3500000000000001}, {1., -1.}}]}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
       Thickness[0.007], Opacity[1.], LineBox[CompressedData["
1:eJwVj3k4lAkcgBGr8qBBZUg1Yt2ZXDGOX6HhE4WSPCFbOZYOYdd20WjQMmKj
Yh25cqRMFtWuiZoftvVUlCvFYFgGwyePo7Rr1v7xPu+/70s7cc47WEZKSspj
lf/tFix6+3zCx4FLUWYoltW8kHXSiBykWkDTUoNJFD2Db343O6+W6gxF14qG
D9AL+ftf9/6WTz0MN4ksW3v6I77vqaVnN6mnIPVBWpgF/Tl/wDTZKY0aA/KB
6yWm9A5+4caDSSlUNrQ8dm0zoQ/xWWtr9X6mZoHOyDjXmD7LP+pXxJ39VAph
LMr6WIEUKkhY/i5buTBuxixdVl6Hul4zIkytg5Y4g0xjzgaMfWMD2fO/w3ZR
vwtrXA0311EE0tJN4CnMjQz9rI6PhU6v2u34wBmSV4wO0kJ+eL6mn7gZHixw
lRb7tuPCt/bKD8/8CZdw2POSQBtlvlRt0NRtAy/VSfdMJV20kgQ9PlT9CjKM
PsvEUPXwFdviTathO6i7/ROloGGA2zKmvlTOdED5ZE+eJdMIp5YGBd30d1B4
6MlVfQ8TLJ1saFO60QkFDme3VsebopJWOTk62gVzdxRtFzrpyPm+PqRQpwfa
5scwtnsXLu6pGg2L74V7N6sqUWyGMWbNdZvwPdSrRYujP5njYHVz6lvaB3jZ
q8uZVrDEr+FduQYXP4Ikv/O6I80KjfbKr4Q09EOEK1v4dcdudCmmhdZsFsAH
8+05cXbWGKt1XHvYfxDi1jQ9CHa0QWOxj0KvxxAwe45q6TsxUFV5dm3z8hBQ
Jgcma/1sUbYpl7sjbxgowuCNpQF2GGHR0LduvxBUNfvyAmLtsYo4Udi4KASG
rwtrLtUBF6Y0NozdHoE7sU/5U2mA9Ydc1mQ5j8LF0yn0Xu89GO+aeLdubBSY
yozq8O49SBtwe1+S+DcUmod+iPDZi4zd7Cyq2RjEfV5X7zW0F/23tn+R7hyD
H013Nk5854gLbWnCSNY4zH7z8oeQGUfMlg2M8dYRAdtz5Nit806oKqgvlmkW
QYXm5dldc04od4V12Ob8BHgmp5jXXnFGqcpArlBlElSCNe6NSZwx6ldumgp/
Eo6MbGtZ4ezDZ0bX11LOToHhSHEmezMTKW5RxglKYtDwKc/gZTOx36Sj8wJP
DJxQml2fjgs+KgCd0cBpUBdv2VRR7oIBXCuK1so0WMzdKhjVc8WriUWs/vsz
0JXN7pardcWHIq1cJXcSbtTMM/osCLyenxgkOEACGyqnt+wm8JT3tG61FwkX
XwcUBtkQuIXHe+ThS0LYRKucyJ7AlPRjrZwTJDjScjoWmQSGWeV8Wn+BhMUM
+xA1PwK12Wqu8mUkBEYm/XLwCoEr1pcVeytIOLLCcM6MJ7BveuRdWRUJ7hxy
sYdFYIZvbQCzhgTriqP+gUkESgy9oxN5JKgMGeqdSSew/216wZpOEloPtvNS
igh8mrR0srObhMaBa+felBCYZXvcoOQ9CXUR1toqZQTuv7ezzlFAQnFyUXLO
fQL/+On1X6wJEi43RXtX1BJ428Qy3UtMQpSHvpy4nsDzwrzDNHL172P/E9On
BOq7nx58Pr/au7RP6wmPQFnprtKMpdXexOX25UYCh+ptw4OWSXBW5SY4vCCQ
F15iSv+XBEbRScsEJPDONoUFiYQEuqm6qKWFwP8AcEp2zw==
        "]]},
      Annotation[#, "Charting`Private`Tag$2513#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0, {6.892436835777738*^-17, {
       Opacity[0.8], 
       RGBColor[1, 0, 0], 
       Thickness[0.0075], 
       Dashing[{Small, Small}]}}}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 16],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{
  3.8214412775317774`*^9, 3.821441311185881*^9, {3.8214414142372613`*^9, 
   3.82144143354862*^9}, 3.8214415328969736`*^9, 3.8214416116159973`*^9, {
   3.8215181026301155`*^9, 3.8215182113360653`*^9}, 3.821518244505819*^9, {
   3.8215186384471483`*^9, 3.821518655305195*^9}, {3.8215187246257415`*^9, 
   3.821518746205914*^9}, 3.8215187885006742`*^9, {3.821541640172439*^9, 
   3.821541649489496*^9}, 3.8215418264193945`*^9, 3.8215419248453264`*^9, 
   3.8215419574052305`*^9, {3.8215421265704985`*^9, 3.821542149723608*^9}, 
   3.8215425702478256`*^9, {3.821542623242113*^9, 3.821542712736795*^9}, 
   3.8215554755925894`*^9, 3.821555526433402*^9, 3.8215555626123753`*^9, 
   3.8224684980596027`*^9, {3.823079576556179*^9, 3.823079580650011*^9}, 
   3.8231636751315575`*^9, 3.823327571966501*^9, {3.8233317118671355`*^9, 
   3.8233317163623915`*^9}, 3.82333383299719*^9, 3.8233348373171678`*^9, 
   3.8233386541702147`*^9, {3.82333868837786*^9, 3.823338725410966*^9}, 
   3.8233388477369933`*^9, 3.8233388789993486`*^9, 3.824812611988924*^9, 
   3.824812667458674*^9, {3.8308631419176607`*^9, 3.8308631520174303`*^9}, {
   3.830863182967808*^9, 3.830863272246542*^9}, {3.830863426083627*^9, 
   3.8308634428592696`*^9}, 3.8321754036332984`*^9, 3.8322422298219614`*^9, 
   3.8322424638964596`*^9, 3.8322426292819815`*^9, {3.8322429319245195`*^9, 
   3.8322429350365973`*^9}, 3.8323094664458723`*^9, {3.8323111760015836`*^9, 
   3.8323112119322386`*^9}, 3.8323124921855993`*^9, 3.8323126556227894`*^9, 
   3.832312753229306*^9, 3.8324076132262793`*^9, 3.8337014978720665`*^9, {
   3.833701541594068*^9, 3.8337015881483483`*^9}, 3.8337018462676697`*^9, 
   3.833702390575014*^9, 3.8343895380445175`*^9, {3.8343896280041695`*^9, 
   3.834389654414184*^9}, {3.8343897631404657`*^9, 3.834389794399441*^9}, {
   3.8343900133490458`*^9, 3.834390018761058*^9}, {3.834390057911209*^9, 
   3.834390115182616*^9}, {3.834392106350724*^9, 3.834392145982484*^9}, {
   3.8347314436940784`*^9, 3.8347314481930957`*^9}, 3.8398395564285717`*^9, 
   3.8503905721661425`*^9},
 CellLabel->"Out[6]=",ExpressionUUID->"5c0da6e9-ace9-4363-abc3-403e653bd3fd"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8343895640270357`*^9, 3.83438956617809*^9}, 
   3.83991683584813*^9},ExpressionUUID->"82b2f524-9958-416c-830d-\
3301e70938e8"],

Cell[BoxData[
 RowBox[{"-", "0.11219783262279924`"}]], "Output",
 CellChangeTimes->{3.8343895668096037`*^9},
 CellLabel->
  "Out[2190]=",ExpressionUUID->"8f3567e0-e935-40ee-879b-b9c74e4438e7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["f"], "Input",
 CellChangeTimes->{3.8503905798640623`*^9},
 CellLabel->"In[7]:=",ExpressionUUID->"71429bd0-41e5-40f6-9063-269edb3fcd47"],

Cell[BoxData[
 RowBox[{"1.4508656717884316`*^16", " ", "x"}]], "Output",
 CellChangeTimes->{3.850390580414074*^9},
 CellLabel->"Out[7]=",ExpressionUUID->"1fb936cf-30e6-41dc-86a9-4b9fcd91823b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SetDirectory", "[", 
  RowBox[{"FileNameJoin", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ParentDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
     "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp", " ", "=", "pressureVSmolarP"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<pressure-vs-molar.pdf\>\"", ",", "ppp"}], " ", "]"}]}], "Input",
 CellChangeTimes->{
  3.8233388128532276`*^9, {3.8233388615174503`*^9, 3.8233388723417635`*^9}, 
   3.825931448973033*^9, 3.8308633011743956`*^9},
 CellLabel->
  "In[1171]:=",ExpressionUUID->"93602577-3a4d-4d4b-bd30-9c9732ecd0ca"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Hidden Growth  - eLife\\\\Figures\\\\RawFigs\"\>"], "Output",
 CellChangeTimes->{
  3.823338885314967*^9, 3.824812622839778*^9, 3.8308633031958323`*^9, 
   3.8308634468950567`*^9, {3.83231248351583*^9, 3.8323125017834406`*^9}, 
   3.8323126690874896`*^9, 3.8323127555584283`*^9},
 CellLabel->
  "Out[1171]=",ExpressionUUID->"2d98ed51-570e-4b7b-aef5-fb9bfd037fe5"],

Cell[BoxData["\<\"pressure-vs-molar.pdf\"\>"], "Output",
 CellChangeTimes->{
  3.823338885314967*^9, 3.824812622839778*^9, 3.8308633031958323`*^9, 
   3.8308634468950567`*^9, {3.83231248351583*^9, 3.8323125017834406`*^9}, 
   3.8323126690874896`*^9, 3.832312755695161*^9},
 CellLabel->
  "Out[1173]=",ExpressionUUID->"1be67ff4-ce40-4937-8193-729ff4af9cb8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"\[Epsilon]", " ", "=", " ", "0.10"}], ";"}], 
  " "}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"pixel", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"166", ",", " ", "662"}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"180", ",", " ", "633"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"204", ",", " ", "542"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"205", ",", "475"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"255", ",", " ", "340"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"306", ",", " ", "286"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"358", ",", "207"}], "}"}]}], 
    RowBox[{"(*", 
     RowBox[{",", 
      RowBox[{"{", 
       RowBox[{"918", ",", "173"}], "}"}]}], "*)"}], "}"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"xScale", " ", "=", " ", 
   FractionBox["3.0", 
    RowBox[{"916", " ", "-", " ", "152"}]]}], ";", " ", 
  RowBox[{"yScale", " ", "=", " ", 
   FractionBox["0.14", 
    RowBox[{" ", 
     RowBox[{"45", " ", "-", "648", " "}]}]]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"xVals", " ", "=", " ", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"pixel", "[", 
       RowBox[{"[", 
        RowBox[{";;", ",", "1"}], "]"}], "]"}], " ", "-", " ", "152"}], ")"}],
     " ", "xScale"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"yVals", " ", "=", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"pixel", "[", 
        RowBox[{"[", 
         RowBox[{";;", ",", "2"}], "]"}], "]"}], " ", "-", " ", "648"}], 
      ")"}], " ", "yScale"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"strainDat", " ", "=", " ", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"xVals", ",", " ", "yVals"}], "}"}], "//", "Transpose"}]}], 
   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dat0", " ", "=", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"xVals", ",", " ", 
      FractionBox["yVals", "\[Epsilon]"]}], "}"}], "//", "Transpose"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"pfData", " ", "=", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"xVals", ",", 
       RowBox[{"1", "-", " ", 
        FractionBox["yVals", "\[Epsilon]"]}]}], "}"}], "//", "Transpose"}]}], 
   ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"dat0", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0", ",", "0"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.2", ",", 
         FractionBox["0.042006447294796294`", "\[Epsilon]"]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.4", ",", 
         FractionBox["0.07979761194836375`", "\[Epsilon]"]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.6", ",", 
         FractionBox["0.115", "\[Epsilon]"]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.8", ",", 
         FractionBox["0.135", "\[Epsilon]"]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"1", ",", 
         FractionBox["0.20", "\[Epsilon]"]}], "}"}]}], "}"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"pfData", " ", "=", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"0", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.2", ",", 
         RowBox[{"1", "-", 
          FractionBox["0.042006447294796294`", "\[Epsilon]"]}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.4", ",", 
         RowBox[{"1", "-", 
          FractionBox["0.07979761194836375`", "\[Epsilon]"]}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.6", ",", 
         RowBox[{"1", "-", 
          FractionBox["0.115", "\[Epsilon]"]}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"0.8", ",", 
         RowBox[{"1", "-", 
          FractionBox["0.135", "\[Epsilon]"]}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"1", ",", 
         RowBox[{"1", "-", 
          FractionBox["0.2", "\[Epsilon]"]}]}], "}"}]}], 
      RowBox[{"(*", 
       RowBox[{",", 
        RowBox[{"{", 
         RowBox[{"1.2", ",", 
          RowBox[{"1", "-", 
           FractionBox["0.18", "\[Epsilon]"]}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"2", ",", 
          RowBox[{"1", "-", 
           FractionBox["0.15", "\[Epsilon]"]}]}], "}"}]}], "*)"}], "}"}]}], 
    ";"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"f", " ", "=", " ", 
    RowBox[{"Fit", "[", 
     RowBox[{
      RowBox[{"dat0", "[", 
       RowBox[{"[", 
        RowBox[{";;", 
         RowBox[{"-", "2"}]}], "]"}], "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"1", ",", "x"}], "}"}], ",", " ", "x"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"fs", " ", "=", " ", 
    RowBox[{"Fit", "[", 
     RowBox[{
      RowBox[{"strainDat", "[", 
       RowBox[{"[", 
        RowBox[{";;", 
         RowBox[{"-", "2"}]}], "]"}], "]"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"1", ",", "x"}], "}"}], ",", " ", "x"}], "]"}]}], ";"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"1", " ", "-", " ", "f"}], "\[Equal]", "0"}], ",", " ", "x"}], 
    "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"pressureVSmolarP", " ", "=", " ", 
   RowBox[{"Show", "[", " ", 
    RowBox[{
     RowBox[{"ListPlot", "[", 
      RowBox[{"pfData", ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Blue", ",", " ", 
          RowBox[{"PointSize", "[", "0.025", "]"}]}], "}"}]}], ",", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}], ",", " ", 
       RowBox[{"GridLines", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{
               RowBox[{"Solve", "[", 
                RowBox[{
                 RowBox[{
                  RowBox[{"1", " ", "-", " ", "f"}], "\[Equal]", "0"}], ",", 
                 " ", "x"}], "]"}], "[", 
               RowBox[{"[", 
                RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", " ", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Opacity", "[", "0.8", "]"}], ",", "Red", ",", " ", 
                RowBox[{"Thickness", "[", "0.0075", "]"}], ",", " ", 
                "Dashed"}], "}"}]}], "}"}]}], "}"}], ",", " ", 
          RowBox[{"{", "0", "}"}]}], "}"}]}]}], "]"}], ",", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", " ", "-", " ", "f"}], ")"}], "/.", 
        RowBox[{"x", "\[Rule]", "u"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", "0", ",", "1"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", 
          RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}]}]}], "]"}], ",", 
     " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"strianVSmolarP", " ", "=", " ", 
   RowBox[{"Show", "[", " ", 
    RowBox[{
     RowBox[{"ListPlot", "[", 
      RowBox[{"strainDat", ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Blue", ",", " ", 
          RowBox[{"PointSize", "[", "0.025", "]"}]}], "}"}]}], ",", 
       RowBox[{"PlotTheme", "\[Rule]", "\"\<Scientific\>\""}], ",", " ", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{
          RowBox[{"FontFamily", "\[Rule]", "\"\<Myriad Pro\>\""}], ",", " ", 
          "Black", ",", " ", 
          RowBox[{"FontSize", "\[Rule]", "20"}]}], "]"}]}]}], "]"}], ",", " ", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"fs", "/.", 
          RowBox[{"x", "\[Rule]", "u"}]}], ",", " ", "\[Epsilon]"}], "}"}], 
       ",", 
       RowBox[{"{", 
        RowBox[{"u", ",", "0", ",", "1"}], "}"}], ",", " ", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Darker", "[", "Orange", "]"}], ",", " ", 
            RowBox[{"Thickness", "[", "0.007", "]"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Opacity", "[", "0.8", "]"}], ",", "Red", ",", " ", 
            RowBox[{"Thickness", "[", "0.0075", "]"}], ",", " ", "Dashed"}], 
           "}"}]}], "}"}]}]}], "]"}], ",", " ", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.8399168653369637`*^9, 3.839917090031808*^9}, {
  3.8399171329926615`*^9, 3.8399172538325357`*^9}, {3.8399172877959843`*^9, 
  3.839917299376096*^9}, {3.839917345184131*^9, 3.8399173477845793`*^9}, {
  3.83991738777155*^9, 3.8399174103051114`*^9}, {3.839917467452177*^9, 
  3.8399174692490473`*^9}, {3.8486617444500675`*^9, 3.848661835347146*^9}, {
  3.848661867192509*^9, 3.848661990648384*^9}},
 CellLabel->
  "In[250]:=",ExpressionUUID->"faec9551-07a9-46b4-87cf-d222b0313461"],

Cell[BoxData["0.6435250088231278`"], "Output",
 CellChangeTimes->{{3.839917077525097*^9, 3.839917090873477*^9}, 
   3.839917137255004*^9, {3.8399172488021145`*^9, 3.839917254455245*^9}, {
   3.8399172907002196`*^9, 3.8399173001350145`*^9}, 3.8399173485298324`*^9, {
   3.839917394012779*^9, 3.839917410470502*^9}, 3.8399174696097283`*^9, {
   3.8486617708461304`*^9, 3.848661778174544*^9}, {3.8486618267148795`*^9, 
   3.8486618355913057`*^9}, {3.8486619526752853`*^9, 3.8486619912632027`*^9}, 
   3.8486724500093465`*^9, 3.85003935222453*^9, 3.8500422069031677`*^9, 
   3.8500423293471155`*^9},
 CellLabel->
  "Out[260]=",ExpressionUUID->"286a390a-d2af-410a-955b-eb82f2e51f06"],

Cell[BoxData[
 GraphicsBox[{{{}, {
     {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
      "Butt"], PointBox[{{0.054973821989528805`, 1.0325041459369817`}, {
       0.10994764397905761`, 0.9651741293532339}, {0.20418848167539272`, 
       0.7538971807628524}, {0.20811518324607334`, 0.5983416252072968}, {
       0.4044502617801048, 0.2849087893864013}, {0.6047120418848169, 
       0.15953565505804312`}, {
       0.8089005235602096, -0.023880597014925398`}}]}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
       Thickness[0.007], Opacity[1.], LineBox[CompressedData["
1:eJwVkGs0lHkAh4dsKlYoakiW2C1RkoRqf7otUe1x2yGRdSlZrcvqIu1GoVJK
rZXNNSaRk0lMJ8JfKK3cQi5hxrwzTYMZr9kllw3bfnjOc56vj4FfqEugIoPB
OPCZ/+0YKHlTM+T+7QUqd9MTUzmUduuE8ZmW2E/n1WWayLE5Oy2jlLkH2p/Y
7vFr5XBq7n6cyXTDA637UW5GcrACJqtuMQPQ7lD0/G9dOQY2XtqdxIyEIafU
eaOKHDla3yckMuNQG10fXjA0hthFpd9cYaZAUUtccid/DB6edzljcjYMq6KD
t2qNQWU+9rD9ag5UvaTmMh0axs6jkrqrZdj7R9Z0tfooTrfYIG28HKRiwkJh
TIoVZRo8BQWC2jBt1mVqBE+o3U2t22uhpNk/cr56GLXBmbqe0no8VT0ia8we
wsTXO5Y+PNGA8dtFvYdSJFCcLlLXNW5EhFqmlVfEB1jN+z5xLW7CaS2P33L8
xWiKs2x5adKK0ZNtFjaH3kM/eWS6cLQN7Ocy1i5bEUYm+by35u0QZnYeSzYT
gj38rFHtegf8A30lB5dQUNO7T4tEnXBNKHzrKx3EtePcozlGXUgLPeMVWsfH
R7siUdD5bqgWfpDOxgwg0qK+TLuuB8kLhl21A/vAL66/+sbgHVItrTKWrurF
v8Gd6evO9uHcytkqzkAX1u9Unjv6rB+Reixu74tO2OcaHCtZwcPo1EySKKYd
p/WOGAoO83FmYtP2KL82mErdVboPDKJpX8Ol45lNWLZ0bFH9zCDY7tWeubqv
oETSOWsyBMjJ6+saFdfhJ8tnvYudKNjtYJrNcKpRtM8vp/ojhZq5QM3HlVxM
jOioi1OFYFyZSzdseACuq/2ClD0i2N2ct21j3cR5h/jsMrEIMbzXQcqnkonB
gGNPXvx7MNRPVTxtKiC2W+NSmBZi+FbrepX6c8nh1a3TCh1ixIxxFIUvq8hE
YxIVFvsBDgHXb9mH1pE0JZ9IFyMJrK9nTS0ubiDLeNxcxXoJPFzKi37rfk2+
+DXWzSZ8CDWWX7WkmbURRqEPh9Ichl12W5jEoZ1E3OEkadZ+7s1bLVg3O0nV
+suLNH4ege/yNTr6rV1EwzHC9IKaFCGd0abe4h7Sb9bWEVUpxaeqRO8Kkz7y
KAtGIh8ZIhMWlic5DBBvjpWG3pwMqhnK2yq8+CQm/m5s/4NR3DrBlym2DJKH
Er10tf00Us6FdwjfCcjlzHhf3kEaHqf0Q1L4AhLgIjMudqaxKqxZaa9IQFZV
Vj46wKLB9l9nlS8TkMQbXi+v+dF45ChIC2JQJMjqT/mSKBotK519ZMYUMYxb
7qCcT0OJaz70MYwic9bnvuwuoPGqmBd7/yRFemXC9vwiGokF13Q8zlIkmVXq
/V0JDfUMiVP5RYrMm7j8El9JY/XFnOLoVIr0v7mRtaCDhq2zeiSjkiJPEyb9
O97SmHOsVi2poUjKtiPr8npo1O4JuffjC4o43dtQtotHw8H6VVdtC0UqzjT/
FTtE4wf9GJt4AUVSzbbccJbS0GFuaN8ipkg4leFmQNPo1+wPFg9TZO3+EH7N
OI2AhdYZ9uMUUVLoZCdP0ljLEFtOTVFkkLst2HeGhnT69+aCWYpUBudtNJ/9
/OOfnUc9FYXktr7KxPw8jQgZPbdYWUj+A9HRkag=
        "]]},
      Annotation[#, "Charting`Private`Tag$7460#1"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0, {0.6435250088231278, {
       Opacity[0.8], 
       RGBColor[1, 0, 0], 
       Thickness[0.0075], 
       Dashing[{Small, Small}]}}}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 20],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.839917077525097*^9, 3.839917090873477*^9}, 
   3.839917137255004*^9, {3.8399172488021145`*^9, 3.839917254455245*^9}, {
   3.8399172907002196`*^9, 3.8399173001350145`*^9}, 3.8399173485298324`*^9, {
   3.839917394012779*^9, 3.839917410470502*^9}, 3.8399174696097283`*^9, {
   3.8486617708461304`*^9, 3.848661778174544*^9}, {3.8486618267148795`*^9, 
   3.8486618355913057`*^9}, {3.8486619526752853`*^9, 3.8486619912632027`*^9}, 
   3.8486724500093465`*^9, 3.85003935222453*^9, 3.8500422069031677`*^9, 
   3.8500423294421687`*^9},
 CellLabel->
  "Out[261]=",ExpressionUUID->"3c59f385-8512-48a2-8023-c25831c61f39"],

Cell[BoxData[
 GraphicsBox[{{{}, {
     {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
      "Butt"], PointBox[{{0.054973821989528805`, -0.0032504145936981758`}, {
       0.10994764397905761`, 0.003482587064676617}, {0.20418848167539272`, 
       0.024610281923714762`}, {0.20811518324607334`, 0.04016583747927032}, {
       0.4044502617801048, 0.07150912106135987}, {0.6047120418848169, 
       0.08404643449419569}, {0.8089005235602096, 0.10238805970149255`}}]}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}}, {
      {RGBColor[0, 0, 1], PointSize[0.025], AbsoluteThickness[1.6], CapForm[
       "Butt"]}, {}}}, {{}, {}}}, {{{}, {}, 
     TagBox[
      {RGBColor[
        NCache[
         Rational[2, 3], 0.6666666666666666], 0.33333333333333337`, 0], 
       Thickness[0.007], Opacity[1.], LineBox[CompressedData["
1:eJwVxX08lAcAB3Ckecv7VFeos6whI2+9kJ8lKVJDSutIcpRqIxKN6upOQqMy
L+Hylpi85C1x3HHP2CQSuV6uoyOdt3v0ycuo0fbH9/Ol+v/iQZeTkZFx+8//
u9Al3bwRL/uIsEGjzVoXuPKOq0L6KVYQ1gck3xLGcC3vpGdVUXZgu9zwjLQw
huv6RFCZTdkP9RsS/l3bGO7BgNnGm5QAFJVN+GjTo7lvzK46XqeE49XI7A3p
w/PcHJ19sfEUJuz9ls0X+JzjMhSr1l+jpEDRzbpdsziE630ot3zyQwHS96Z9
ps45cFUWGTRn/XJEu/pInCWBMHSXSvgJ1YjmlLg78CNxrnML0qceQSZObeJG
xhWsqNYUycpyIW3rW7rxQDxqxY4dXXYtMLi17FVGdzJagrNXHxonsLwgy1Yj
KAXT325TLz3dBuqlcOc3TWmQmyvRWG3YDt+TSvpC30zYLPrVepZ1oJI6zN7Y
zEYH06qz1bgLEuFKHXulXKxJHpsrlj7FTXM9h8/P8zA22y96bv4MrSeceO+u
FKBgtKFd7bcepBh3GEq8CqGmd48cGurFTlq8Bn1NERJP1ATmrOsDK+zUj6rt
xZhxKBk6flEAmlbp2c70EoRbENXL+S/ATdWcrN9Viv4yIqGb+goNeb37eLrl
+BTcm2l0/jU6k4JWrQ2vgMkPCguBDULIN0c8POvyAM551KAHK0T4ysa6TWBR
iXN6Rwze0vrRmc1idKlUYcO4l4rAbQDKTaEXmANV0FafVCTmB6BloCp1aquG
PDez/JustxiI3KqYza7BSauGl0quYkRqr/hdJq4WJbv9c5pmxIgNTAqgnn6I
6bFVGsOpg/C+nyESbK9DjafzkpQdQ5ix9nx82/gRLu5i3akeHgKtku3/Ua4e
1DcuL/JZ72DxnmWnJKjH1k3MFIrFMPqO6F4zaWwATb9rTrZnGPaPd1wavMXB
dPt1cQjjPcLP647ei25EurxvuMc6CUJ0YxdkDzRBW1STJ0dIIIpI8KKYcLE0
hrF/S+gIEpVzkvSVeJAp9i0Xa41imSd/96dwHs7cLr+u1TKKsG3220QjPDSa
xClq/jwGbXmFZ3dozdB0ObPhsto4dIiVdvfbmiE0fdoTxRnHguHl/ibbFlSw
sW7IdwIuDCtv3aIW+JTbaOotTKCrzuqMtxYfl1i5DOEfUmy9mfjnbRYfpRK9
TLU9JBTpptL1H/iIy2b5ifaSIP+CieJHPgI8JgzL3EkINngcl0zxocvhVLgd
JHFvKkJc9A8f8UmHWxP9Sexk8vqMZAgct8n4oBxFgpXvyTVRJ2DA/HqXQiEJ
WXFUspkpgYXN0aqCIhIjTolP1M0IvJwYfFZYQuJpMVt50pxA8sEqn50PSOSE
8pkVVgQWjT3CWBwSkFWN2mhHQNidxF7SQyJmbc5RS1cCdbGzx3qek6AzK9na
bgRSbI8Y5b8g4SYhXn/cS8D17vfV20UkdCtGvKo9CNRHPvmbMUKCA0sX658I
pJpaJ7mPkyjId7qqQyMQKs7aTyVJJCh4E9M+BL7bc6qfN0XicFe0fe1RAvKy
vQXJsyQcLZN+TT1GYKDGNthvnoRJWm5dBJ0AJzjfzPxfEtqfqqYPBBFIW6My
vbhIYt631WLTCQJfAB2pZVg=
        "]]},
      Annotation[#, "Charting`Private`Tag$7546#1"]& ], 
     TagBox[
      {RGBColor[1, 0, 0], Thickness[0.0075], Opacity[0.8], 
       Dashing[{Small, Small}], LineBox[CompressedData["
1:eJxTTMoPSmViYGAwAWIQ7ZX64uKBl6F2s2aCwE77BaL+bV2SLfYwfiPHZvVO
ySlwfkTkwvUfPi6B87n/N8a4y62H81UD37043L0Fzi8/Z2k/48tOOF98i+A9
Rsb9cP62R85nztscgvMPZc2VjnxzBM7/qmbLvzb3OJzP9HO1gLTqKTjf7H/C
tuB1Z+D8My0m545pnYfz5Se8/rny3QU4//X3+/euGlyC85e82n2Kr+8ynM8n
u/z9kydX4PyezK1pC1SuwfnfHFY/yai/DueXGB3ZInb4Bpx/f92R7ouKt+D8
31lXZmtW3YbztR3Z/6XtvgPnuy9STN8ofg8RXrLxSg9j7sP5Om9Cua/7PoDz
hfk/cBz5heCz7J+9XnnOQzg/22T3TU7vR3D+as+kBfu+IfhfX0sJPJv2GM7f
GuzOPMXlCZxf79E6f8szBF/xrteNxa1P4Xwr85YpkkbP4PwYufM/GS8j+F9P
9T4qaHwO589giSsJUnmBcP+9rYuYjiD4rLWNIZaFL+F8hpVx6x8JvYLzi2at
7xU6hODv1e7gEMx7DecLehXpNPG9gfPv6F64XLkHwd8wz17lSdxbOD92vZmg
7D8Ev6F1YeOdVe/g/LUvZGfz+byH85VaRDzYlyH40+W5v/7/j+ADAFIywQc=

        "]]},
      Annotation[#, "Charting`Private`Tag$7546#2"]& ]}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->{False, False},
  AxesLabel->{None, None},
  AxesOrigin->{0, 0},
  DisplayFunction->Identity,
  Frame->{{True, True}, {True, True}},
  FrameLabel->{{None, None}, {None, None}},
  FrameStyle->Automatic,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLines->{{0}, {0}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  LabelStyle->Directive[FontFamily -> "Myriad Pro", 
    GrayLevel[0], FontSize -> 20],
  Method->{
   "OptimizePlotMarkers" -> True, 
    "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
        (Identity[#]& )[
         Part[#, 1]], 
        (Identity[#]& )[
         Part[#, 2]]}& )}},
  PlotRange->All,
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.02], 
     Scaled[0.02]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{{3.839917077525097*^9, 3.839917090873477*^9}, 
   3.839917137255004*^9, {3.8399172488021145`*^9, 3.839917254455245*^9}, {
   3.8399172907002196`*^9, 3.8399173001350145`*^9}, 3.8399173485298324`*^9, {
   3.839917394012779*^9, 3.839917410470502*^9}, 3.8399174696097283`*^9, {
   3.8486617708461304`*^9, 3.848661778174544*^9}, {3.8486618267148795`*^9, 
   3.8486618355913057`*^9}, {3.8486619526752853`*^9, 3.8486619912632027`*^9}, 
   3.8486724500093465`*^9, 3.85003935222453*^9, 3.8500422069031677`*^9, 
   3.850042329527912*^9},
 CellLabel->
  "Out[262]=",ExpressionUUID->"022fa462-5693-4dff-9377-72ac9c1bfab0"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Fit", "[", "strainDat"}]], "Input",
 CellChangeTimes->{{3.850042209528301*^9, 3.8500422422620735`*^9}, 
   3.850042334118121*^9, {3.8500423665207834`*^9, 
   3.8500423671906404`*^9}},ExpressionUUID->"5b8f66f0-5faa-4be3-8b2b-\
6eede799a266"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"0.054973821989528805`", ",", 
     RowBox[{"-", "0.0032504145936981758`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.10994764397905761`", ",", "0.003482587064676617`"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.20418848167539272`", ",", "0.024610281923714762`"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"0.20811518324607334`", ",", "0.04016583747927032`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.4044502617801048`", ",", "0.07150912106135987`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.6047120418848169`", ",", "0.08404643449419569`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.8089005235602096`", ",", "0.10238805970149255`"}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.850042233988604*^9, 3.8500423344475393`*^9},
 CellLabel->
  "Out[263]=",ExpressionUUID->"9a771218-2160-4dbc-919d-944ec3d95b09"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SetDirectory", "[", 
  RowBox[{"FileNameJoin", "[", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"ParentDirectory", "[", 
      RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ",", " ", 
     "\"\<Figures\>\"", ",", " ", "\"\<RawFigs\>\""}], "}"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp1", " ", "=", "pressureVSmolarP"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ppp2", " ", "=", "strianVSmolarP"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<pressure-vs-molar.pdf\>\"", ",", "ppp1"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"Export", "[", 
  RowBox[{"\"\<strain-vs-molar.pdf\>\"", ",", "ppp2"}], "]"}]}], "Input",
 CellChangeTimes->{{3.848662022864134*^9, 3.8486620443433228`*^9}, 
   3.848672448634054*^9},
 CellLabel->"In[14]:=",ExpressionUUID->"02ad56e5-08c9-492a-9c17-e5873b64169d"],

Cell[BoxData["\<\"D:\\\\Dropbox (Harvard University)\\\\Arxiv \
Projects\\\\Stored Growth\\\\Figures\\\\RawFigs\"\>"], "Output",
 CellChangeTimes->{3.839917434732854*^9, 3.8399174724641957`*^9, 
  3.848662045498759*^9, 3.8486724522132015`*^9},
 CellLabel->"Out[14]=",ExpressionUUID->"f02daacf-7188-4895-828c-7794fb44cf91"],

Cell[BoxData["\<\"pressure-vs-molar.pdf\"\>"], "Output",
 CellChangeTimes->{3.839917434732854*^9, 3.8399174724641957`*^9, 
  3.848662045498759*^9, 3.8486724524801035`*^9},
 CellLabel->"Out[17]=",ExpressionUUID->"bcf85c31-b4a5-46af-9219-de9de8cb3c3a"],

Cell[BoxData["\<\"strain-vs-molar.pdf\"\>"], "Output",
 CellChangeTimes->{3.839917434732854*^9, 3.8399174724641957`*^9, 
  3.848662045498759*^9, 3.848672452633301*^9},
 CellLabel->"Out[18]=",ExpressionUUID->"06de1eb2-5fc7-43fb-8583-0e693b5793d4"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"dat0", " "}]], "Input",
 CellChangeTimes->{3.8500393638747473`*^9},
 CellLabel->
  "In[572]:=",ExpressionUUID->"88f296e0-e240-40e3-a837-86a7aca8c0b7"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.8500393681570764`*^9, 
  3.8500393681651382`*^9}},ExpressionUUID->"48f0993c-1efd-4151-8229-\
89a6c32c8243"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"0.14", "  ", "c"}], " ", "\[Equal]", " ", "0.074"}], ",", " ", 
   "c"}], "]"}]], "Input",
 CellChangeTimes->{{3.850386276656054*^9, 3.8503863129231887`*^9}},
 CellLabel->
  "In[391]:=",ExpressionUUID->"c9dfb8ae-674f-4f83-9ce0-723feea4dcaf"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"c", "\[Rule]", "0.5285714285714285`"}], "}"}], "}"}]], "Output",
 CellChangeTimes->{3.85038631313144*^9},
 CellLabel->
  "Out[391]=",ExpressionUUID->"68fdd1e9-438a-4b89-a9cd-763c597c2152"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"dat", "=", " ", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"0", ",", "0"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0.2", ",", "0.042006447294796294`"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0.4", ",", "0.07979761194836375`"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0.6", ",", "0.115"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0.8", ",", "0.135"}], "}"}]}], 
   RowBox[{"(*", 
    RowBox[{",", 
     RowBox[{"{", 
      RowBox[{"1", ",", "0.20"}], "}"}]}], "*)"}], 
   "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"Fit", "[", 
  RowBox[{"dat", ",", " ", "x", ",", "x"}], "]"}]}], "Input",
 CellChangeTimes->{{3.850390634645524*^9, 3.8503906664728503`*^9}},
 CellLabel->"In[10]:=",ExpressionUUID->"a444f151-434e-4359-a263-4c2db4f0b282"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"0", ",", "0"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.2`", ",", "0.042006447294796294`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.4`", ",", "0.07979761194836375`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.6`", ",", "0.115`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.8`", ",", "0.135`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.850390659830681*^9, 3.8503906671195784`*^9}},
 CellLabel->"Out[10]=",ExpressionUUID->"bafab9ee-d8ac-484c-a364-1d0a5b50e036"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"0.18110027853192065`", " ", "x"}], " ", "\[Equal]", " ", "0.1"}]], \
"Input",
 CellChangeTimes->{{3.8503906730622463`*^9, 
  3.8503906748447328`*^9}},ExpressionUUID->"beb54fd2-7602-440c-a11b-\
a822a8155269"]
}, Open  ]]
},
WindowSize->{1264, 661},
WindowMargins->{{-8, Automatic}, {Automatic, 0}},
Magnification:>1.7 Inherited,
FrontEndVersion->"12.0 for Microsoft Windows (64-bit) (April 8, 2019)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 1706, 27, 819, "Chapter",ExpressionUUID->"e4dea3ec-a0e8-4e87-95fe-c08a746bdb7f"],
Cell[2289, 51, 2460, 61, 314, "Input",ExpressionUUID->"2d76db84-8a14-49dc-9c1e-b7796f79bf10"],
Cell[4752, 114, 261, 7, 49, "Input",ExpressionUUID->"799adc5f-740e-4658-9c15-0c790e68377c"],
Cell[5016, 123, 7056, 200, 1166, "Input",ExpressionUUID->"a2813d02-26c2-4186-9a88-46ddd755402e"],
Cell[12075, 325, 971, 27, 100, "Input",ExpressionUUID->"cf09afe9-ada4-4a60-b685-358eb49441fd"],
Cell[CellGroupData[{
Cell[13071, 356, 1795, 42, 380, "Input",ExpressionUUID->"f8516072-ef6a-48e9-94c7-b67602b65007"],
Cell[14869, 400, 1583, 33, 76, "Output",ExpressionUUID->"23d1cf1d-4715-4f24-ae3c-4a107d39d917"],
Cell[16455, 435, 1926, 46, 82, "Output",ExpressionUUID->"d69b8bc7-9099-420f-bce9-98969fb91470"]
}, Open  ]],
Cell[CellGroupData[{
Cell[18418, 486, 1675, 44, 281, "Input",ExpressionUUID->"669800b0-468a-4a4f-8bb9-6c474b108449"],
Cell[20096, 532, 1369, 30, 55, "Output",ExpressionUUID->"c12471c8-fa30-4501-934e-96fe28e4be75"]
}, Open  ]],
Cell[CellGroupData[{
Cell[21502, 567, 4910, 115, 741, "Input",ExpressionUUID->"06aa422f-4de6-4740-b259-59fa55acc395"],
Cell[26415, 684, 1115, 21, 55, "Output",ExpressionUUID->"e3fe19e7-1837-4eb4-b2e6-0b24f324b6ba"],
Cell[27533, 707, 1168, 23, 55, "Output",ExpressionUUID->"4ce29b55-9721-4ad6-8aef-6fd1387b0181"]
}, Open  ]],
Cell[CellGroupData[{
Cell[28738, 735, 3746, 93, 323, "Input",ExpressionUUID->"cf05fbdf-0e43-4c87-a48f-60a31d4a275e"],
Cell[32487, 830, 788, 21, 88, "Output",ExpressionUUID->"80c25c73-1027-4ded-869a-fc8ee02d9c66"],
Cell[33278, 853, 1110, 30, 89, "Output",ExpressionUUID->"761eae84-5388-4fbb-b7a7-cc950048760e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[34425, 888, 5109, 130, 874, "Input",ExpressionUUID->"bb589017-69f8-4420-8085-7789f2d46517"],
Cell[39537, 1020, 1179, 25, 81, "Output",ExpressionUUID->"73a5c8c8-e393-4943-9add-302571e4a333"],
Cell[40719, 1047, 1668, 41, 77, "Output",ExpressionUUID->"5ea40056-f9e9-4ae2-aca5-9d4de8b25faa"],
Cell[42390, 1090, 1307, 31, 76, "Output",ExpressionUUID->"bdfd1cad-6e94-4f73-ab7c-1d31fd965c73"]
}, Open  ]],
Cell[CellGroupData[{
Cell[43734, 1126, 5077, 135, 907, "Input",ExpressionUUID->"c520c9a6-053f-4227-8c83-76f30ffffad5"],
Cell[48814, 1263, 4422, 120, 221, "Output",ExpressionUUID->"7ddecddd-935e-4bd0-9fb7-a908d63a74f7"],
Cell[53239, 1385, 2231, 62, 122, "Output",ExpressionUUID->"c50c7dcc-1f0c-4308-b892-c85728837b31"]
}, Open  ]],
Cell[CellGroupData[{
Cell[55507, 1452, 6692, 185, 446, "Input",ExpressionUUID->"9d28e6bc-7038-45b7-b65f-bf883fa79f6b"],
Cell[62202, 1639, 6015, 168, 267, "Output",ExpressionUUID->"de238f4a-b016-45d3-8240-95045dc1147d"],
Cell[68220, 1809, 2969, 87, 166, "Output",ExpressionUUID->"5efb61a5-5e05-4e96-835e-1e1a8e98d3f0"]
}, Open  ]],
Cell[CellGroupData[{
Cell[71226, 1901, 10557, 276, 658, "Input",ExpressionUUID->"51a1284d-46bc-495d-81bc-5a2c8d7a26d1"],
Cell[81786, 2179, 3928, 102, 155, "Output",ExpressionUUID->"58670d15-58c9-4343-9b2c-6a3fbaae7e6c"],
Cell[85717, 2283, 5708, 142, 165, "Output",ExpressionUUID->"4b6f66a0-b168-4e7e-966a-ecc51cecc324"]
}, Open  ]],
Cell[91440, 2428, 442, 12, 49, "Input",ExpressionUUID->"edc4ef73-d8be-42dc-aa87-29d53f5c5786"],
Cell[CellGroupData[{
Cell[91907, 2444, 1052, 24, 116, "Input",ExpressionUUID->"31534546-ff87-43c8-992f-c3e9731c58e0"],
Cell[92962, 2470, 1310, 38, 89, "Output",ExpressionUUID->"303ed56f-37d9-452f-8910-5ac3fa763135"],
Cell[94275, 2510, 1204, 35, 89, "Output",ExpressionUUID->"9173053f-fb7a-4966-9673-89d80482881c"]
}, Open  ]],
Cell[95494, 2548, 5907, 150, 609, "Input",ExpressionUUID->"c5bbbead-f7ee-4834-90f6-83aefb80d9ee"],
Cell[CellGroupData[{
Cell[101426, 2702, 252, 5, 77, "Input",ExpressionUUID->"b97ea138-4e20-4432-8b6b-1c97cf272624"],
Cell[101681, 2709, 192, 2, 55, "Output",ExpressionUUID->"81b8e3c6-5727-4a0f-8308-53e32aeaa2b8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[101910, 2716, 323, 9, 77, "Input",ExpressionUUID->"4752d191-64d1-43cd-b1af-5d8fd6613318"],
Cell[102236, 2727, 172, 3, 55, "Output",ExpressionUUID->"8f046538-266c-4a73-9290-362324cad048"]
}, Open  ]],
Cell[102423, 2733, 394, 9, 704, "Input",ExpressionUUID->"2b519a13-4c37-4275-be5c-acd0a7070dd5"],
Cell[CellGroupData[{
Cell[102842, 2746, 55735, 1353, 7891, "Input",ExpressionUUID->"1d4e648c-ec89-4973-bd48-400588ed9ecb"],
Cell[158580, 4101, 580, 12, 55, "Output",ExpressionUUID->"02ed3eb5-05a7-4013-bff7-984f45abc5d4"],
Cell[159163, 4115, 34868, 626, 364, "Output",ExpressionUUID->"8af4a428-5b06-4d09-a6ae-7d344e3dc700"]
}, Open  ]],
Cell[194046, 4744, 156, 3, 49, "Input",ExpressionUUID->"d71728b0-bb6d-4bc2-be67-513f59f1b88e"],
Cell[194205, 4749, 941, 22, 149, "Input",ExpressionUUID->"3f2b79dd-3de0-4045-97ee-3c86bbb8eb40"],
Cell[CellGroupData[{
Cell[195171, 4775, 36986, 768, 1668, "Input",ExpressionUUID->"9dff07f3-639c-4862-9575-ec0e8d7e0be0"],
Cell[232160, 5545, 64119, 1147, 364, "Output",ExpressionUUID->"0a87a99a-c8e3-4c16-9dd1-a7c1d1db9e99"],
Cell[296282, 6694, 61447, 1099, 364, "Output",ExpressionUUID->"5742a91c-1dc2-4895-9612-bf8249a9c10b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[357766, 7798, 376, 8, 49, "Input",ExpressionUUID->"8248035c-5929-4130-b8cd-e8f61942e189"],
Cell[358145, 7808, 10573, 233, 411, "Output",ExpressionUUID->"ac92b7c2-f2ae-4b31-be7c-835bec9e085b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[368755, 8046, 158, 2, 83, "Input",ExpressionUUID->"6b3d7f97-d581-46a4-8d2c-7c740eb59c92"],
Cell[368916, 8050, 212, 4, 55, "Output",ExpressionUUID->"b2992d1c-b081-4cb1-a7d1-ff3280c754bb"],
Cell[369131, 8056, 212, 4, 55, "Output",ExpressionUUID->"0bdc7874-0708-42e5-9a5e-cb97124b70d2"]
}, Open  ]],
Cell[CellGroupData[{
Cell[369380, 8065, 226, 3, 83, "Input",ExpressionUUID->"9f11f0c1-037b-4a83-b4e0-df7f45183927"],
Cell[369609, 8070, 311, 6, 55, "Output",ExpressionUUID->"8fac3359-67f7-40fc-be8f-35c58849962a"],
Cell[369923, 8078, 312, 6, 55, "Output",ExpressionUUID->"13f130a7-75a7-4c6d-91a0-6b6bed69e362"]
}, Open  ]],
Cell[CellGroupData[{
Cell[370272, 8089, 3403, 76, 164, "Input",ExpressionUUID->"5c14ce12-714e-4b5c-94be-87f87f62cc22"],
Cell[373678, 8167, 4783, 100, 472, "Output",ExpressionUUID->"b72427b6-323e-449f-b39f-810faf74c5b0"]
}, Open  ]],
Cell[378476, 8270, 261, 6, 49, "Input",ExpressionUUID->"65cef1b0-04c9-4c56-8f03-6f2faefe219e"],
Cell[378740, 8278, 153, 3, 49, "Input",ExpressionUUID->"9cdf8200-4fe2-4d57-a117-df0056f7d636"],
Cell[CellGroupData[{
Cell[378918, 8285, 1197, 23, 116, "Input",ExpressionUUID->"60d86a94-28d6-4a53-a6f4-d7de3595b064"],
Cell[380118, 8310, 801, 12, 55, "Output",ExpressionUUID->"8fe2f564-7fe9-41be-b25c-b44077b2d455"],
Cell[380922, 8324, 24562, 437, 445, "Output",ExpressionUUID->"f8f698e6-aa5f-409a-9180-183c3030747e"],
Cell[405487, 8763, 730, 11, 55, "Output",ExpressionUUID->"916ae562-1a2e-46f3-a06b-65ca176f5b80"]
}, Open  ]],
Cell[CellGroupData[{
Cell[406254, 8779, 678, 15, 149, "Input",ExpressionUUID->"c5790694-c03c-4fb9-8ca3-019766b390d1"],
Cell[406935, 8796, 277, 4, 55, "Output",ExpressionUUID->"fea62175-5793-4cf6-9583-80759ce5ed27"],
Cell[407215, 8802, 33532, 646, 414, "Output",ExpressionUUID->"4b606b8e-96fb-41b5-9be6-599fd2bf63ab"],
Cell[440750, 9450, 210, 3, 55, "Output",ExpressionUUID->"c9d44fea-a58b-4c20-8404-acbb8482bcf3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[440997, 9458, 1628, 30, 182, "Input",ExpressionUUID->"0bda899b-c495-4b1a-a1d7-1df95c8b7325"],
Cell[442628, 9490, 981, 14, 55, "Output",ExpressionUUID->"d68886d1-afe6-473e-8387-594cb4a1b6ab"],
Cell[443612, 9506, 17520, 366, 411, "Output",ExpressionUUID->"4b4af4a8-a302-4d8e-b379-6c1e7d2afd92"],
Cell[461135, 9874, 18166, 381, 414, "Output",ExpressionUUID->"ecbf3146-c456-4fa7-9ad2-4443051ce532"],
Cell[479304, 10257, 908, 13, 55, "Output",ExpressionUUID->"08ee6127-8377-4a26-9f04-9f7ea7f92fcb"],
Cell[480215, 10272, 909, 13, 55, "Output",ExpressionUUID->"7106f278-7d42-4c9e-891f-b404599fd96b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[481161, 10290, 2236, 51, 281, "Input",ExpressionUUID->"7e23fa53-1bb4-4541-81a6-e90537d99c14"],
Cell[483400, 10343, 316, 5, 55, "Output",ExpressionUUID->"0b76d45f-c513-405b-96d9-dfab5398efe5"],
Cell[483719, 10350, 239, 4, 55, "Output",ExpressionUUID->"c8f09f97-7c6c-40fb-a461-cbfc63ab0760"],
Cell[483961, 10356, 236, 4, 55, "Output",ExpressionUUID->"5d570fcc-7be3-4aca-bb57-a50797e4ac22"]
}, Open  ]],
Cell[CellGroupData[{
Cell[484234, 10365, 7346, 158, 908, "Input",ExpressionUUID->"0b39067f-b84b-4511-8116-c2e40d108680"],
Cell[491583, 10525, 68380, 1253, 364, "Output",ExpressionUUID->"ab73f5ae-51e9-4136-8ec9-1fb9732fa90d"],
Cell[559966, 11780, 66021, 1214, 364, "Output",ExpressionUUID->"ad44d07c-7987-48fc-9742-dbd0ea3b5cfc"]
}, Open  ]],
Cell[626002, 12997, 2058, 53, 182, "Input",ExpressionUUID->"252dd3f5-bd7a-431a-9f8c-2149a91dc803"],
Cell[628063, 13052, 207, 4, 49, "Input",ExpressionUUID->"07a4982c-395e-4dd2-a22c-04f995a26c96"],
Cell[628273, 13058, 181, 3, 49, "Input",ExpressionUUID->"bff3a31e-6192-425d-8ffc-0eafab9427db"],
Cell[628457, 13063, 156, 3, 49, "Input",ExpressionUUID->"0b3f2afa-771e-41a8-9344-84229373a9e0"],
Cell[628616, 13068, 487, 9, 525, "Input",ExpressionUUID->"d2a0a857-43ca-4de7-974e-74d3faf9ac34"],
Cell[CellGroupData[{
Cell[629128, 13081, 29271, 674, 4331, "Input",ExpressionUUID->"e5d49d2f-bb51-489d-aaeb-c5aff40e1517"],
Cell[658402, 13757, 24731, 438, 364, "Output",ExpressionUUID->"804252fb-51e6-486b-8d45-25f5fe94e86b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[683170, 14200, 129930, 2899, 7000, "Input",ExpressionUUID->"26416945-e5d0-46e7-b17f-83b88191f1f5"],
Cell[813103, 17101, 1821, 25, 55, "Output",ExpressionUUID->"a3551daf-68e4-4e66-a78a-c67c33ad7a9e"],
Cell[814927, 17128, 2016, 32, 55, "Output",ExpressionUUID->"f36e11bd-0034-4993-8be1-15dd8dfe3eb9"],
Cell[816946, 17162, 60284, 1116, 364, "Output",ExpressionUUID->"c84f8503-e74b-4c04-8d9c-de67675726c2"],
Cell[877233, 18280, 50875, 960, 364, "Output",ExpressionUUID->"a82394cd-1385-4788-be80-35af26a85aa4"]
}, Open  ]],
Cell[CellGroupData[{
Cell[928145, 19245, 1266, 29, 116, "Input",ExpressionUUID->"8bbabab4-acf7-4f1f-a836-dadb8682f893"],
Cell[929414, 19276, 13390, 290, 308, "Output",ExpressionUUID->"aa1950f9-4bbd-4080-a99a-817efc8d7798"],
Cell[942807, 19568, 13249, 288, 317, "Output",ExpressionUUID->"38e65ef2-622d-4d56-b368-7f4679976e45"],
Cell[956059, 19858, 11936, 258, 308, "Output",ExpressionUUID->"47d2b44f-2ec4-4bb9-9588-fa63eab0a86e"]
}, Open  ]],
Cell[968010, 20119, 156, 3, 49, "Input",ExpressionUUID->"2b984e92-3729-4465-972c-62fe4b47b220"],
Cell[968169, 20124, 156, 3, 49, "Input",ExpressionUUID->"0b15ca5a-35b5-467e-93be-e8bbe9ae0609"],
Cell[CellGroupData[{
Cell[968350, 20131, 1621, 36, 182, "Input",ExpressionUUID->"4056a179-af27-4b64-8800-b7baa22f0ab7"],
Cell[969974, 20169, 24738, 487, 405, "Output",ExpressionUUID->"cca8faa9-f33d-4f78-8142-17cce24763e8"],
Cell[994715, 20658, 357, 5, 55, "Output",ExpressionUUID->"17102ede-d534-48a7-8c06-51003778f5e1"]
}, Open  ]],
Cell[995087, 20666, 205, 4, 49, "Input",ExpressionUUID->"c60b012e-b949-447f-a09a-aa60082796e5"],
Cell[CellGroupData[{
Cell[995317, 20674, 3971, 94, 479, "Input",ExpressionUUID->"fd71ee19-37e7-4c7f-8cfc-916909498f8e"],
Cell[999291, 20770, 20135, 408, 405, "Output",ExpressionUUID->"9a9327a0-a9ae-4de8-97c8-9a2b45e33671"],
Cell[1019429, 21180, 21479, 437, 405, "Output",ExpressionUUID->"94af6dcf-0f29-471e-b27f-d14e513842fe"],
Cell[1040911, 21619, 20140, 406, 423, "Output",ExpressionUUID->"bbce8653-92c4-4815-b5a8-b1f3978ee28b"],
Cell[1061054, 22027, 822, 12, 55, "Output",ExpressionUUID->"571ccf8b-4a62-4c86-a23e-d33fd306d7b0"],
Cell[1061879, 22041, 825, 12, 55, "Output",ExpressionUUID->"231e3e80-f7d4-4742-877e-5c6d5b3d3f29"],
Cell[1062707, 22055, 818, 12, 55, "Output",ExpressionUUID->"c301b3e7-c8c4-4a02-a7ba-295a175ca671"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1063562, 22072, 177, 2, 49, "Input",ExpressionUUID->"ff5b49b5-2064-4279-9743-19542cb3f31b"],
Cell[1063742, 22076, 171, 2, 55, "Output",ExpressionUUID->"a3273760-3786-4dfa-a921-f9a77c5f11ef"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1063950, 22083, 1693, 40, 248, "Input",ExpressionUUID->"3449f853-4895-418b-be53-374a4bb7f016"],
Cell[1065646, 22125, 26021, 506, 414, "Output",ExpressionUUID->"b72a04b2-256e-42ac-a6a2-c427bddac9d3"],
Cell[1091670, 22633, 438, 7, 55, "Output",ExpressionUUID->"932b53c1-3e4b-46b7-8f02-ff97ce71f9fe"]
}, Open  ]],
Cell[1092123, 22643, 128, 3, 49, "Input",ExpressionUUID->"195e7b56-6bc5-40f9-9dd1-cae42efac5a3"],
Cell[CellGroupData[{
Cell[1092276, 22650, 5724, 144, 809, "Input",ExpressionUUID->"4f7701de-ef74-4ce8-ad9d-b848ac09f5d3"],
Cell[1098003, 22796, 7501, 147, 397, "Output",ExpressionUUID->"27a24c3b-e99e-4d2f-bfdc-c53087198a7d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1105541, 22948, 273, 5, 49, "Input",ExpressionUUID->"4a37f6fd-46d8-401e-bc58-e1d11cf6c786"],
Cell[1105817, 22955, 274, 6, 55, "Output",ExpressionUUID->"d9658391-71cd-4f48-8c14-081a953f0af7"]
}, Open  ]],
Cell[1106106, 22964, 154, 3, 49, "Input",ExpressionUUID->"61ffd870-930e-4f56-bf78-ee53c619872c"],
Cell[CellGroupData[{
Cell[1106285, 22971, 2460, 50, 248, "Input",ExpressionUUID->"e48b7e25-8ab4-4f34-8678-6580533fbf1a"],
Cell[1108748, 23023, 312, 5, 55, "Output",ExpressionUUID->"75d73031-d489-42e9-b777-5aab0016a845"],
Cell[1109063, 23030, 233, 4, 55, "Output",ExpressionUUID->"3b62fbdc-0874-4872-a15e-643d5746ac80"],
Cell[1109299, 23036, 237, 4, 55, "Output",ExpressionUUID->"0519f32f-e387-41ec-b7bf-833896d98559"],
Cell[1109539, 23042, 237, 4, 55, "Output",ExpressionUUID->"c452bd3c-9d79-4ffd-b901-4db8efe2b150"],
Cell[1109779, 23048, 235, 4, 55, "Output",ExpressionUUID->"6beadc26-a7e3-4af4-a56c-2242f2073692"],
Cell[1110017, 23054, 236, 4, 55, "Output",ExpressionUUID->"9cfc4ed2-b506-4565-a7c2-6c85a3a86b16"]
}, Open  ]],
Cell[1110268, 23061, 214, 5, 49, "Input",ExpressionUUID->"1d3d7efe-33ab-4672-8e31-97cee8a6b22c"],
Cell[CellGroupData[{
Cell[1110507, 23070, 39266, 899, 3878, "Input",ExpressionUUID->"c53d76f3-b1b8-4f0c-95c8-522c2389869e"],
Cell[1149776, 23971, 159719, 2629, 408, "Output",ExpressionUUID->"4eeede56-5405-453d-8180-6aae06a86d8a"],
Cell[1309498, 26602, 494, 10, 72, "Message",ExpressionUUID->"1dc40e73-13be-467b-8daf-248d60d18b77"],
Cell[1309995, 26614, 26549, 495, 414, "Output",ExpressionUUID->"7c8e97fe-2eb4-4f38-8769-33c5759fffca"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1336581, 27114, 396, 9, 49, "Input",ExpressionUUID->"9d769bd5-e0bb-48a8-ab77-54ba47452e61"],
Cell[1336980, 27125, 12287, 269, 158, "Output",ExpressionUUID->"fc9e2676-21e9-4cbc-b54a-dd86bc5f0a46"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1349304, 27399, 794, 18, 149, "Input",ExpressionUUID->"81b4fa47-2508-46a8-89a1-aa0d90a0e033"],
Cell[1350101, 27419, 22032, 436, 414, "Output",ExpressionUUID->"caae2e36-fc83-4218-a874-defe1db653e0"],
Cell[1372136, 27857, 226, 4, 55, "Output",ExpressionUUID->"09ce942f-5ae4-4b7f-9398-3546c570946e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1372399, 27866, 971, 21, 182, "Input",ExpressionUUID->"6060a1e6-ff51-4abb-80ce-b45b42fa6358"],
Cell[1373373, 27889, 21811, 427, 414, "Output",ExpressionUUID->"f1fceef3-bd6a-4abd-a9ba-6835afb4de6f"],
Cell[1395187, 28318, 418, 6, 55, "Output",ExpressionUUID->"514f101e-5593-4a14-90e2-3f99d251d3af"]
}, Open  ]],
Cell[1395620, 28327, 315, 6, 184, "Input",ExpressionUUID->"7f1fe133-f7f8-4d8a-b69e-5e7ed52d96e5"],
Cell[CellGroupData[{
Cell[1395960, 28337, 13539, 309, 1439, "Input",ExpressionUUID->"3a729a4f-da0e-46a4-a9ad-6ae71069ee01"],
Cell[1409502, 28648, 3887, 72, 404, "Output",ExpressionUUID->"7042ae95-9808-413a-8cf6-1e279bc77a90"],
Cell[1413392, 28722, 10238, 185, 404, "Output",ExpressionUUID->"8ba3b59e-b06c-49b1-88d2-83b061373214"],
Cell[1423633, 28909, 13748, 283, 414, "Output",ExpressionUUID->"7aec153a-53b7-4adf-9096-21c7e64bfa0e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1437418, 29197, 180, 4, 49, "Input",ExpressionUUID->"a84edb48-80c3-4e4e-a269-038b8ff9543c"],
Cell[1437601, 29203, 180, 3, 55, "Output",ExpressionUUID->"ce355c50-1016-4862-91c7-29747d7e3466"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1437818, 29211, 182, 3, 49, "Input",ExpressionUUID->"78bc5423-3525-4536-9d0e-65e323b0f429"],
Cell[1438003, 29216, 153, 3, 55, "Output",ExpressionUUID->"70798da2-dd79-4202-8497-b32945fb901f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1438193, 29224, 154, 3, 49, "Input",ExpressionUUID->"0afb8032-bb9b-4333-9d11-a12a043c5d4e"],
Cell[1438350, 29229, 175, 3, 55, "Output",ExpressionUUID->"5b08e57a-1aa6-4144-b14e-a42a9b952223"]
}, Open  ]],
Cell[1438540, 29235, 166, 4, 77, "Input",ExpressionUUID->"c4e3820c-f333-4fac-844e-1b610a54db89"],
Cell[CellGroupData[{
Cell[1438731, 29243, 256, 5, 49, "Input",ExpressionUUID->"a8e12bf4-cf1d-4532-96da-a16ffced72d5"],
Cell[1438990, 29250, 301, 5, 55, "Output",ExpressionUUID->"77db0749-128c-49aa-b68b-a2c53e539054"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1439328, 29260, 256, 5, 49, "Input",ExpressionUUID->"794ce614-e821-4e0a-ae18-19461fda5538"],
Cell[1439587, 29267, 237, 4, 55, "Output",ExpressionUUID->"390238c6-3f4d-4765-b1b6-d7f14a7d7c18"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1439861, 29276, 180, 3, 49, "Input",ExpressionUUID->"43801d06-a0bb-44ef-a47c-ece3cde0cac2"],
Cell[1440044, 29281, 167, 2, 55, "Output",ExpressionUUID->"04f47b03-9dcb-4ec2-8ac7-eb408e42ba2f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1440248, 29288, 407, 6, 49, "Input",ExpressionUUID->"e6e418ee-5416-4e15-a616-bf20f4e160dc"],
Cell[1440658, 29296, 294, 4, 55, "Output",ExpressionUUID->"ab99691b-03bb-40bb-b474-76d4e7f8a762"],
Cell[1440955, 29302, 461, 10, 39, "Message",ExpressionUUID->"454029ef-1d81-4571-acdf-2f7b823571b9"],
Cell[1441419, 29314, 296, 4, 55, "Output",ExpressionUUID->"307f1e60-719f-4cc3-b9eb-682f4460ec56"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1441752, 29323, 12371, 267, 1273, "Input",ExpressionUUID->"debd816a-71ff-41df-a5c3-580255337e69"],
Cell[1454126, 29592, 637, 12, 39, "Message",ExpressionUUID->"1f917ff1-0400-40e9-a2ec-c460c17c56fb"],
Cell[1454766, 29606, 635, 12, 39, "Message",ExpressionUUID->"7028c54b-77f6-4dfb-b7df-1da126862a70"],
Cell[1455404, 29620, 677, 13, 72, "Message",ExpressionUUID->"55f35e48-7f5f-4168-98b8-36ea6cbc583d"],
Cell[1456084, 29635, 677, 13, 39, "Message",ExpressionUUID->"e68c89ba-9ac2-4827-b36d-c1ddc6680b29"],
Cell[1456764, 29650, 676, 13, 72, "Message",ExpressionUUID->"33da3d8f-a745-48c7-a999-a7db57839974"],
Cell[1457443, 29665, 632, 12, 39, "Message",ExpressionUUID->"914ee61d-127c-460b-81a5-c5f6d8bc6c1b"],
Cell[1458078, 29679, 4639, 96, 422, "Output",ExpressionUUID->"557c2512-1540-4b55-b019-5c70cfffdbd6"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1462754, 29780, 562, 13, 83, "Input",ExpressionUUID->"5de6cdeb-02d6-415b-8709-d0e3cdaae664"],
Cell[1463319, 29795, 499, 7, 55, "Output",ExpressionUUID->"c04cb369-6bd4-4f04-be3c-bdc9d0701789"],
Cell[1463821, 29804, 424, 6, 55, "Output",ExpressionUUID->"0109cb26-4e66-4750-91ac-40eb5eb30ddb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1464282, 29815, 336, 8, 49, "Input",ExpressionUUID->"f2ff04d2-cf6c-4282-a2f0-3491daf0a99e"],
Cell[1464621, 29825, 369, 6, 55, "Output",ExpressionUUID->"956a4e35-4ff4-486b-9c37-7c8f8501d33b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1465027, 29836, 354, 8, 49, "Input",ExpressionUUID->"9110c35f-72cc-4aed-9745-50f2ceff13ae"],
Cell[1465384, 29846, 191, 2, 55, "Output",ExpressionUUID->"c5cf8a68-681f-4f10-ac03-225fd27cb66c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1465612, 29853, 206, 4, 49, "Input",ExpressionUUID->"3e863c5e-a67b-4ed2-b161-31958418a460"],
Cell[1465821, 29859, 185, 3, 55, "Output",ExpressionUUID->"8bd11df6-28b4-41ed-a764-9c19911d2c8e"]
}, Open  ]],
Cell[1466021, 29865, 129, 3, 49, "Input",ExpressionUUID->"84b05558-2d6b-4a96-aa63-75bcab9ec7aa"],
Cell[1466153, 29870, 234, 4, 704, "Input",ExpressionUUID->"8c52185d-5989-4b74-aafe-42fb5d002f7d"],
Cell[CellGroupData[{
Cell[1466412, 29878, 4834, 125, 776, "Input",ExpressionUUID->"73bc3408-fdac-471c-9b76-8e3676fca517"],
Cell[1471249, 30005, 1043, 15, 55, "Output",ExpressionUUID->"4c51fd37-d3c0-47e8-b0c3-aceea4995b44"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1472329, 30025, 279, 5, 49, "Input",ExpressionUUID->"a19e7c01-e094-425e-adee-210b19ddfda2"],
Cell[1472611, 30032, 279, 5, 55, "Output",ExpressionUUID->"a4aa61bb-2b78-4205-ac63-54c7e94f76d2"]
}, Open  ]],
Cell[1472905, 30040, 154, 3, 49, "Input",ExpressionUUID->"7cee92ff-e923-44a4-815c-6950ac798931"],
Cell[1473062, 30045, 326, 6, 273, "Input",ExpressionUUID->"4fe02cc8-8bf1-46f6-a9ad-28fd50e4f429"],
Cell[CellGroupData[{
Cell[1473413, 30055, 2094, 54, 400, "Input",ExpressionUUID->"5715f132-be8b-4c6f-95a6-94808780b8cb"],
Cell[1475510, 30111, 642, 9, 55, "Output",ExpressionUUID->"8767d9f8-d445-4ecc-b031-5da1a1257f0f"],
Cell[1476155, 30122, 644, 9, 55, "Output",ExpressionUUID->"52030220-dcab-4280-ab86-ac908f66e1f7"],
Cell[1476802, 30133, 627, 9, 55, "Output",ExpressionUUID->"d2d9d780-c452-4fc5-9e7f-82d9317ce7b9"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1477466, 30147, 1514, 46, 242, "Input",ExpressionUUID->"5eae9dd9-72a2-4346-964d-751de393ed93"],
Cell[1478983, 30195, 368, 8, 76, "Output",ExpressionUUID->"b76f57bd-26c7-4e0d-9db8-21177ba006e5"],
Cell[1479354, 30205, 354, 8, 55, "Output",ExpressionUUID->"011fc537-be78-4085-b40a-49d6f1866c26"]
}, Open  ]],
Cell[1479723, 30216, 445, 8, 704, "Input",ExpressionUUID->"386f8b56-6529-4178-ac38-e6ca100a4dc4"],
Cell[CellGroupData[{
Cell[1480193, 30228, 15520, 355, 2947, "Input",ExpressionUUID->"448c6b36-7b71-4c70-a560-0c980b975071"],
Cell[1495716, 30585, 564, 12, 72, "Message",ExpressionUUID->"14069da1-0654-4cd9-8c8c-e21ed7905f06"],
Cell[1496283, 30599, 750, 15, 55, "Output",ExpressionUUID->"dc3b9787-2a3a-4949-bcc7-34158f86cc72"]
}, Open  ]],
Cell[1497048, 30617, 358, 6, 49, "Input",ExpressionUUID->"379e88ca-db6a-447c-8adc-9c77bd3519cf"],
Cell[CellGroupData[{
Cell[1497431, 30627, 228, 5, 49, "Input",ExpressionUUID->"1c23c6e5-43e4-4d79-ac69-2f6891da439f"],
Cell[1497662, 30634, 551, 11, 55, "Output",ExpressionUUID->"fce6c88c-3993-4a1e-80e6-40a8d6d17264"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1498250, 30650, 5434, 155, 436, "Input",ExpressionUUID->"40102793-fbaa-4bee-9e85-cbed43b23ae9"],
Cell[1503687, 30807, 586, 11, 60, "Output",ExpressionUUID->"62e3b4c1-6fe2-443a-a7ed-f4cb8f923979"],
Cell[1504276, 30820, 913, 21, 55, "Output",ExpressionUUID->"1bff0ddb-eed9-4311-8fc6-4dbabc1e12e4"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1505226, 30846, 181, 4, 78, "Input",ExpressionUUID->"8cabc0ec-8ffc-4f1d-8864-d2dbb27ec95d"],
Cell[1505410, 30852, 813, 23, 89, "Output",ExpressionUUID->"6193a2a1-7467-407e-9224-943102c6f3c7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1506260, 30880, 2393, 65, 380, "Input",ExpressionUUID->"2b1d4ba0-a500-4b58-9d74-c600174e4048"],
Cell[1508656, 30947, 922, 24, 89, "Output",ExpressionUUID->"35580346-3591-4cfe-989c-c1e5aeb51157"],
Cell[1509581, 30973, 813, 23, 89, "Output",ExpressionUUID->"67f0b931-b10d-4264-b3dc-d3db3798b6dd"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1510431, 31001, 175, 3, 49, "Input",ExpressionUUID->"2bff463d-0aaa-42ab-b492-ee76a8b06141"],
Cell[1510609, 31006, 804, 21, 89, "Output",ExpressionUUID->"8d8b0be7-e58b-42cd-a4ba-4abd22f62e5c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1511450, 31032, 2561, 71, 314, "Input",ExpressionUUID->"33cee6fb-6b6c-4cc0-89a7-df3aa0e22476"],
Cell[1514014, 31105, 901, 23, 89, "Output",ExpressionUUID->"3b199f61-add6-4563-941c-19de97b12659"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1514952, 31133, 379, 6, 49, "Input",ExpressionUUID->"037e6795-a871-480c-868a-2ece2db99b26"],
Cell[1515334, 31141, 1018, 25, 89, "Output",ExpressionUUID->"fb96efca-ebf0-494b-8616-e47bc5c7eca6"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1516389, 31171, 224, 4, 49, "Input",ExpressionUUID->"4f5ce71f-a5fb-4a13-bd68-043012cd05cc"],
Cell[1516616, 31177, 818, 23, 89, "Output",ExpressionUUID->"4cfbee6f-8e11-401a-aa2c-a88d227a1a46"]
}, Open  ]],
Cell[1517449, 31203, 383, 10, 49, "Input",ExpressionUUID->"2644d7f3-0d50-4c88-8b33-bfa3c4076064"],
Cell[1517835, 31215, 156, 3, 49, "Input",ExpressionUUID->"0fece42f-5205-47b2-84f8-6b0dde07d55e"],
Cell[1517994, 31220, 151, 3, 49, "Input",ExpressionUUID->"856e9fee-7614-4f1c-b8a5-86e86582c724"],
Cell[1518148, 31225, 326, 7, 704, "Input",ExpressionUUID->"9b47bbcb-541c-4dc1-9821-beae19941391"],
Cell[CellGroupData[{
Cell[1518499, 31236, 169409, 3461, 6561, "Input",ExpressionUUID->"090eaa6e-d184-4f46-a017-82c6a48e6ae5"],
Cell[1687911, 34699, 825, 15, 72, "Message",ExpressionUUID->"ce6abb71-5113-4aff-9ae4-198ff8731753"],
Cell[1688739, 34716, 825, 15, 72, "Message",ExpressionUUID->"c9ce2f55-d70e-4456-b066-8eee49aa82d1"],
Cell[1689567, 34733, 12132, 256, 408, "Output",ExpressionUUID->"c2af369b-bc12-4a11-b4bd-f2fd7a0f391e"],
Cell[1701702, 34991, 29298, 557, 104, "Output",ExpressionUUID->"8e039e20-ac1c-49bb-8cdb-029f976886a1"],
Cell[1731003, 35550, 20802, 407, 408, "Output",ExpressionUUID->"029f661e-c21f-41a1-8e30-f128047b7dd8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1751842, 35962, 111, 1, 49, "Input",ExpressionUUID->"98197575-3665-4fce-9417-f532a2f104d0"],
Cell[1751956, 35965, 154, 2, 55, "Output",ExpressionUUID->"d8691092-a0ef-4e0f-b305-cf94b7203295"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1752147, 35972, 237, 4, 49, "Input",ExpressionUUID->"4baeb606-ac42-42bb-9e42-08bf3d7b31b1"],
Cell[1752387, 35978, 324, 7, 55, "Output",ExpressionUUID->"21070b22-31ab-4544-a0cc-2a079f6f52df"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1752748, 35990, 792, 19, 116, "Input",ExpressionUUID->"c2425d1f-7872-48e8-ba65-11b3c056dc8d"],
Cell[1753543, 36011, 260, 4, 55, "Output",ExpressionUUID->"d817f0c0-3acb-419f-9020-5235c7624dee"],
Cell[1753806, 36017, 257, 4, 55, "Output",ExpressionUUID->"5a8e9494-5f09-4a84-9e06-fa9b09956f51"]
}, Open  ]],
Cell[1754078, 36024, 240, 4, 525, "Input",ExpressionUUID->"d76f2a1b-6646-4ae6-a996-57ceb82a1c7f"],
Cell[CellGroupData[{
Cell[1754343, 36032, 4715, 121, 479, "Input",ExpressionUUID->"f9553a16-ea7d-4ac1-ac96-f742ebe499cf"],
Cell[1759061, 36155, 852, 18, 55, "Output",ExpressionUUID->"6c40bc31-3743-406d-a217-dd2d4304df99"],
Cell[1759916, 36175, 201694, 3336, 754, "Output",ExpressionUUID->"a61f9b9f-d80c-4fc3-96d5-617b99fae914"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1961647, 39516, 515, 14, 49, "Input",ExpressionUUID->"8bdecc3f-ec6a-4533-8bd1-fe129d0449ca"],
Cell[1962165, 39532, 273, 6, 55, "Output",ExpressionUUID->"cddc86e6-6b84-41c4-ba47-9f25747add26"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1962475, 39543, 2847, 84, 248, "Input",ExpressionUUID->"c87d01c6-9124-4cd9-a12a-05c8c7d9d291"],
Cell[1965325, 39629, 997, 24, 398, "Output",ExpressionUUID->"ed4ee5a3-608e-451e-9840-d30f8cec528c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1966359, 39658, 1659, 43, 253, "Input",ExpressionUUID->"eb14a162-6bc3-470d-8809-b8a1a20c6cde"],
Cell[1968021, 39703, 14010, 250, 763, "Output",ExpressionUUID->"1fa9e82c-48cb-43f5-b867-12d2f4c01d5c"]
}, Open  ]],
Cell[1982046, 39956, 203, 4, 49, "Input",ExpressionUUID->"ed0fba97-dcfe-4d1f-ae0d-5ac783c3fd0c"],
Cell[CellGroupData[{
Cell[1982274, 39964, 708, 16, 149, "Input",ExpressionUUID->"d5e41d8c-5ada-4cca-a2f7-577ab0ad269c"],
Cell[1982985, 39982, 228, 3, 55, "Output",ExpressionUUID->"a43cf1e1-5398-4bf3-b0bc-3e0d46786589"]
}, Open  ]],
Cell[1983228, 39988, 144, 3, 49, "Input",ExpressionUUID->"e6f7aee1-2ac1-478d-9499-76e6f720e3e7"],
Cell[CellGroupData[{
Cell[1983397, 39995, 1097, 31, 96, "Input",ExpressionUUID->"57e14170-59f1-4b9b-bbb3-ffeb78ed7164"],
Cell[1984497, 40028, 656, 17, 81, "Output",ExpressionUUID->"426c8af9-1974-43b7-a9e9-b54712d3d33f"]
}, Open  ]],
Cell[1985168, 40048, 213, 4, 49, "Input",ExpressionUUID->"ae46d016-9933-44a6-9af2-f4166e518f9d"],
Cell[CellGroupData[{
Cell[1985406, 40056, 810, 21, 116, "Input",ExpressionUUID->"1562143f-9fc4-4f0e-bd0a-e33cb67a4bd4"],
Cell[1986219, 40079, 3610, 86, 241, "Output",ExpressionUUID->"923d8738-1df4-48fb-b52a-d79bb421d227"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1989866, 40170, 1878, 44, 295, "Input",ExpressionUUID->"fe1bd151-e56e-4560-a470-3c472cf7d909"],
Cell[1991747, 40216, 2195, 56, 108, "Output",ExpressionUUID->"0d9546c2-bb53-4451-9e20-76ca370b2b81"]
}, Open  ]],
Cell[1993957, 40275, 3008, 85, 422, "Input",ExpressionUUID->"cf342844-47ac-47e0-8440-0dfcc6f9e830"],
Cell[CellGroupData[{
Cell[1996990, 40364, 884, 26, 117, "Input",ExpressionUUID->"978402d8-48f8-4692-8e2f-54d8fd903ada"],
Cell[1997877, 40392, 279, 7, 74, "Output",ExpressionUUID->"dd1cc84f-76f7-44f9-93e7-d387062a57e2"]
}, Open  ]],
Cell[1998171, 40402, 740, 24, 83, "Input",ExpressionUUID->"0d19766c-24c1-4115-9635-5756d04c6c40"],
Cell[1998914, 40428, 872, 25, 165, "Input",ExpressionUUID->"a8c86963-f6cf-4dc5-9932-4cf82c37a442"],
Cell[1999789, 40455, 1400, 39, 314, "Input",ExpressionUUID->"aba419a0-dd71-4f8f-87ec-4ccc74cb01fa"],
Cell[2001192, 40496, 243, 4, 49, "Input",ExpressionUUID->"0d4f94e5-6a70-4a40-904b-287a63fc8ad5"],
Cell[CellGroupData[{
Cell[2001460, 40504, 219, 4, 49, "Input",ExpressionUUID->"78f60889-d235-420b-bb08-f128b84af858"],
Cell[2001682, 40510, 199, 3, 55, "Output",ExpressionUUID->"3dd42595-451b-410c-8897-be69ff8853eb"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2001918, 40518, 353, 9, 111, "Input",ExpressionUUID->"6950fe05-2e2c-475c-ad4f-51e48209b95f"],
Cell[2002274, 40529, 216, 4, 55, "Output",ExpressionUUID->"ca4a4cd4-ace4-4234-8078-c077d6c979c0"],
Cell[2002493, 40535, 214, 4, 55, "Output",ExpressionUUID->"dabbab9e-a35c-4254-b4d2-a4a347fad161"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2002744, 40544, 278, 6, 49, "Input",ExpressionUUID->"c09fc958-5877-4545-aadf-ee68f3f948af"],
Cell[2003025, 40552, 250, 6, 55, "Output",ExpressionUUID->"5a4f3987-d02e-4f40-993a-6e442a6e45f8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2003312, 40563, 117, 2, 49, "Input",ExpressionUUID->"e14da746-1dbe-4f8d-a36d-01bfe338b1fe"],
Cell[2003432, 40567, 171, 3, 55, "Output",ExpressionUUID->"237618b2-3fb0-40ff-8e3c-fe09e6d0877b"]
}, Open  ]],
Cell[2003618, 40573, 242, 5, 704, "Input",ExpressionUUID->"23c97fab-0f48-4909-a221-b50b95295008"],
Cell[2003863, 40580, 695, 20, 83, "Input",ExpressionUUID->"9e8319b8-36ba-45d2-af6e-d139d83b676e"],
Cell[CellGroupData[{
Cell[2004583, 40604, 16885, 395, 2455, "Input",ExpressionUUID->"4001bff2-1c66-4a2b-ba7c-a9fcb1f7419d"],
Cell[2021471, 41001, 2706, 37, 55, "Output",ExpressionUUID->"2ad5cf89-7a64-46c8-92b8-2cde3dfab55a"],
Cell[2024180, 41040, 2672, 36, 55, "Output",ExpressionUUID->"e95e8db4-af17-4bdb-95a1-1ec34d2923c9"],
Cell[2026855, 41078, 3527, 65, 130, "Output",ExpressionUUID->"e0696725-d04d-4492-9820-ff070db26698"],
Cell[2030385, 41145, 11631, 214, 410, "Output",ExpressionUUID->"005312a8-4482-4921-bbab-ed7b255cad57"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2042053, 41364, 1074, 24, 182, "Input",ExpressionUUID->"88e686de-fcbb-49cb-8c44-1b78b54c627a"],
Cell[2043130, 41390, 178, 2, 112, "Output",ExpressionUUID->"f93f4abc-af7f-47e1-9f39-9e6396a4100c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2043345, 41397, 3207, 78, 699, "Input",ExpressionUUID->"fed5bc90-9bb4-4fb2-898b-41b10db97b55"],
Cell[2046555, 41477, 1151, 28, 85, "Output",ExpressionUUID->"31fc138f-47ea-4d21-b600-546cda7c3e27"],
Cell[2047709, 41507, 1234, 27, 86, "Output",ExpressionUUID->"2847be1e-535b-4906-8195-3a3434c5bde9"]
}, Open  ]],
Cell[2048958, 41537, 283, 4, 83, "Input",ExpressionUUID->"e78acb19-2ea2-4448-bd38-7286de148f14"],
Cell[CellGroupData[{
Cell[2049266, 41545, 268, 8, 49, "Input",ExpressionUUID->"f9b3f208-a823-4762-9c99-ad2ed7726176"],
Cell[2049537, 41555, 656, 18, 55, "Output",ExpressionUUID->"ba9eb4af-65db-49aa-8d36-6ae4afd0675f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2050230, 41578, 1068, 27, 149, "Input",ExpressionUUID->"5c4a09e8-f555-4689-a036-a5efa388f646"],
Cell[2051301, 41607, 8249, 185, 392, "Output",ExpressionUUID->"d20ff660-a51a-4408-86e1-9f515d6ad1ad"],
Cell[2059553, 41794, 506, 7, 55, "Output",ExpressionUUID->"f151afba-7f72-4793-90f2-a261f6bb0cd0"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2060096, 41806, 10112, 264, 1421, "Input",ExpressionUUID->"8752d8d7-aa28-40f1-8f03-4ffb444644e6"],
Cell[2070211, 42072, 848, 15, 55, "Output",ExpressionUUID->"af3eeb00-c6ce-4e88-8248-bf1ce2f2af88"],
Cell[2071062, 42089, 732, 11, 55, "Output",ExpressionUUID->"922d8157-ab35-4eba-9334-84cfac6d2409"],
Cell[2071797, 42102, 9254, 180, 409, "Output",ExpressionUUID->"c2b19ae5-04cb-4403-b340-0a56c9a1f8f5"],
Cell[2081054, 42284, 758, 11, 55, "Output",ExpressionUUID->"05cf7119-6d1e-4903-a927-0ad561d8ad6a"]
}, Open  ]],
Cell[2081827, 42298, 994, 28, 149, "Input",ExpressionUUID->"7b1c6adf-729f-46de-b4aa-e789ce9dec48"],
Cell[2082824, 42328, 260, 5, 166, "Input",ExpressionUUID->"8f01c4b9-a8fa-4086-b193-98d183d77785"],
Cell[CellGroupData[{
Cell[2083109, 42337, 6125, 173, 644, "Input",ExpressionUUID->"283c173c-f692-4477-ba7d-61f891937889"],
Cell[2089237, 42512, 1707, 44, 389, "Output",ExpressionUUID->"10d53ce4-a96f-4bc9-b7ff-6bda9af3f4dd"],
Cell[2090947, 42558, 1709, 44, 404, "Output",ExpressionUUID->"14be8711-b412-4b51-968b-58c44869fb38"]
}, Open  ]],
Cell[2092671, 42605, 12840, 317, 1348, "Input",ExpressionUUID->"5c898fa7-5834-40ba-8fd1-3f303a083248"],
Cell[2105514, 42924, 229, 5, 49, "Input",ExpressionUUID->"b22d5718-b05c-4f23-9878-1f056b679af8"],
Cell[2105746, 42931, 9153, 215, 809, "Input",ExpressionUUID->"5481c314-3c05-49e0-8418-433ed4ba0227"],
Cell[CellGroupData[{
Cell[2114924, 43150, 202, 4, 77, "Input",ExpressionUUID->"07206beb-adb0-4ba7-882b-18d540a6c0a4"],
Cell[2115129, 43156, 201, 3, 55, "Output",ExpressionUUID->"e8b62b63-f8dd-4ea3-bdc4-33caab2a2889"]
}, Open  ]],
Cell[2115345, 43162, 291, 6, 94, "Input",ExpressionUUID->"91dfb976-c481-4470-834f-64bf87a4f11e"],
Cell[CellGroupData[{
Cell[2115661, 43172, 6103, 153, 646, "Input",ExpressionUUID->"e857b41d-60f9-43dd-8256-9e826b31ea8a"],
Cell[2121767, 43327, 15334, 322, 410, "Output",ExpressionUUID->"a7cfe9ac-806a-4cff-a55b-1869a5c6b303"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2137138, 43654, 1412, 31, 182, "Input",ExpressionUUID->"ca1f988b-f9e3-40aa-b706-592dd26e021f"],
Cell[2138553, 43687, 15460, 326, 410, "Output",ExpressionUUID->"d539ae88-6b0c-4a88-99a9-a896db6a4f16"],
Cell[2154016, 44015, 615, 9, 55, "Output",ExpressionUUID->"c8280055-560c-4dfd-beec-af23371ae232"]
}, Open  ]],
Cell[2154646, 44027, 239, 4, 166, "Input",ExpressionUUID->"e6af90c8-715e-446c-ab07-186dce7df8a7"],
Cell[2154888, 44033, 14505, 363, 1403, "Input",ExpressionUUID->"e1e848bc-71cb-4eea-aecd-9f1d75966b26"],
Cell[2169396, 44398, 283, 5, 116, "Input",ExpressionUUID->"b618dbb9-b284-4e6f-a514-58bc2ed5a2f5"],
Cell[CellGroupData[{
Cell[2169704, 44407, 36280, 945, 2921, "Input",ExpressionUUID->"8c8e7863-8fab-4249-bf9b-57fa2a16f8a0"],
Cell[2205987, 45354, 30782, 578, 1159, "Output",ExpressionUUID->"51186be4-9094-4394-a44c-50471d541acd"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2236806, 45937, 533, 14, 83, "Input",ExpressionUUID->"b5f1498f-7657-47ae-a2f5-e074db89fc00"],
Cell[2237342, 45953, 207, 3, 55, "Output",ExpressionUUID->"3fe376d9-8116-4e53-b09d-64441a376be8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2237586, 45961, 8731, 194, 1105, "Input",ExpressionUUID->"2954881c-fb18-4a9a-adbb-d6399f152b73"],
Cell[2246320, 46157, 10861, 200, 888, "Output",ExpressionUUID->"285d6385-d102-4dab-9f01-686a9540f5d8"],
Cell[2257184, 46359, 1891, 26, 55, "Output",ExpressionUUID->"9d4497d3-e60f-4b78-a361-f2302e1af585"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2259112, 46390, 154, 3, 49, "Input",ExpressionUUID->"3324bfc9-e27f-4d2c-ac9b-52e0e85a860f"],
Cell[2259269, 46395, 1694, 23, 55, "Output",ExpressionUUID->"e8028239-ef63-46a5-807f-e7350a2e0b7e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2261000, 46423, 2093, 54, 552, "Input",ExpressionUUID->"72889dcc-c600-4156-b8f1-b1b8ec251494"],
Cell[2263096, 46479, 356, 8, 55, "Output",ExpressionUUID->"01ae557a-a371-4191-a665-a92e5e38408b"]
}, Open  ]],
Cell[2263467, 46490, 302, 5, 49, "Input",ExpressionUUID->"0f7ca4f2-e1df-4479-aaeb-d05ac18c9c1f"],
Cell[CellGroupData[{
Cell[2263794, 46499, 4102, 91, 644, "Input",ExpressionUUID->"a7ad77e8-5e7c-407a-a28f-709b6a1a186a"],
Cell[2267899, 46592, 771, 11, 55, "Output",ExpressionUUID->"0cdfc57f-a671-4dd7-a431-6c94269c951a"],
Cell[2268673, 46605, 107295, 1834, 1156, "Output",ExpressionUUID->"eea72658-7214-4b20-9de8-199886a7a4fa"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2376005, 48444, 656, 15, 83, "Input",ExpressionUUID->"1d199c82-5a09-4e2f-bdaa-04a1c4714855"],
Cell[2376664, 48461, 237, 3, 55, "Output",ExpressionUUID->"ca9c5358-ee6b-4472-8124-e7941c991a71"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2376938, 48469, 113, 2, 49, "Input",ExpressionUUID->"4c47f254-f1c0-4797-98a8-0ff041b8f2b8"],
Cell[2377054, 48473, 169, 3, 55, "Output",ExpressionUUID->"166338ef-d1a3-415f-9583-89409b448a20"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2377260, 48481, 1055, 26, 279, "Input",ExpressionUUID->"bd42cb84-779a-4c65-a42c-3949e5ee3bb2"],
Cell[2378318, 48509, 746, 11, 55, "Output",ExpressionUUID->"5708114a-0068-4b2a-87f7-103ead018851"],
Cell[2379067, 48522, 764, 12, 55, "Output",ExpressionUUID->"d1b56278-0f3f-47e3-9598-8f36f0090475"],
Cell[2379834, 48536, 762, 12, 55, "Output",ExpressionUUID->"85855366-d40c-49f7-a377-f82581b7f54f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2380633, 48553, 3523, 66, 413, "Input",ExpressionUUID->"50cabe51-9a6a-46d7-9dc1-0e33c4989fa4"],
Cell[2384159, 48621, 647, 11, 55, "Output",ExpressionUUID->"32b63c35-5271-468a-9cd3-ae5d923031fa"],
Cell[2384809, 48634, 647, 11, 55, "Output",ExpressionUUID->"94bac85a-8bb7-40fa-8340-972b77a650cc"],
Cell[2385459, 48647, 15139, 333, 409, 10604, 259, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"9475d191-8991-458c-a470-33f810bee639"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2400635, 48985, 650, 15, 83, "Input",ExpressionUUID->"ae9549ed-761e-4bf5-9bc9-feaf077a1e23"],
Cell[2401288, 49002, 236, 3, 55, "Output",ExpressionUUID->"6c6bb432-96c6-4c7f-b220-9403405e47ae"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2401561, 49010, 151, 2, 49, "Input",ExpressionUUID->"533e4b8b-7606-466f-b56f-7c6f5284497b"],
Cell[2401715, 49014, 325, 7, 55, "Output",ExpressionUUID->"556f93ca-cfb9-4313-864b-420f92159f02"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2402077, 49026, 424, 8, 83, "Input",ExpressionUUID->"852e456f-466e-4b19-8fa0-e44e29c3f87e"],
Cell[2402504, 49036, 271, 4, 55, "Output",ExpressionUUID->"4b79ff6f-0292-437e-9f10-7ebd89cdb83d"],
Cell[2402778, 49042, 274, 4, 55, "Output",ExpressionUUID->"0cd9f93a-d533-4e59-a398-e308b4e1b04b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2403089, 49051, 229, 4, 77, "Input",ExpressionUUID->"fbe86ead-6730-4b9d-9ba1-a5e45ef88bf7"],
Cell[2403321, 49057, 176, 2, 55, "Output",ExpressionUUID->"a2a440c5-8d45-4b38-813e-186853bee722"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2403534, 49064, 238, 4, 78, "Input",ExpressionUUID->"1e7f665e-7aa5-4671-8b3d-c3bd82ac9601"],
Cell[2403775, 49070, 173, 3, 55, "Output",ExpressionUUID->"4eb1b55e-0adb-42b4-b433-77ff7edeb889"]
}, Open  ]],
Cell[2403963, 49076, 437, 8, 252, "Input",ExpressionUUID->"18fc652d-3303-4150-94c1-332c5729788a"],
Cell[CellGroupData[{
Cell[2404425, 49088, 3055, 87, 421, "Input",ExpressionUUID->"448057e8-76e7-4794-9119-28ae7756f5d7"],
Cell[2407483, 49177, 630, 12, 55, "Output",ExpressionUUID->"d1939822-1eb1-460c-a1c1-040f6f6b53c0"],
Cell[2408116, 49191, 632, 12, 55, "Output",ExpressionUUID->"151ef0ee-c544-45c5-b8a2-fe9062fd32e1"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2408785, 49208, 699, 17, 195, "Input",ExpressionUUID->"0a8da150-b1f3-4109-9f66-93b7072332ed"],
Cell[2409487, 49227, 323, 5, 55, "Output",ExpressionUUID->"e29387dc-f381-4627-8e3f-8d3286f5c787"],
Cell[2409813, 49234, 322, 5, 55, "Output",ExpressionUUID->"15bc36fb-8746-4523-83e0-11ea54f38297"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2410172, 49244, 258, 6, 49, "Input",ExpressionUUID->"74791582-d356-4092-9ffd-bd0c0c4ea3ba"],
Cell[2410433, 49252, 199, 4, 55, "Output",ExpressionUUID->"04352763-26e2-4f2c-9767-c8cd2d7f8cc4"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2410669, 49261, 1064, 23, 116, "Input",ExpressionUUID->"5ad5c2b3-a9b0-4c06-8074-45f3422cfb48"],
Cell[2411736, 49286, 15499, 340, 429, 10639, 260, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"99261731-fdd0-44d8-be08-c3bc641461b8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2427272, 49631, 485, 11, 83, "Input",ExpressionUUID->"b71d0193-5809-48dd-aee7-2c8f55ae6650"],
Cell[2427760, 49644, 586, 11, 55, "Output",ExpressionUUID->"d27dbb68-2f91-45a6-95c4-bb96a5c7b2f9"],
Cell[2428349, 49657, 395, 8, 55, "Output",ExpressionUUID->"a7e0f5ea-c362-493c-aaf0-0dd6294e1b33"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2428781, 49670, 771, 17, 149, "Input",ExpressionUUID->"7d3940f6-0e5d-41ca-a819-6e435929bab8"],
Cell[2429555, 49689, 204, 2, 55, "Output",ExpressionUUID->"eecfa3d3-01dc-43a0-b708-41f6ddc74f5d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2429796, 49696, 630, 16, 49, "Input",ExpressionUUID->"85766194-d7d7-4daa-9b24-874a0122f8eb"],
Cell[2430429, 49714, 296, 5, 55, "Output",ExpressionUUID->"791f9fb7-e1e8-4519-9796-89f8acbaebd3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2430762, 49724, 148, 3, 82, "Input",ExpressionUUID->"cbb7dc7d-baed-49c4-bdda-d5632e287b2b"],
Cell[2430913, 49729, 381, 9, 55, "Output",ExpressionUUID->"b13fdfeb-8818-4f68-a5b5-1155e77ee373"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2431331, 49743, 654, 12, 215, "Input",ExpressionUUID->"4baf562f-f99f-4e94-b9e4-6ace41155f7d"],
Cell[2431988, 49757, 297, 5, 55, "Output",ExpressionUUID->"cd005952-afad-44d7-b94a-2abe0d9b8ca6"],
Cell[2432288, 49764, 298, 5, 55, "Output",ExpressionUUID->"c6b7487a-0f8f-41a1-aadc-7efa5efb8dc2"],
Cell[2432589, 49771, 296, 5, 55, "Output",ExpressionUUID->"1d70fc76-d459-41d0-87ca-684d0b07fe42"],
Cell[2432888, 49778, 296, 5, 55, "Output",ExpressionUUID->"c7294d04-4955-47a9-91a0-c0f6ac22648a"],
Cell[2433187, 49785, 295, 5, 55, "Output",ExpressionUUID->"98eb32b5-89c9-4833-8f8e-063558388058"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2433519, 49795, 157, 4, 49, "Input",ExpressionUUID->"9f2a4d83-b92b-408c-a2d8-a08833005dab"],
Cell[2433679, 49801, 175, 3, 55, "Output",ExpressionUUID->"5ee24bfc-25b6-45a4-a03e-16c02bf92f1a"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2433891, 49809, 2654, 68, 116, "Input",ExpressionUUID->"0a1cea21-15a9-4716-9556-d2d43d658e34"],
Cell[2436548, 49879, 544, 11, 132, "Output",ExpressionUUID->"cb118a6c-c461-4169-b145-b9b599fd3a42"],
Cell[2437095, 49892, 4307, 71, 315, "Output",ExpressionUUID->"1388444a-2f5b-4d56-9e0b-b60ad30ab490"]
}, Open  ]],
Cell[2441417, 49966, 257, 4, 49, "Input",ExpressionUUID->"35bda14d-abfc-42b1-b54b-011b45e93f6f"],
Cell[CellGroupData[{
Cell[2441699, 49974, 883, 22, 149, "Input",ExpressionUUID->"abe52da1-7e4b-4a3e-a06a-10e2563ff3f9"],
Cell[2442585, 49998, 281, 4, 55, "Output",ExpressionUUID->"fcf5b91e-84f4-46e8-b629-ae64fcf227be"],
Cell[2442869, 50004, 278, 4, 55, "Output",ExpressionUUID->"52fb82b3-b14c-4e78-b518-61d2adcbc42d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2443184, 50013, 2726, 67, 513, "Input",ExpressionUUID->"2dd190ed-a051-4edb-bf7a-bd8069e35220"],
Cell[2445913, 50082, 469, 10, 55, "Output",ExpressionUUID->"1dda2bc3-d98d-4f06-8914-2290c0485c66"],
Cell[2446385, 50094, 635, 16, 55, "Output",ExpressionUUID->"06192f9a-7091-4fa3-8ba4-ba76d5772815"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2447057, 50115, 313, 7, 77, "Input",ExpressionUUID->"c55e2506-e1eb-4f7f-aa43-7b9cf97aa4c6"],
Cell[2447373, 50124, 171, 3, 55, "Output",ExpressionUUID->"32392337-078e-4625-ad92-7f5a7d9f4207"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2447581, 50132, 823, 20, 83, "Input",ExpressionUUID->"f0c750c0-da0d-4099-8b4e-de9d991ddaec"],
Cell[2448407, 50154, 465, 12, 81, "Output",ExpressionUUID->"cb544011-0d17-4b8a-800b-d20172ec1122"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2448909, 50171, 521, 14, 81, "Input",ExpressionUUID->"d705eece-5c8f-4760-b3ed-7d682a17ec67"],
Cell[2449433, 50187, 634, 17, 55, "Output",ExpressionUUID->"2912035a-3344-4143-82ef-cef3ce67a03f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2450104, 50209, 3341, 83, 610, "Input",ExpressionUUID->"57952ff9-2007-4bb9-bccf-6ced9d3a4bd6"],
Cell[2453448, 50294, 777, 18, 81, "Output",ExpressionUUID->"4ed0151e-123d-423e-9d28-1fb787b58b5a"],
Cell[2454228, 50314, 1375, 35, 81, "Output",ExpressionUUID->"45de9318-5a7e-4fbc-96b2-0e6434819f48"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2455640, 50354, 1083, 30, 82, "Input",ExpressionUUID->"66b6aa11-5300-4328-977b-5626e2ebcd80"],
Cell[2456726, 50386, 1641, 47, 94, "Output",ExpressionUUID->"ff1f321e-047b-47fb-ad20-994b533ee4b3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2458404, 50438, 1005, 28, 86, "Input",ExpressionUUID->"301f98ec-a0c8-4074-896c-2afc8f6420bd"],
Cell[2459412, 50468, 697, 18, 76, "Output",ExpressionUUID->"71116032-56b7-401b-869a-5d032c51c08b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2460146, 50491, 1351, 33, 116, "Input",ExpressionUUID->"bf5bcd37-5ed8-461d-936f-501b1c7f5107"],
Cell[2461500, 50526, 1438, 40, 82, "Output",ExpressionUUID->"e08a7d4a-bdf8-41f6-8d4d-ce51223fd563"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2462975, 50571, 224, 4, 49, "Input",ExpressionUUID->"3da9de9d-662d-446b-a732-a561816112b8"],
Cell[2463202, 50577, 191, 2, 55, "Output",ExpressionUUID->"0b280c2b-141d-4e16-ac20-59cbfc9fe197"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2463430, 50584, 259, 6, 49, "Input",ExpressionUUID->"37466798-7486-46c2-b261-fd5d949f74f6"],
Cell[2463692, 50592, 203, 4, 55, "Output",ExpressionUUID->"3a4a5a0f-3ef6-4515-8bef-ebf481f9bc95"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2463932, 50601, 7971, 194, 751, "Input",ExpressionUUID->"060fbc49-8bce-4dcc-96e8-5563ec2d456d"],
Cell[2471906, 50797, 1974, 29, 55, "Output",ExpressionUUID->"0aea6a6a-2d80-4829-8671-00e5589b5ca3"],
Cell[2473883, 50828, 7465, 144, 421, "Output",ExpressionUUID->"2a7c6c25-2bec-462f-be13-74e5d10eaed8"],
Cell[2481351, 50974, 6023, 117, 394, "Output",ExpressionUUID->"1935a92e-2e71-45ce-a7f6-9285d22c5df3"]
}, Open  ]],
Cell[2487389, 51094, 154, 3, 49, "Input",ExpressionUUID->"329ebff4-3fda-49ab-a352-eb89c51361ad"],
Cell[CellGroupData[{
Cell[2487568, 51101, 116, 2, 49, "Input",ExpressionUUID->"8a8ffb99-c9a5-4a9b-b6a7-91d363b60487"],
Cell[2487687, 51105, 322, 7, 55, "Output",ExpressionUUID->"ca2225c3-b6d0-4bdb-866f-4cda3cb1b155"]
}, Open  ]],
Cell[2488024, 51115, 835, 25, 83, "Input",ExpressionUUID->"c6762416-02f3-4371-b6d9-c22ec8e201bd"],
Cell[CellGroupData[{
Cell[2488884, 51144, 7128, 168, 596, "Input",ExpressionUUID->"e3059cb7-46b2-40f0-9e59-60e35200aa4a"],
Cell[2496015, 51314, 2204, 30, 55, "Output",ExpressionUUID->"8974bcf9-e086-4e67-bedc-d1309ece5730"],
Cell[2498222, 51346, 5791, 111, 348, "Output",ExpressionUUID->"5c0da6e9-ace9-4363-abc3-403e653bd3fd"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2504050, 51462, 175, 3, 49, "Input",ExpressionUUID->"82b2f524-9958-416c-830d-3301e70938e8"],
Cell[2504228, 51467, 192, 4, 55, "Output",ExpressionUUID->"8f3567e0-e935-40ee-879b-b9c74e4438e7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2504457, 51476, 149, 2, 49, "Input",ExpressionUUID->"71429bd0-41e5-40f6-9063-269edb3fcd47"],
Cell[2504609, 51480, 192, 3, 55, "Output",ExpressionUUID->"1fb936cf-30e6-41dc-86a9-4b9fcd91823b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2504838, 51488, 739, 17, 116, "Input",ExpressionUUID->"93602577-3a4d-4d4b-bd30-9c9732ecd0ca"],
Cell[2505580, 51507, 439, 7, 55, "Output",ExpressionUUID->"2d98ed51-570e-4b7b-aef5-fb9bfd037fe5"],
Cell[2506022, 51516, 356, 6, 55, "Output",ExpressionUUID->"1be67ff4-ce40-4937-8193-729ff4af9cb8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2506415, 51527, 9733, 273, 1188, "Input",ExpressionUUID->"faec9551-07a9-46b4-87cf-d222b0313461"],
Cell[2516151, 51802, 678, 10, 55, "Output",ExpressionUUID->"286a390a-d2af-410a-955b-eb82f2e51f06"],
Cell[2516832, 51814, 4457, 94, 395, "Output",ExpressionUUID->"3c59f385-8512-48a2-8023-c25831c61f39"],
Cell[2521292, 51910, 5180, 106, 395, "Output",ExpressionUUID->"022fa462-5693-4dff-9377-72ac9c1bfab0"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2526509, 52021, 264, 5, 49, "Input",ExpressionUUID->"5b8f66f0-5faa-4be3-8b2b-6eede799a266"],
Cell[2526776, 52028, 915, 23, 89, "Output",ExpressionUUID->"9a771218-2160-4dbc-919d-944ec3d95b09"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2527728, 52056, 885, 21, 182, "Input",ExpressionUUID->"02ad56e5-08c9-492a-9c17-e5873b64169d"],
Cell[2528616, 52079, 322, 4, 55, "Output",ExpressionUUID->"f02daacf-7188-4895-828c-7794fb44cf91"],
Cell[2528941, 52085, 250, 3, 55, "Output",ExpressionUUID->"bcf85c31-b4a5-46af-9219-de9de8cb3c3a"],
Cell[2529194, 52090, 246, 3, 55, "Output",ExpressionUUID->"06de1eb2-5fc7-43fb-8583-0e693b5793d4"]
}, Open  ]],
Cell[2529455, 52096, 174, 4, 49, "Input",ExpressionUUID->"88f296e0-e240-40e3-a837-86a7aca8c0b7"],
Cell[2529632, 52102, 156, 3, 49, "Input",ExpressionUUID->"48f0993c-1efd-4151-8229-89a6c32c8243"],
Cell[CellGroupData[{
Cell[2529813, 52109, 315, 8, 49, "Input",ExpressionUUID->"c9dfb8ae-674f-4f83-9ce0-723feea4dcaf"],
Cell[2530131, 52119, 245, 6, 55, "Output",ExpressionUUID->"68fdd1e9-438a-4b89-a9cd-763c597c2152"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2530413, 52130, 800, 22, 83, "Input",ExpressionUUID->"a444f151-434e-4359-a263-4c2db4f0b282"],
Cell[2531216, 52154, 556, 14, 55, "Output",ExpressionUUID->"bafab9ee-d8ac-484c-a364-1d0a5b50e036"]
}, Open  ]],
Cell[2531787, 52171, 242, 6, 49, "Input",ExpressionUUID->"beb54fd2-7602-440c-a11b-a822a8155269"]
}, Open  ]]
}
]
*)

